Hello

I'm am new, so please be patient.

I need to find in SheetB/ColumnB, values of SheetA/ColumnB and if I fin
them, I should delete them.

Dim tcid As Integer
tcid = ActiveCell.Value

Cells.Find(What:=tcid, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
True, SearchFormat:=False).Activate

I recorded a macro, but I get and error message.

I read something about "&quot" but I get a compiling error if I use that
syntax.
Could someone help me, please?

Thanks!
-Z