Entsprechende Spalte bei Änderung löschen

Question

Ich habe zwei Spalten, die miteinander übereinstimmen müssen. A2-A51 & B2-B51. Spalte A enthält den Namen, Spalte B enthält das Datum. Ich versuche, ein on-Change-Ereignis zu schaffen, in dem, wenn eine Zelle in Spalte A gelöscht wird, die entsprechenden in derselben Zeile in Spalte B

Option Explicit 

Private Sub Worksheet_Change() 
    If Intersect(ActiveCell, Range("A2:A51")) Is Nothing Then 
     If ActiveCell.Value = "" Then 
      Range("B" & Range("A2:A51").Row).Clear 
     End If 
    End If 
End Sub 

Answer 1

gelöscht Versuchen Sie diesen:

Legen Sie es in den Code für Ihr Blatt.