Moin Ihr,
wir haben eine alte .dot Vorlage für Word 2003 und müssen in dieser jetzt das VBA Script für Word 2013 anpassen. Leider ist hier niemand der wirklich nen Plan davon hat.
Ich hoffe dass ihr mir vielleicht weiterhelfen könnt.
In dem Formular sind einige Felder, die ausgeblendet werden sollen, wenn sie nicht gefüllt sind.
Aktuell lösen wir es so:
Dim aufvm
aufvm = ActiveDocument.FormFields("AUFVMABETRAG").Result
If aufvm <> "" And Not aufvm = "0,00" Then
ActiveDocument.FormFields("AUFVMABETRAGT").Result = "hier kommt Text rein"
wert = 1
Else
ActiveDocument.FormFields("AUFVMABETRAG").Delete
ActiveDocument.FormFields("AUFVMABETRAGT").Delete
End If
Vielen Dank
Christoph
|