In andere Zellen schreiben?

Hallo zusammen,

ist es möglich in andere Zellen schreiben zu lassen.
z.B. soll in Zelle A:1 der Befehl stehen in Zelle A:3 etwas zu schreiben.
Hab ne Weile rumprobiert, kriegs aber nicht auf die Reihe.

MFG
Nobody

Hallo Nobody
Ich verstehe nicht, was du genau willst. Steht das „etwas“ in Zelle A1 oder woher holst du es? Und wie löst du den „Befehl“ aus? Ist das ein Makro?

trivial wäre: in Zelle A3 steht „=A1“. Das ist wohl nicht die Meinung?

oder als Makro zu diesem Blatt, das ausgelöst wird, sobald du in A1 klickst und dann einen festen Text in A3 schreibt (anstatt „fester Text“ könnte dort natürlich auch vieles andere stehen, z.B. ein Zellinhalt, eine Formel …) :

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If ActiveCell.Cells.Address = „$A$1“ Then
ActiveSheet.Range(„A3“).Value = „fester Text“
’ oder z.B. aus einer andern Zelle holen
ActiveSheet.Range(„A4“).Value = ActiveSheet.Range(„B10“).Value
’ usw.
End If
End Sub

Wenn das nicht so gemeint ist, bitte präzisiere die Frage.
Erich

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Danke für die schnelle Antwort. War genau das was ich gesucht habe.