ich habe eine Excel-Tabelle in der mehrere Adressen stehen. Ich habe diese Tabelle per Makro mit mehreren Formularen verknüpft. Das heisst, wenn ich einen Button drücke startet ein Makro und schreibt mir die gewünschten Adressdaten der aktuell markierten Zeile in die Formularfelder.
Soweit so gut.
Ich möchte jetzt jedoch die Anrede dahingehend ändern, dass statt "Herr" (das in meiner Excel-Tabelle steht) in bestimmten Formularfeldern "Herrn" geschrieben wird. Bei "Frau" soll das natürlich bleiben.
Hier ein Teil des Codes:
wdAnw.ActiveDocument.FormFields.Item("Anrede").Result = Cells(i, 13)
wdAnw.ActiveDocument.FormFields.Item("Vorname").Result = Cells(i, 2)
wdAnw.ActiveDocument.FormFields.Item("Name").Result = Cells(i, 1)
...
Wie ändere ich den Code ab, dass im Formularfeld "Anrede" bei Herr das "n" angehängt wird, bei Frau aber der Text bleibt?
Danke
Robert