ich möchte für ein größeres Marko verschiedene Formeln (zB. y=2*a) aus einem Arbeitsblatt auslesen und dann über eine For Schleife nutzen. Das Ergebnis soll dann in die Tabelle geschrieben werden. Da die Formel geänderbar sein soll, kann sie leider nicht dirket ins Makro schreiben.
Hat einer eine Idee wie ich das hinbekommen könnte? Der einfache Weg (unten) funktiniert leider nicht.
Vielen Dank im Vorraus.
Grüße
Alex
Sub test()
x = Sheets("Tabelle1").Range("A1").Formula 'Hier soll die Formel stehen
MsgBox (x)
For a = 1 To 10 'For Schleife als Beispiel
Sheets("Tabelle1").Range("A" & a + 1).value = x
Next a
End Sub