ich habe in D2 z.B. folgendes stehen: 20050527 000000. In D3, D4, usw. habe ich andere Zahlen im gleichen Format stehen. Nun möchte ich in der Spalte J in jeder Zeile folgende Formel per Makro reinschreiben, sofern in der gleichen Zeile in Spalte D etwas drinsteht:
"=WERT(TEIL(D2;7;2)&"."&TEIL(D2;5;2)&"."&TEIL(D2;1;4))"
Durch diese Formel soll die entsprechende Zahl aus Spalte D in ein Datum umgewandelt und in Spalte J geschrieben werden.
Habe bereits mit folgendem Text angefangen:
Formel = "=WERT(TEIL(D2;7;2)&"."&TEIL(D2;5;2)&"."&TEIL(D2;1;4))"
Range("J2:J" & Range("A65536").End(xlUp).Row).FormulaLocal = Formel
Es wird dann aber folgender Fehler angezeigt "Fehler beim Kompilieren, Erwartet Anweisungsende".
Bin für jeden Tipp dankbar.
Gruß,
Stefan