Índice
Esconder Excel
Ocasionalmente, pode surgir a necessidade de ocultar todo o Excel, um bom momento pode ser ao exibir uma tela inicial ou possivelmente codificar uma variação de segurança.
Coloque isso em um módulo:
| 1234567891011121314151617 | Public Sub HideMyExcel ()Application.Visible = FalseApplication.Wait Now + TimeValue ("00:00:05")Application.Visible = TrueEnd Sub |
Nota lateral: Usei um cronômetro para que possamos ver o Excel novamente, não se esqueça de definir Visível = Verdadeiro em algum momento!
