MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Access 2007 esconder janela

    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty Access 2007 esconder janela

    Mensagem  Manuela Peixoto 13/9/2013, 08:13

    Bom dia. tenho a minha base de dados em acess feita mas queria que quando abrisse a base de dados apenas se visse a página principal que eu criei. existe algum código para isso?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  JPaulo 13/9/2013, 09:44

    Ola;

    Procure aqui por "esconde janela"

    Inclusive, na sala de Exemplos tem muitos.

    Aproveitando, leia por favor o item Nº2 das Regras do forum.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Access 2007 esconder janela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Access 2007 esconder janela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Access 2007 esconder janela Folder_announce_new Instruções SQL como utilizar...
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess

    Mensagem  Manuela Peixoto 13/9/2013, 09:58

    Olá encontrei este código já fiz os três primeiros passos mas os passos 4 e 5 não sei fazer.
    Pode ajudar.
    Passo 1. Copie o código que está após o passo 5 em um módulo. Nomei-o como basAccessHider , os nomes são apenas exemplos para facilitar, use o que achar melhor.

    Passo 2. Crie uma macro e chame-a de mcrHide .Na linha de ação da macro "RunCode" ou "ExecutarCódigo" coloque o seguinte na caixa de função ou Function Box:

    fAccessWindow ("Minimize", False, False)

    Passo 3. Crie outra macro e chame-a de mcrRestore .Na linha de ação da macro coloque o seguinte na caixa de função:

    fAccessWindow ("Show", False, False)

    Passo 4. Coloque o seguinte código no evento Ao Abrir do seu formulário de inicialização que deverá ter sua propriedade PopUp como sim (se você não tiver um formulário de inicialização, basta usar o primeiro formulário que você abre quando executa o banco de dados, desde que tenha a propriedade PopUp como sim):

    DoCmd.RunMacro "mcrHide"

    Passo 5. No evento Ao Fechar do seu formulário de inicialização, coloque o seguinte código:

    DoCmd.RunMacro "mcrRestore"
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  JPaulo 13/9/2013, 12:54

    Não sei que tópico você foi buscar, mas veja o simples;

    Num modulo novo, cole este código e salve com o nome que quiser.

    Option Explicit
    Global Const SW_HIDE = 0
    Global Const SW_SHOWNORMAL = 1
    Global Const SW_SHOWMINIMIZED = 2
    Global Const SW_SHOWMAXIMIZED = 3
    Private Declare Function apiShowWindow Lib "user32" _
       Alias "ShowWindow" (ByVal hwnd As Long, _
             ByVal nCmdShow As Long) As Long
             
    Public Function fSetAccessWindow(nCmdShow As Long)
    Dim loX  As Long
    Dim loForm As Form
       On Error Resume Next
       Set loForm = Screen.ActiveForm
       If Err <> 0 Then
         If nCmdShow = SW_HIDE Then
           MsgBox "Cannot hide Access unless " _
                       & "a form is on screen"
         Else
           loX = apiShowWindow(hWndAccessApp, nCmdShow)
           Err.Clear
         End If
       Else
           If nCmdShow = SW_SHOWMINIMIZED And loForm.Modal = True Then
               MsgBox "Cannot minimize Access with " _
                       & (loForm.Caption + " ") _
                       & "form on screen"
           ElseIf nCmdShow = SW_HIDE And loForm.PopUp <> True Then
               MsgBox "Cannot hide Access with " _
                       & (loForm.Caption + " ") _
                       & "form on screen"
           Else
               loX = apiShowWindow(hWndAccessApp, nCmdShow)
           End If
       End If
       fSetAccessWindow = (loX <> 0)
    End Function


    Na propriedades do seu formulario principal, (o que abre em 1º lugar), escreva 1 no intervalo do cronometro, depois pressione os 3 pontinhos do Cronometro, para entrar no VBA desse evento, e cole apenas o que está a azul.

    Private Sub Form_Timer()
    On Error Resume Next
       Call fSetAccessWindow(SW_HIDE)
       If Err.Number = 0 Then
           Me.TimerInterval = 0
       End If

    End Sub


    Nas propriedades de todos os formularios e relatorios, guia Outros, tem de colocar Popup=Sim e Janela Restrita=Sim.

    Exemplo feito no seu outro exemplo;


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Access 2007 esconder janela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Access 2007 esconder janela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Access 2007 esconder janela Folder_announce_new Instruções SQL como utilizar...
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 13/9/2013, 14:45

    Boa tarde, ja coloquei o código. Fiz tudo e aparece na mesma o menu base
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  JPaulo 13/9/2013, 18:56

    É só fazer igual ao exemplo que está na minha ultima mensagem, que vai funcionar.

    Abra o exemplo com a tecla shift pressionada e veja a estrutura do formulario login e compare com o seu.

    Mais que isso só açucar de mamão.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Access 2007 esconder janela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Access 2007 esconder janela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Access 2007 esconder janela Folder_announce_new Instruções SQL como utilizar...
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 16/9/2013, 10:03

    Bom dia. Obrigado pela ajuda. Já tenho o meu problema resolvido.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  JPaulo 16/9/2013, 10:06

    Opa, fico feliz...

    Obrigada pelo retorno o forum agradece.



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Access 2007 esconder janela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Access 2007 esconder janela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Access 2007 esconder janela Folder_announce_new Instruções SQL como utilizar...
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 16/9/2013, 15:12

    Tenho uma duvida como desactivo o botão maximizar minimizar e fechar das minhas janelas do acess
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 16/9/2013, 15:26

    obrigado. já consegui ocultar os botões
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 17/9/2013, 09:21

    Bom dia alguem me ajuda a alterar o logotipo do aplicativo do acess?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  JPaulo 17/9/2013, 11:12

    Tópico Resolvido, nova duvida novo tópico (na sala correta à sua nova duvida).



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Access 2007 esconder janela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Access 2007 esconder janela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Access 2007 esconder janela Folder_announce_new Instruções SQL como utilizar...
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 17/9/2013, 16:08

    Olá Jpaulo tenho um problema na minha base de dados depois de colocar o código para ocultar as janelas agora não consigo abrir os relatórios pode ajudar-m?
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  JPaulo 17/9/2013, 20:20

    Leia por favor, com atenção a mensagem N°4, em relação ao Popup=Sim e Janela Restrita=Sim


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Access 2007 esconder janela Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Access 2007 esconder janela Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Access 2007 esconder janela Folder_announce_new Instruções SQL como utilizar...
    avatar
    Manuela Peixoto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Portugal
    Mensagens : 49
    Registrado : 26/08/2013

    [Resolvido]Access 2007 esconder janela Empty acess 2007

    Mensagem  Manuela Peixoto 18/9/2013, 08:39

    Bom dia 
    tenho tento nos formulários como nos relatórios subreposição sim e modal sim

    Conteúdo patrocinado


    [Resolvido]Access 2007 esconder janela Empty Re: [Resolvido]Access 2007 esconder janela

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 15:10