Forms sempre no topo com form abrindo logo abaixo

Boa tarde senhores,

Mais uma vez venho solicitar ajuda dos companheiros, para um dúvida. Já vi em algum site a utilização do Move...

Estou ultilizando a função:

Option Explicit
Public Const HWND_TOP = 0
Public Const SWP_NOMOVE = 2
Public Const SWP_NOSIZE = 1
Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Public Function SetTopMostWindow(hWnd As Long) As Long
SetTopMostWindow = SetWindowPos(hWnd, HWND_TOPMOST, 200, 0, 0, 200, SWP_NOSIZE)
End Function

Para que o form Menus ao abrir fique fixo no topo do Desktop, conform anexo...

Gostaria de ajuda dos companheiros, para ao clicar nos botões do Menu, abrir os forms na frente do Menus ou abaixo. Pois não estou conseguindo. Ou o form abre por tráz do Menu ou para abrir, uso no Clique: DoCmd.Close
DoCmd.OpenForm "frmCadastro", acNormal, "", "", , acNormal

porém, é chato, pois terei que abrir um form de cada vez... Com o form Menus no topo de forma fixa e os forms abrindo normalmente. posso usar mais de um form para cadastro entre outros...

Desde já agradeço a ajuda dos companheiros...

Tentei anexar a imagem do Menu mais não consegui...

O menu é simples, abre no topo. O que quero é que ao clicar nos botões os forms na frente ou abaixo do Menu. Se poderem me ajudar com esse desafio fico grato...

Desde já agradeço a todos...

"Deus sempre prepara pessoas capacitadas para capacitar outras pessoas. Isso é um grande privilégio, poder ensinar e ver o crescimento de alguém que aprendeu com agente. Ainda que não valorize! Mais xerocamos algo na vida dessa pessoa"

Veja esse exemplo

Nele tem uma função e duas caixas de texto que estão invisíveis, que mostram as coordenadas do mouse.
Deixe-as visíveis,para te auxiliar onde posicionar outros fomulários.
Posicione os outros formulários abaixo do formulário menu para não fica sobre ou debaixo dele.
Veja também na propriedade Ao carregar do formulário o código para posicionar o formulário.

[ ]'s

Boa noite,

Obrigado Nobeezinho, vou estudar o arquivo de exemplo.

Desde já te agradeço pelo seu apoio...

Assim que conseguir, te retorno...

Abraço.

Bom dia Nobeezinho,

Seria possível te enviar o arquivo por e-mail. Pois o projeto está em aberto...

Fiz de outra forma o Menu... O que você me enviou é show de bola. Vou usar em outro projeto e estava precisando...

esse que fiz é mais simples...

Você vendo vai entender e poder me ajudar...

Abraço,

Teste colocando o seu frmCadastro com popup=sim e janela restrita=sim

Se a dica do JPaulo não resolver,

Utilize o mega dropbox, MeoCloud ou ge.tt esse

último, não precisa se cadastrar.

Comprima teu arquivo em zip ou rar, pode

colocar senha se quiser.

Então disponibilize o link para baixar.

Assim não só eu, como todos podem ajudar.

Boa tarde, João Paulo, Nobezinho e demias companheiros.

Segue link para baixar a idéia do MENU no topo... É simples...

Gostaria que os forms abrisem abaixo do Menu ou s frente... Uma forma diferente...

Desde já agradeço a ajuda dos companheiros...

http://www.4shared.com/rar/xUiqp_-Aba/JefRecibo.html

Bom dia companheiros,

Utilizando a função abaixo, fiz a manipulação e deu certo como queria que abrissem os forms...

'Começo

Option Explicit
Public Const HWND_TOP = 0
Public Const SWP_NOMOVE = 2
Public Const SWP_NOSIZE = 1
Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Public Function SetTopMostWindow(hWnd As Long) As Long
SetTopMostWindow = SetWindowPos(hWnd, HWND_TOPMOST, 200, 0, 0, 200, SWP_NOSIZE)
End Function

'Fim

Tentei da forma que J.Paulo passou mais não funfou...

Agora peço de ajuda para que os Relatórios ao abrir abram a frente. Pois estão abrindo atrás do form Menu...

Desde já agradeço....