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