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

    [Resolvido]Como descobrir o erro em accdr

    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 30/4/2021, 18:12

    Boa tarde amigos

    O código abaixo funciona bem em access 2013 - 32, e não dá erro nem accdb, e nem em accde

    Em accdr dá : Erro em tempo de execução.

    A ordem em que estão terá influência?

    Obrigado

    Private Sub Movimentos_AfterUpdate()

       Me.Tipo_Mov = Movimentos.Column(1)

          Me.A = Movimentos.Column(1)

      Me.Comando63.Visible = True

     Me.Rótulo455.Visible = True
       
       Me![Rubrica].enabled = True
         
           Me![Rubrica].SetFocus
           
        Rubrica.Dropdown
         

    End Sub


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1455
    Registrado : 13/12/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Alexandre Fim 30/4/2021, 18:30

    Assis,

    Verifique se o campo Rubrica.DropDown é um combobox. Se não for, vai dar erro.
    Compile o sistema e veja se tem outros erros.


    []'s

    FIM


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 30/4/2021, 18:49

    Alexandre

    Sim Rubrica é comboBox.

    Consigo converter a BD para accde, por isso está compilado está bem


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1455
    Registrado : 13/12/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Alexandre Fim 30/4/2021, 19:14

    Assis,

    O teu Access é 32 ou 64?

    Se a versão for 64, verifique se não está faltando PtrSafe nas declarações de API.


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 30/4/2021, 19:16

    Alexandre

    Win 10 - 64 com Office 2013 - 32



    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1455
    Registrado : 13/12/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Alexandre Fim 30/4/2021, 19:19

    Ok.

    Na compilação não encontrou erros?

    Compacte e repare o sistema.
    Feche-o e abra novamente



    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 30/4/2021, 19:30

    Alexandre
    Quando está na extensão accdb, e mando converter para accde, se tiver error de compilação não é criado a extensão accde.
    Depois de estar com a extensão accde, não dá erro nenhum.
    Depois de mudar a extensão para accdr, é que acontece o “Erro”
    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1455
    Registrado : 13/12/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Alexandre Fim 30/4/2021, 19:39

    Ah...entendi !!
    Nunca tive este problema e acho que não vou conseguir te ajudar.
    Vamos aguardar algum membro do fórum ajudar.

    []'s

    FIM


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 30/4/2021, 19:47

    Obrigado Alexandre
    BFS


    .................................................................................
    *** Só sei que nada sei ***
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 30/4/2021, 20:02

    Olá a todos,

    Assis, teste renomeando de accdb para accdr e execute.
    Se nao conseguir detetar o erro monte pequeno exemplo a dar o erro para se testar.

    Abraço a todos
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2816
    Registrado : 22/11/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  DamascenoJr. 30/4/2021, 21:39

    Que tal também ouvir o que o Access tem a dizer? Ou seja, cadê o tratamento para erro?

    Outra coisa, que tal também emitir caixas de mensagem com o passo a passo do código e saber a linha exata que está o problema?

    É um bom começo...

    Private Sub Movimentos_AfterUpdate()
    On error goto trataErro

    call msgbox("passo 1 ok")
      Me.Tipo_Mov = Movimentos.Column(1)
    call msgbox("passo 2 ok")
         Me.A = Movimentos.Column(1)
    call msgbox("passo 3 ok")
     Me.Comando63.Visible = True
    call msgbox("passo 4 ok")
    Me.Rótulo455.Visible = True
    call msgbox("passo 5 ok")
      Me![Rubrica].enabled = True
    call msgbox("passo 6 ok")
          Me![Rubrica].SetFocus
    call msgbox("passo 7 ok")
       Rubrica.Dropdown
       
    sair:
    exit sub

    trataErro:
    call msgbox(err.number & vbnewline & vbnewline & err.description)
    resume sair


    End Sub


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Alexandre Fim gosta desta mensagem

    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 1/5/2021, 11:49

    Bom dia Amigos

    É o SetFocus Laughing Laughing Laughing

    Tem como resolver, na vossa opinião ?

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2816
    Registrado : 22/11/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  DamascenoJr. 1/5/2021, 11:56

    Qual a mensagem de erro emitida? Experimenta também reiniciar esse controle para cboRubrica e referencia-lo sem os colchetes [].


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 1/5/2021, 12:12

    Damasceno

    Já tentei tudo !!!!!

    Só tirando o setfocus, para não dar o erro na extensão accdr

    Em accde funciona perfeito.

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2816
    Registrado : 22/11/2016

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  DamascenoJr. 1/5/2021, 12:27

    Private Sub Movimentos_AfterUpdate()
    On error goto trataErro

    Me.Tipo_Mov = Movimentos.Column(1)
        Me.A = Movimentos.Column(1)
    Me.Comando63.Visible = True
    Me.Rótulo455.Visible = True
     Me![Rubrica].enabled = True
    DoEvents
         Me![Rubrica].SetFocus
      Rubrica.Dropdown
     
    sair:
    exit sub

    trataErro:
    call msgbox(err.number & vbnewline & vbnewline & err.description)
    resume sair

    End Sub


    Não resolvendo, diga qual a mensagem de erro emitida pelo código.

    Experimente também já deixar o controle habilitado desde o inicio para ver se mesmo assim o setfocus não funciona.

    Tente montar um pequeno exemplo usando esse formulário e veja se o problema se repete.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 1/5/2021, 13:51

    Olá a todos,

    Assis depois da "papa toda feita" pelo colega Damasceno, tem que mostrar o código do erro, pois tem tratamento de erros.
    Pode mostrar qual o código do erro?

    Abraço a todos
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 1/5/2021, 16:22

    Boa tarde

    Estou aqui a dar a mão á palmatória.

    O erro está no acontecimento "Ao Alterar" o campo "Movimentos"

    Se tirar esse acontecimento funciona, mas eu não queria tirar.

    Obrigado
    Anexos
    [Resolvido]Como descobrir o erro em accdr AttachmentTestes_Assis.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (1.9 Mb) Baixado 11 vez(es)


    .................................................................................
    *** Só sei que nada sei ***
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 1/5/2021, 17:03

    Olá Assis,

    Voltando à mensagem nr. 11 do colega Damasceno, mostre o print da mesagem com o nr do passo com o erro e que o fez identificar como sendo no "setfocus".

    Aguardo
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 1/5/2021, 17:33

    Assis,

    Com o código do Damasceno deveria aparecer a caixa de mensagem a dizer os "passos" e não deve ter aparecido nenhuma, porque o erro pelo exemplo que partilhou está aqui:
    [Resolvido]Como descobrir o erro em accdr 0174

    E nem percebo o que isto faz ou está a fazer numa caixa de combinação que tem "origem da linha dos dados" numa consulta, não faz sentido, pode explicar.

    Qualquer membro que está a participar neste topico pode contornar o erro se pretender mesmo assim, mas na minha opiniao não faz sentido e deve ter um código limpo e fluido e você também tem que compreender o que tem no seu projeto.

    Além disso o erro não tem nada haver com ACCDR, pois tenho em ACCDB e está a dar erro Shocked

    Abraço
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 1/5/2021, 17:42

    Então Assis, feedback
    Se não vou sair e fica para depois a solução
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 1/5/2021, 18:12

    [Resolvido]Como descobrir o erro em accdr Sem_t218


    .................................................................................
    *** Só sei que nada sei ***
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 1/5/2021, 18:35

    Assis,
    Era isto que o colega Damasceno tinha sugerido para identificar o erro, você nem viu , nem percebeu como funciona, nem colocou no sitio correto para aparecer, veja:

    [Resolvido]Como descobrir o erro em accdr 0175
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 1/5/2021, 19:09

    Olá a todos,

    Assis, não respondeu à minha pergunta:
    "E nem percebo o que isto faz ou está a fazer numa caixa de combinação que tem "origem da linha dos dados" numa consulta, não faz sentido, pode explicar.".
    Mantenho o que disse, no entanto para "contornar o erro" usamos o tratamento de erros, ficando assim:
    [Resolvido]Como descobrir o erro em accdr 0176

    Vou alterar o titulo do topico porque ficou provado que o erro dá no formato accdb.

    Abraço
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4453
    Registrado : 06/11/2009

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  Assis 1/5/2021, 19:28

    Como o Amigo diz:

    Não está a fazer nada.

    [Resolvido]Como descobrir o erro em accdr Sem_t219


    Obrigado a todos


    .................................................................................
    *** Só sei que nada sei ***
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Como descobrir o erro em accdr Empty Re: [Resolvido]Como descobrir o erro em accdr

    Mensagem  ahteixeira 2/5/2021, 10:42

    cheers

      Data/hora atual: 16/6/2021, 20:28