Hallo Leute,
Ich hab nen Makro, mit dem ich Daten anpassen möchte für einen Abgleich.
Bisher habe ich in Tabelle 1 die Formeln stehen gehabt und über Copy und Paste eingefügt.
Jetzt wollte ich aber die Formel direkt einfügen und durch Autofill in alle Verwendeten Zeilen einfügen.
Mein Quelltext sieht an dieser Stelle derzeit so aus:
Sheets("Tabelle2").Select
a = ActiveSheet.UsedRange.Rows.Count
Range("B1").Select
ActiveCell.FormulaR1C1 = "=Links(A1;LÄNGE(A1)-7)"
Selection.AutoFill Destination:=Range("B1:B" & a), Type:=xlFillDefault
Leider fügt das Makro nur etwas ein, wenn ich das = nach dem " weglasse, also
= "Links(A1;LÄNGE(A1)-7)" da steht. Aber das wird nicht als Formel anerkannt und nützt mir daher nichts...
Kann mir jemand helfen und sagen wo mein Problem liegt? Ich bedanke mich schonmal im Vorraus für eure Hilfe!
MfG
Logan