würde gerne folgende Matrix als Beispiel, der in Zelle A5: {=WENN(B5=B4;A4;"")}
in ClassModule der Tabelle als Worksheet_Change ausgeben.
So funktzioniert es nicht.
Private Sub Worksheet_Change(ByVal Target As Range)
If (Cells(Target.Row, 2) = Cells(Target.Row - 1, 2)) Then
Cells(Target.Row, 1) = Cells(Target.Row - 1, 1)
End If
End Sub
Aufgabe:
In der Spalte A, genauer von der A4, wird ein Wert von Hand eingegeben, dann sollen
die Zelle nach unten ausgefüllt werden solange in Spalte B(auch ab B4)der darüberligenden
Zellenwert gleich ist. Wenn der Wert in Spalte B sich verändert wird von Hand in der
Spalte A ein neuer Wert eingegeben und so weiter.
Kann mir jemand helfen?
Vielen Dank im Voraus.
Grüße