Wenn letzte beschr. Zelle SpA leer ...
24.07.2020 14:42:12
Peter
ich habe im Tabellenblatt folgenden Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lRow As Long
With Worksheets("Kontodaten")
lRow = .Cells(.Rows.Count, 1).End(xlUp).Row 'ermittele die Anzahl der Zeilen, gehe von _
dort nach oben
If Not Intersect(Target, Range("A2:A" & lRow)) Is Nothing Then
Call LetzteZeileNummer12L
End If
End With
End Sub
Wie muss der Code bitte geändert werden, dass sobald die letzte beschriebene Zelle in A gelöscht wird, die letzte beschriebene Zelle in Spalte L gelöscht wird.
Besten Dank
Gruss
Peter