Office: Zeugnis per Seriendruck

Hallo,
ich habe ein Problem an dem ich schon Ewigkeiten tüftle: Ich habe für meine Schule mit office 2003 ein Zeugnisprogramm geschrieben. Die Daten der Einzelnen Schüler werden zuächst in eine Exceltabelle eingegeben, und dann per Seriendruck in eine Worddatei übernommen. Die Seriendruck- und Bedingungsfelder befinden sich in der Worddatei in Tabellen.
Bei unserem Zeugnis gibt es u.a. einen Bereich, in dem z.B. AGs der Schüler aufgelistet werden. Dies habe ich per Seriendruckfeld gelöst. Einige Schüler haben jedoch keine AG.

Ich möchte nun folgendes erreichen:
Ist in der Exceldatei in einem Feld (AG) kein Eintrag gemacht, soll die Zelle im worddokument von einer diagonalen Linie (ich erreiche sie durch nachträgliches Anklicken unter Rahmen und Schattierungen) durchgestrichen werden.
Wie kann ich nun erreichen, dass im Worddokument nun automatisch jene Zellen durchgestrichen werden, in denen in Exceldatei in der entsprechenden Zelle kein eintrag vorliegt?
Eine Lösung dieses Problems wäre eine sehr große Erleichterung für mich, da ich bei über 500 Zeugnissen nachträglich diagonale Linien in den Worddokumenten einfügen darf...
Liebe Grüße!!

 

Hallo,

wie ist Dein Seriendruckdokument aufgebaut? Mit vba? Dann sollte man es auch mit vba schaffen, zu erfragen, ob das Seriendruckfeld xy leer ist, und wenn ja, die Linie setzen...

Ansonsten würde ich eine Grafik mit der gewünschte Linie erstellen, um dann mittels der nachfolgenden Feldkonstruktion die Grafik einzufügen, falls das Seriendruckfeld leer ist:
{ IF { MERGEFIELD AGxy } = "" { INCLUDEPICTURE "Linie.jpg" \* MERGEFORMAT } { MERGEFIELD AGxy } }

 

vba??? Also ich habe das Seriendruckhauptdokument einfach mit Word2003 erstellt, also mit den "Word-Seriendruck-" und "Word-Bedingungsfeldern". Eine Linie als Grafik zu erstellen scheint mir nicht möglich, da die Linie diagonal eingefügt werden soll, und diese Funktion in Zellen unterschiedlicher Größe verwendet werden soll. D.h. die Länge und der Winkel der Linien ist unterschiedlich...

Gibt es keinen Feldfunktions-Befehl den ich verwenden könnte?? Ich stelle mir das so vor:
{ IF { MERGEFIELD AGxy } = "" { xxx } wobei xxx eine Anweisung enthält, so eine diagonale Linie einzufügen, wie man sie über Format --> Rahmen und Schattierungen auf dem Reiter "Rahmen" einstellen kann...
Schon mal vielen Dank für deine Mühe!! ;-)

 

Hi Michael,

das wäre eine "bedingte Formatierung", die es in Word soweit ich weiß nicht gibt.

Man könnte schon versuchen, dies mit VBA zu lösen. Aber ich weiß nicht, ob der Aufwand lohnt.

Eine weiterte Möglichkeit wäre folgendes: Im Sereinbrief eine Formatvorlage für die Formatierung der Zelle festlegen. Dann über die Suchen - Ersetzen Funktion bei einer bestimmten Zeichenfolge diese Formatvorlage der Zelle zuordnen. Aber ob das für Deinen Fall sinnvoll und praktikabel ist - das musst du entscheiden.

Nur mal als Anregung von einem Vater mit einigen Kindern und noch mehr Zeugnissen:

Würde nicht auch ein "---" eventuell reichen? Das könnte man mit einer Bedingung lösen. Denn ich vermute mal, dass man den Rahmen der Tabellenzelle eh nicht sieht ... (Zeugnisse werden ja auch größtenteils im Aussehen von den Bundesländern vorgegeben...)

Soweit ich mich erinnern kann stand dort immer ein "---"

 

"Eine weiterte Möglichkeit wäre folgendes: Im Sereinbrief eine Formatvorlage für die Formatierung der Zelle festlegen. Dann über die Suchen - Ersetzen Funktion bei einer bestimmten Zeichenfolge diese Formatvorlage der Zelle zuordnen. Aber ob das für Deinen Fall sinnvoll und praktikabel ist - das musst du entscheiden."

Das hört sich ja super-interessant an!! Ich könnte z.B. "leer" in diese Zellen einfügen und dann per suchen und ersetzen eine diagonale Linie von links unten nach rechts oben einsetzen lassen???? Das wäre eine echte Erleichterung!! was müsste ich denn da anklicken? Habe mir gerade die suchen und ersetzen-funktion angeguckt, werde aber nicht so ganz schlau draus....

Für eine Beschreibung wäre ich wirklich sehr dankbar!!! Liebe Grüße!