MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]ACCDB funciona mas ACCDE não

    Compartilhe

    Convidado
    Convidado

    [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Convidado em Dom 27 Jul 2014, 12:37

    Bom dia pessoal,
    Fiz uma BD e olha que estranho: Em accdb funciona o botão e o evento ao clicar para pedir uma senha:

    Private Sub BTN_CadastroDocumentos_Click()
    If InputBox("Digite a senha", "Senha de acesso") <> "123" Then
    MsgBox "Senha incorreta. Tente novamente", vbCritical, "Ops!"
    Else
    DoCmd.RunMacro "MacroDocs1"
    End If
    End Sub

    Mas depois de salvar como ACCDE o botão não funciona mais.
    O que será?

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3214
    Registrado : 15/03/2013

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  ahteixeira em Dom 27 Jul 2014, 13:09

    Olá,
    Não será nas definições de segurança? (Execução de macros ou Centro de Fidedignidade).
    Testei seu exemplo e criei accde e funcionou.

    Abraço

    Convidado
    Convidado

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Convidado em Dom 27 Jul 2014, 15:09

    ahteixeira,
    Não é, pois habilitei as macros na central de segurança.
    Mas veja o que fiz:

    Private Sub BTN_CadastroDocumentos_Click()
    If InputBox("Digite a senha", "Senha de acesso") <> "123" Then
    MsgBox "Senha incorreta. Tente novamente", vbCritical, "Ops!"
    Else
    DoCmd.OpenForm "Formu_Validade_documentos", acNormal, "", "", , acNormal
    End If
    End Sub

    simplesmente não chamando mais a macro, mas agora abrindo o formulario (a macro é que abria o formulario) com DoCmd.OpenForm "Formu_Validade_documentos", acNormal, "", "", , acNormal
    Funciona!
    Estranho , não é? sabe dizer o que seria?

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3214
    Registrado : 15/03/2013

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  ahteixeira em Dom 27 Jul 2014, 16:55

    Ola de novo,

    Experimentei apenas o código e funcionava o Imputbox a macro não cheguei a testar porque não disponho da informação.

    a) O imputbox funciona no seu exemplo?

    Segue o meu exemplo de teste em anexo, pode testar e dar retorno.

    Código utlizado

    Código:
    If InputBox("Digite a senha", "Senha de acesso") <> "123" Then
    MsgBox "Senha incorreta. Tente novamente", vbCritical, "Ops!"
    Else
    DoCmd.OpenForm "Formulário2", acNormal
    End If
    End Sub
    Anexos
    jrozsas.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (43 Kb) Baixado 7 vez(es)

    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 04/04/2010

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Avelino Sampaio em Seg 28 Jul 2014, 11:31

    Olá!

    Esta falha acontece na mesma máquina ou quando roda em outra máquina ?

    Antes da passar para ACCDE:

    - Abra o aplicativo no modo estrutura
    - Abra o VBA
    - Vá no menu DEPURAR e clique em COMPILAR - Se encontra algum erro, corrija.
    - Repita o processo de copilar até não encontrar mais erros

    Aguardamos



    .................................................................................
    ============ Quer aprender Access em alta velocidade ? ============

    || [Você precisa estar registrado e conectado para ver esta imagem.] Acesse o site UsandoAccess.com.br e veja um ótimo kit de ensino que tenho para você.

    ===========================================================

    Convidado
    Convidado

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Convidado em Seg 28 Jul 2014, 12:50

    Ahteixeira, esse código funciona, porque não chama a macro.
    Avelino, depurei e não ocorreram erros. Esse erro acontece na mesma máquina. Não testei em outras.
    Estou usando o access2013.
    Bom, como passou a funcionar com o exemplo do ahteixeira, não vou me preocupar mais com isso.
    Mas um dia vou fazer outros testes malucos pra ver o que poderia ser. Minha maquina é 64 bits e vou testar em uma 32 bits.

    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    Registrado : 04/04/2010

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Avelino Sampaio em Seg 28 Jul 2014, 13:36

    Olá!

    O Access 2013 veio com um BUG no uso ACCDR. Baixe deste meu artigo uma correção para o 2013 e nos retorne se teve êxito:

    [Você precisa estar registrado e conectado para ver este link.]

    Aguardamos




    .................................................................................
    ============ Quer aprender Access em alta velocidade ? ============

    || [Você precisa estar registrado e conectado para ver esta imagem.] Acesse o site UsandoAccess.com.br e veja um ótimo kit de ensino que tenho para você.

    ===========================================================

    Convidado
    Convidado

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Convidado em Seg 28 Jul 2014, 14:11

    Eu já havia instalado essa atualização antes.
    Não era isso.

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3214
    Registrado : 15/03/2013

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  ahteixeira em Seg 28 Jul 2014, 15:23

    Olá,

    Apesar de já estar dado como fechado, na minha opinião não funcionava em VBA pelo argumento abaixo a negrito:

    DoCmd.OpenForm "Formu_Validade_documentos", acNormal, "", "", , acNormal

    Devendo ficar:

    DoCmd.OpenForm "Formu_Validade_documentos", acNormal, "", "", , acWindowNormal

    Abraço a todos  cheers 

    Convidado
    Convidado

    [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  Convidado em Seg 28 Jul 2014, 17:56

    ahteixeira, não era isso não.
    Veja:
    O erro era quando : DoCmd.RunMacro "MacroDocs1" (ou seja, não rodava a Macro de dentro do VBA)
    Mas com : DoCmd.OpenForm "Formu_Validade_documentos", acNormal, "", "", , acNormal (agora funciona, porque abro o formulario em VBA, e não por meio da Macro dentro do VBA)

    O problema é que após transformar em VBA, este não executava o DoCmd.RunMacro "MacroDocs1"
    então que eu fiz? transformei o RunMacro em DoCmd.OpenForm "Formu_Validade_documentos", acNormal, "", "", , acNormal

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3214
    Registrado : 15/03/2013

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  ahteixeira em Sex 01 Ago 2014, 09:30

    Olá, obrigado pelo retorno

    Abraço.


    claudinei.santos98
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 3
    Registrado : 10/03/2016

    Mesmo erro ao criar ACCDE

    Mensagem  claudinei.santos98 em Ter 15 Mar 2016, 17:49

    Pessoal boa tarde. Enfrentei o mesmo erro ao criar ACCDE no Access 2013. Fucei um pouco considerando todos os argumentos apresentado aqui na discussão.
    O meu problema é que acrescentei novas consultas e formulários ao BD já criando anteriormente, fiz também menus e botões de acesso aos formulários e acho que isso impedia de criar o ACCDE corretamente. O que descobri e realizei: apena fiz a depuração (Depurar: Compilar [BD]) da minha macro autoexec em VB sem alterar nada, a depuração corrigiu o erros das novas consultas e formulários.

    Se alguém estiver diante desta muralha, a escada é essa"
    Abraços a todos.

    silviomoser
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 16/08/2011

    Re: [Resolvido]ACCDB funciona mas ACCDE não

    Mensagem  silviomoser em Seg 07 Nov 2016, 10:22

    Estava com o mesmo problema, resolvi facilmente pela dica do Claudinei. Grato.

      Data/hora atual: Qui 08 Dez 2016, 14:05