Atualizar campo em Branco

Pessoal,
Tenho uma tabela no qual fiz um update porem tenho algumas linhas que ficaram em branco por não conter associação. Gostaria de gerar um segunda consulta no qual verificasse se a linha for em branco copiar a informação da linha acima. No excel sei que existe a função:
=se(A2="";A1;A2).

é possivel fazer isso direto no access via consulta?

Abs

Até pode ter, mas com VBA seria mais simples.

Veja como seria:

Código:

If IsNull(Me.SeuCampo) Then
      Me.SeuCampo = Me.SeuCampoAcima
End If

Marcelo,

neste caso preciso apenas colar esse codigo no VBA, mas como eu executo ele?

Abs

Dando um pitaco   

=se(A2="";A1;A2).

Indo no pensamento do amigo:

no critério da consulta:

=SeImed(A2="";A1;A2)

Abraços

Noob

Essa logica aplica-se apenas no excel correto?

Preciso implementar no Access pois estou gerando todas as consultas de atualização para depois automatizar via macro.

Abs

Como pode ver os dois usam o VBA.

Não, é para o Access, como nunca programei no Excel, nem sei se existem consultas nele.   
Mas atente para a sintaxe, talvez mude um pouco do Access para o Excel.

Abraços


Noob

Access nao entende que A2 é uma linha.

Abs

Aquele pedaço de código vou um exemplo:

Tem que colocar os nomes dos campos da tabela em questão para que funcione.

Me diga quais o nomes dos campos da tabela que quer fazer o critéiro, que mostro como ficará.


Abs

Noob

Noob,

Os camos seriam:

ZOVA_cd_zona_valor_NEW
ZOGL_cd_zona_geografica_localidade_NEW

Abs

Mario

Se o campo na tabela está em branco, a coisa é mais complicadinha.

Para isso faremos uma consulta Atualização  e usamos aquele pedação de código

Na grade dessa consulta, na coluna do campo que está em branco , na linha atualizar para, colocaremos
esse código;

=SeImed(A2="";A1;A2)

O funcionamento é o mesmo do Access:

Se(campo="";Faça isso;senão,faça aquilo)

Entendeu?


Abraços

Noob

Noob,

Utilizando esse criterio em todos os casos que for "is null" será atualizado para um unico valor. Abaixo exemplo do que necessito:

Tabela atual:
Linha Campo1 Campo2
1 100 4
2
3 432 8
4 432 8
5
6
7 878 45

Tabela final:
Linha Campo1 Campo2
1 100 4
2 100 4
3 432 8
4 432 8
5 432 8
6 432 8
7 878 45

Abs

Ficará assim


=SeImed(IsNull([Campo1);432;Campo1)

SE o campo1 for nulo;o valor é 432; caso contrário, mantenha o valor do campo1

=SeImed(IsNull([Campo2);8;Campo2)


Mas vejo que o valor não é repetido em todos os registros, o 100 4 foi repetido.

Abraços


Noob

Esse metodo só funciona se eu tivesse apenas 1 opção de preenchimento. problema que tenho diversos codigos e 100 mil linhas. por isso a necessidade de utilizar uma função em VBA.

Abs

Mario

Sim, se precisa atualizar muitos registros, então é partir para o código.

Para te ajudar com VBA preciso.

Nome da tabela que sofrerá a atualização;
O critério, é quando for nulo, mas quais os valores que serão gravados, quando
esses registros forem nulos e como você pega esses valores.

Aguardo.


Noob

o nome da tabela é: tb_cep

qdo for nulo deve pegar o mesmo valor da linha superior.
no exemplo que descrevi a linha 2 será preenchida com o valor da linha 1 as linhas 4 e 5 com o valor da linha 3

Tabela atual:
Linha Campo1 Campo2
1 100 4
2
3 432 8
4 432 8
5
6
7 878 45

Tabela final:
Linha Campo1 Campo2
1 100 4
2 100 4
3 432 8
4 432 8
5 432 8
6 432 8
7 878 45