Dados com Valores 'Null'  [Resolvido]

Processos de importação e exportação de dados, interação entre o Excel e demais softwares, interface com Banco de dados, SQL.

Dados com Valores 'Null'

Mensagempor rafaelp » Ter Jul 03, 2018 4:43 pm

Boa tarde a todos.

Tenho uma tabela com vários campos onde alguns estão com os valores em branco. Até aí tudo bem porém, ao carregar alguma campo em uma ListView por exemplo, ocorre o erro abaixo:

Código: Selecionar todos
Erro em tempo de execução '94':

Uso de 'Null' inválido.


Sei que há a possibilidade de eu validar através do 'IsNull' cada campo e tratar porém, minha tabela possui muitos campos. Há alguma outra solução menos trabalhosa para este problema sem precisar validar campo por campo? Pesquisei algumas soluções na internet porém não encontrei nada que me ajudasse.
Segue exemplo de uma parte do meu código responsável por alimentar minha ListView:
Código: Selecionar todos
    While Not rs.EOF
        With lv.ListItems.Add(a)
        .Text = Format(rs!ID, "000000")
        .SubItems(1) = rs!razao_social
        .SubItems(2) = rs!nome_fantasia
        .SubItems(3) = rs!cnpj_cpf
        .SubItems(4) = rs!insc_estadual_rg
        .SubItems(5) = rs!bloqueado
        rs.MoveNext
        a = a + 1
        End With
    Wend
rafaelp
Membro
Membro
 
Mensagens: 85
Registrado em: Seg Jun 20, 2016 11:32 am
Has thanked: 26 times
Have thanks: 28 times

{ SO_SELECT }

Re: Dados com Valores 'Null'  [Resolvido]

Mensagempor wagner » Dom Jul 08, 2018 9:19 pm

rafaelp,

Boa noite!

A maneira mais fácil como eu resolvi isso em uma aplicação minha foi atribuindo um valor padrão em cada campo da tabela (no meu caso no Access). Cada campo tem uma linha que se pode configurar o que se quer com valor padrão. Isso se faz ainda em tempo de design dos campos da tabela. Por exemplo: para os campos de texto ou memorandos da tabela eu usei "-" como valor padrão. Isso impede que ao se ler a BASE de Dados o VBA retorne esse erro.
Se a resposta foi útil para você, por gentileza, Amigo, clique na mãozinha ao lado direito da ferramenta CITAR, no canto superior direito.

Atenciosamente
Wagner Morel

For this post the author wagner thanked:
rafaelp (Seg Jul 09, 2018 9:11 am)
Avatar do usuário
wagner
Moderador
Moderador
 
Mensagens: 4406
Registrado em: Sáb Out 20, 2012 12:49 pm
Localização: Fortaleza - CE
Has thanked: 71 times
Have thanks: 1900 times

Re: Dados com Valores 'Null'

Mensagempor rafaelp » Seg Jul 09, 2018 9:32 am

wagner,

Bom dia.

Muito obrigado pela resposta, atendeu perfeitamente!
rafaelp
Membro
Membro
 
Mensagens: 85
Registrado em: Seg Jun 20, 2016 11:32 am
Has thanked: 26 times
Have thanks: 28 times


Voltar para Integração Excel & Access

Quem está online

Usuários navegando neste fórum: Nenhum usuário registrado e 1 visitante