Saberexcel - site das macros

Essa macro do Aplicativo Microsoft Excel VBA, alterna linhas de grades, isto é torna as linhas visíveis e ou ocultam.
Alterna linhas grades na planilha do excel

 Sub Alterna_Linhas_grade()
 ActiveWindow.DisplayGridlines = Not ActiveWindow.DisplayGridlines
End Sub

'Esta macro alterna grelha ou outro faz outro procedimento.

Sub Alterna_Situacao_Grelha()
If ActiveWindow.DisplayGridlines = True Then
   ActiveWindow.DisplayGridlines = False
Else
   ActiveWindow.DisplayGridlines = True
End If
End Sub