VBA - Hide rows by filter insted of loop.

Hello friends, Hope all is well!

The below code works well and smoothly. But it's slow.
Can you please help me modify it by making the code filter and hide the rows in column R8:R94 if the cells = 0.

Thank you very much in advance!

Sub HideRowsIfSumZero()
Dim cell As Range

For Each cell In Sheets("ARM").Range("R8:R94")

    If UCase(cell.Value) = "0" Then
        cell.EntireRow.Hidden = True
    End If

Next

End Sub