Ho risolto!

Basta dare un nome al range invece che il riferimento numerico.

Sub NascondeRiga()
Dim CL As Object
For Each CL In Range("Nascondibile")
If CL.Value = "" Then CL.EntireRow.Hidden = True
Next CL
End Sub

Basta dare un nome al range invece che il riferimento numerico.