Para cada bucle no se eliminarán todas las filas con valores específicos

Quiero eliminar todas las filas que no contienen el valor "Total" en el rango ("B11: B25").

Abajo está mi código.

Dim cell As Range

For Each cell In Range("B11:B25")
    If cell.Value <> "Total" Then
    cell.EntireRow.Delete
End If

Next

End Sub

El código anterior solo eliminará algunas filas con celdas que no tienen el valor "Total". Si tengo que eliminar todas las filas que no contienen "Total", tendré que ejecutar esto varias veces, lo que no es práctico.

Respuestas a la pregunta(2)

Su respuesta a la pregunta