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]Uso de "Null" inválido

    Compartilhe
    avatar
    RodriguesChqao
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 104
    Registrado : 31/05/2016

    [Resolvido]Uso de "Null" inválido

    Mensagem  RodriguesChqao em 23/2/2018, 12:54

    Bom dia!

    Estou tentando fazer uma numeração automática para o meu formulário com ajuda do fórum.

    No banco de dados vazio para teste funcionou perfeitamente, mas quando importei o formulário para o BD em uso com dados cadastrados ocorreu o seguinte erro.






    Como poderia resolver este erro.

    Obrigado pela atenção
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  Noobezinho em 23/2/2018, 17:32

    Rodrigues


    Veja o campo da tua tabela se tem campo apagado em branco(nulo).


    Se ainda não conseguir, limpe a tabela e adicione novos registros.


    [ ]'s
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  Noobezinho em 25/2/2018, 10:54


    Rodrigues


    Resolveu?


    avatar
    RodriguesChqao
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 104
    Registrado : 31/05/2016

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  RodriguesChqao em 26/2/2018, 13:02

    Bom dia Noobezinho.
    A tabela não tem dados em branco.
    A tabela possui 507 registros que começaram a ser inseridos em 2017 até a data atual.

    Vou continuar a inserir de forma manual e avaliar se é o caso cadastrar tudo de novo.

    Obrigado
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  Noobezinho em 26/2/2018, 13:31

    Sabe usar a janela imediata?

    Se não, No google encontrará site que ensinar a utiliza=la, o que é uma mão na roda.

    Digo isso, porque  o código está parado naquela linha.

    Com isso, você pode verificar os valores dos campos utilizados até o momento.

    Rode o programa e quando ele parar nessa linha, faça o seguinte:

    Se a janela imediata não está aberta na página do VBA, tecle Crtl+G

    Na janela imediata digite:

    ? Nr_Crendencial    ' --> Tecle enter, na linha debaixo deve aparecer o valor do campo, ou  nulo

    Aguardo...
    avatar
    RodriguesChqao
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 104
    Registrado : 31/05/2016

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  RodriguesChqao em 26/2/2018, 16:47

    Boa tarde!

    Após digitar ? Nr_Credencial e dar "enter" na janela imediata apareceu a palavra "nulo"

    Rodrigues
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  Noobezinho em 26/2/2018, 18:16


    Então

    Nr_Credencial está com o valor nulo, por isso está dando erro.

    Veja o campo Nr_Credencial do primeiro registro na tbl_Credencial.

    Ou ainda

    Abra a tabela e no campo Nr_Credencial coloque em ordem Crescente, se tiver algum campo em branco,

    ficará na parte de cima da tabela.



    avatar
    RodriguesChqao
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 104
    Registrado : 31/05/2016

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  RodriguesChqao em 26/2/2018, 18:47

    A tabela Tbl_Credencial não possui valores em branco para o Nr_Credencial

    Existem números duplicados, por exemplo 2 0001, mas não possui valores em branco.

    O campo está formatado como texto.

    CassioFabre
    CassioFabre
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 18/01/2013

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  CassioFabre em 26/2/2018, 19:56

    Boa tarde,

    Se me permitem uma tentativa: substitua a linha grifada por:
    Código:
    If Eval(Right(DMax("[Nr_Credencial]", "Tbl_Credencial", "Right([Nr_Credencial], 4) = '" & Year(Date) & "'"), 4)) <> Year(Date) Then

    Retorne.

    Abraço.


    .................................................................................
    Só não tem código pra morte!
    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  Noobezinho em 26/2/2018, 20:00

    Cassio

    Esse código uso direto e está funfando conforme no exemplo que enviei.

    Rodrigues

    O campo está como 0001 como disse ou como 0001/2017 (qualquer ano)

    Irá funcionar somente se o campo for 0001/ano.

    avatar
    RodriguesChqao
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 104
    Registrado : 31/05/2016

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  RodriguesChqao em 27/2/2018, 13:43

    Bom dia!
    Como a tabela já continha dados o formato estava 0001 e não 0001/ano

    Fiz um teste com 20 registros adicionando manualmente o ano depois do número.

    Após este procedimento funcionou perfeitamente.


    Obrigado pela atenção de todos

    avatar
    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  Noobezinho em 27/2/2018, 13:53

    Que bom que está resolvido!

    Agora, só falta o Resolvido no título do tópico.

    Faça isso, editando uma mensagem tua e clicando no botão resolvido, embaixo, na página.

    Boa sorte!
    avatar
    RodriguesChqao
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 104
    Registrado : 31/05/2016

    Re: [Resolvido]Uso de "Null" inválido

    Mensagem  RodriguesChqao em 27/2/2018, 14:20

    Resolvido conforme descrição acima

      Data/hora atual: 24/1/2019, 09:27