Trovare un valore e eliminare la linea in cui si verifica

Sono nuovo alla programmazione VBA e sono arrivato ad un punto in cui sono bloccato. Questo non è probabilmente troppo difficile, ma apprezzerò qualsiasi aiuto!

Dichiarazioni di base e altre cose:

Dim found As Range Dim ArtNr As String Tabelle1.Activate ArtNr = InputBox("..") Range("L1") = ArtNr MsgBox ("..") 

Ecco il codice critico in cui desidero trovare un valore inserito in precedenza e eliminare la row in cui si verifica questo valore:

EDIT: la row, da eliminare, non viene eliminata.

 Set found = ActiveSheet.Columns(2).Find _ (what:=ActiveSheet.Range("L1"), LookIn:=xlValues, lookat:=xlWhole) If Not found Is Nothing Then found.EntireRow.Delete End Sub 

Eventuali suggerimenti?

Range.Find ha uno dei parametri LookAt cui opzioni possono essere una delle seguenti immettere qui la descrizione dell'immagine

Usa lookat:=xlPart invece di lookat:=xlWhole