Tenta adaptar Os dois codigos
Ocultar
Sub Ocultar()
Rows("10:10").EntireRow.Hidden = True
End Sub
Reexibir
Sub Reexibir()
Rows("10:10").EntireRow.Hidden = False
End Sub
Associe cada codigo a um botao.
Esses codigos ocultam e reexibem a linha 10
Marcelo Prudencio
Microsoft Excel Brasil no Facebook
"Começar já é a metade do caminho."
Autor Desconhecido
Simplifica que simples fica.
Nicole Tomazella.
"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.
Postado : 02/02/2016 4:27 pm