Sub DELbj()For I = 26 To 50For J = 3 To 4If InStr(Cells(13, 2).Value, Left(Cells(I, J).Value, 1)) > 0 ThenCells(I, J).Value = ""End IfNext JNext IEnd Sub
试试看。
