MaximoAccess

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

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 27/7/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á?
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em 27/7/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 27/7/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?
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em 27/7/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 10 vez(es)
    avatar
    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  Avelino Sampaio em 28/7/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


    Convidado
    Convidado

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

    Mensagem  Convidado em 28/7/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.
    avatar
    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

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

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

    Mensagem  Avelino Sampaio em 28/7/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



    Convidado
    Convidado

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

    Mensagem  Convidado em 28/7/2014, 14:11

    Eu já havia instalado essa atualização antes.
    Não era isso.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em 28/7/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 28/7/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
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  ahteixeira em 1/8/2014, 09:30

    Olá, obrigado pelo retorno

    Abraço.


    claudinei.santos98
    Novato
    Novato

    Respeito às Regras 100%

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

    Mesmo erro ao criar ACCDE

    Mensagem  claudinei.santos98 em 15/3/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 7/11/2016, 10:22

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

    Mabuus
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 18/06/2018

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

    Mensagem  Mabuus em 4/9/2018, 22:46

    Apenas para ajudar futuras consultas, fiz todos os procedimentos citados, mas nada funcionou, quando estava desistindo, mudei o nome do .accde para outro nome totalmente diferente, ae funcionou...

      Data/hora atual: 22/10/2018, 11:27