Início
![[Resolvido]Procurar e alterar campo específico na tabela. Empty](https://2img.net/i/empty.gif)
clemerson 8/2/2022, 18:16Boa tarde a todos. Preciso de ajuda para resolver uma questão no bando de dados. Tenho uma tabela que armazena registros em um campo chamado[Documento].Gostaria de fazer uma busca em todos os registros da tabela que tivessem o mesmo número no campo [Documento] e deletar ou adicionar a expressão "Quitado" no campo [situacao] para ou excluir de vez da tabela ou deixar marcado como "Quitado".
Estou usando o exemplo abaixo, ele até executa o comando ,mas se houver 3 linhas com o mesmo número de documento ele só marca o primeiro como quitado
Dim i As Variant
i = DLookup("[Documento]", "Areceber", "[Documento] = '" & [txtdoc2] & "'")
If i > 0 Then
[situacao] = "quitado"
End If
Estou usando o exemplo abaixo, ele até executa o comando ,mas se houver 3 linhas com o mesmo número de documento ele só marca o primeiro como quitado
Dim i As Variant
i = DLookup("[Documento]", "Areceber", "[Documento] = '" & [txtdoc2] & "'")
If i > 0 Then
[situacao] = "quitado"
End If
Marcar tópico como Resolvido: ![[Resolvido]Procurar e alterar campo específico na tabela. Setinf11](https://i.servimg.com/u/f50/19/64/99/05/setinf11.png)