Seleziona l'intervallo di celle della colonna B e prova a eseguire questa macro

codice:
Sub cancella()
For Each cella In Selection.Cells
  If cella.Value = "" Then
     Rows(cella.Row).Select
     Selection.ClearContents
  End If
Next
End Sub