ich habe aus dem Forum ein Makro das folgendes können soll:
Wenn ich in Tabelle1 A1 einen Wert eintrage, soll beim Verlassen der Zelle der Wert in Tabelle2 A1 kopiert werden.
Dieses soll genau so mit A2, A3 geschehen.
Folgende Zeile in ein allgemeines Modul:
Public AlteZelle as Range
Folgende Zeilen in das Codemodul von Tabelle1:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not AlteZelle Is Nothing Then
Sheets("Funktion 2").Cells(AlteZelle.Row, 1) = alteZelle.Value
End If
Set alteZelle = Target(1, 1)
End Sub
Warum funktioniert das nicht?
Vielen Dank im voraus
Gruß Rolf