ich habe folgendes kleines Script:
Sub einfüschn()
Dim Letzte As Long
Dim I As Long
Dim Datei, Wert1 As String
Datei = "datei.xls"
Workbooks(Datei).Sheets(1).Activate
Letzte = Workbooks(Datei).Sheets(1).UsedRange.Rows.Count
Wert1 = Workbooks(Datei).Sheets(1).Cells(2, 1).Value
For I = 3 To Letzte
Workbooks(Datei).Sheets(1).Cells(I, 1).Value = Wert1
Next I
End Sub
Meine Frage an Euch ist, wie kann ich in die Variable "Wert1" die
Formel aus der Zelle reinmoven, d.h. ich will nicht den Wert (value), sondern die beinhaltete Formel in die Variable haben.
Hat mir da jemand nen Tipp?
Vielen Dank im voraus.
Gruß Stefan