ich stehen auf'm Schlauch.
Ich möchte in einer Tabelle wenn ich den Wert einer Zelle lösche, dass der Wert in der Zelle 3 Spalten weiter rechts ebenfalls gelöscht wird.
Ich habe es mit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("C6:C44")) Is Nothing Then
If ActiveCell.Value = "" Then ActiveCell.Offset(3, 0).Value = ""
End If
End Sub
versucht aber leider keinen Erfolg gehabt.Hat jemand eine Idee?
Gruß
Martin