Exemplo de Menu Suspenso

Olá Amigos do Fórum,
Segue em anexo exemplo de menu suspenso que criei para em BD.
Resolvi compartilhar com os colegas, caso seja do interesse de alguém.
Somente coloquei código (MsgBox) no click do submenu "Cliente" do menu "Cadastros Gerais".
No Menu "Cadastros Gerais", submenu "Autor", coloquei código de mudança da cor de fundo no evento Ao Mover Mouse.
Com relação às cores, fontes e demais efeitos, fica a critério dos colegas.
Os códigos do VBA estão comentados, apesar de serem básicos.
Espero que seja útil.
Valeu.

Ola amigo gostei ficou legal,e para dar certo em qualquer monitor fiz só mais umas adaptação.



https://dl.dropboxusercontent.com/u/90217826/Menu_Suspenso.rar

Olá Kaynan,
Agora ficou beleza.
Até pensei em pesquisar sobre uma função para essa questão da resolução, mas sempre deixei pra depois.
Vou aproveitá-la, com sua licença, em meus BDs que precisar.
Valeu.

Ok amigo que bom que gostou.

Parabéns Rdrck e Kaynan ficou showw vou adaptar ao meu bd abraço.

Alguem pode mandar em 2003 por favor ?

Segue anexo arquivo do Menu Suspenso com algumas modificações.
1 - Observar Produtos -> Consultar Produtos;
2 - Botão para encerrar aplicativo;
3 - Redimensionamento da janela;
4 - Mudança do ponteiro do mouse.

Segue versão em 2003.

Olá rdrck

Show de bola e já estou adaptando pro meu bd

Abraços