ich ändere Dateien über eine Updateroutine. Dabei sollenbei 35 Dateien an Neun Stellen Daten geändert werden. Dies klappt bisher auch ganz gut,
Im speziellen Fall handelt es sich um eine Formel die Kontaktinformationen in eine Zelle schreibt, die mit einem Zeilenumbruch formatiert ist.
In der Zelle habe ich den Umbruch manuell über Alt Return an den passende Stelle eingefügt. Alle Versuche die Formel über VBA zu ändern scheitern aber an der Zeilenschaltung.
Nachfolgend ein Teil der Formel (Im Original kommen noch einige geschachtelte Wenns hinterher).
=WENN(A1="K. Mustermann";"Home Office
Telefon : 01234 / 5678-98
Telefax : 01234 / 5678-99";WENN(A1="A. Müller";"Telefon : 98765 / 4320-11";""))
Die Zeilenumbrüche haben Zeichen(10). Die Formel, die in die Zelle geschrieben wird beginnt mit Range("BE39").FormulaLocal = ?
Zeilenumbrüche mit chr(10) oder vbCrLf funktionieren bei mir nur in reinen Textformeln.
Etwas wie & chr(10) & steht dann wortwörtlich in der Zelle wird aber nicht als Funktion für den Zeilenwechsel ausgeführt.
Ist es möglich, die Formel mit der Zeilenschaltung in der Zelle in VBA nachzubauen?
Schon mal im Voraus besten Dank an die Gemeinde.
Grüße Norbert