Layout Menu Principal - Parte 02

13. Digite novamente CRTL+ SHIFT +S para ocultar os outros objetos;

14. Criar uma variável chamada vMenu;

15. No editor de Módulos criar a macro abaixo:

sub AtivaPasta

vMenu   = ActiveDocument.Variables("vMenu").GetContent. String

ActiveDocument.ActivateSheet vMenu          

end sub 

16. Configurar as propriedades de Módulo de segurança requerido com “Modo Seguro” e “Apenas modo seguro”;

17. No menu Configurações propriedades do documento selecionar a guia disparadores e em disparadores de campo selecionar o campo “Paineis” e adicionar os seguintes disparadores ao selecionar:

a. Bloquear campo  - %ID_Menu

b. Definir variável “Vmenu” para o valor “=%Sheet”;

c. Executar Macro – Ativa Pasta

d. Limpar Campo Paineis

18. Nas propriedades da pasta Menu Principal adicionar os seguintes disparadores:

a.  Ao sair destravar campo %ID_Menu.

b. Ao entrar Limpar Tudo

19. Finalmente alterar a  configuração em propriedades do documento para “ocultar pastas”.

Ao terminar todo o processo o seu menu principal deverá ter esta aparência: