Delete the all chosed column which is selected in combo box!!!!!!!!!!!!!

Hi Experts,

I wrote a code below, It works like that the choosed text is deleted from Excel sheet. But to delete it I have to click CommandButton2 every time.
I want that when I click command button once it should be delete all column which is choosed in combo box. It is urgent please help me rapidly.

Private Sub CommandButton2_Click()
Dim s As String
s = ComboBox2.Text

For i = 1 To 100
    If Range("b" & i).Value = s Then
    Rows([i]).EntireRow.Delete
    
    End If
    
Next i
Next i
End Sub