Supportnet / Forum / Tabellenkalkulation
Makro schreiben
Frage
Hallöchen,
ich hab eine Frage.. und zwar möchte ich gerne mit einem Makro oder Funktion eine betimmte Zelle auslesen. Dieser Zelle wird nach einigen Berechnungen unter anderem mit Zufallszahlen ein Wert übergeben.
Diesen möchte ich nun in eine andere Spalte kopieren. Sagen wir Beispielsweise in die G10, wird nun ein neuer Wert berechnet, soll dieser nun direkt darunter kopiert werden also G11. Den nächsten wert den die Zelle ausgibt in G12 usw.
Dh. mit jeder neuberechnung soll das Ergebnis in die Spalte geschrieben werden, sodass ich diese Daten dann auswerten kann.
Vielen Dank im Voraus!!
Antwort 1 von JoeKe
Hallo,
folgenden Code kopierst du dafür in das VBA-Projekt deines Tabellenblattes:
Private Sub Worksheet_Calculate()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0) = Range("A1")
End Sub
Gruß
JöKe
folgenden Code kopierst du dafür in das VBA-Projekt deines Tabellenblattes:
Private Sub Worksheet_Calculate()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0) = Range("A1")
End Sub
Gruß
JöKe