Senhores, bom dia,
Estou com um problema, consigo cadastrar dados apartir de um userform em um banco access 2016 sem problemas
Mas no update, tenho problemas, diz q o banco está em modo leitura.
Vejam minha conexão e imagens para facilitar o entendimento.
Global banco As Database
Global consulta As DAO.Recordset
Sub ConectaBanco()
Windows(ThisWorkbook.Name).Activate
Set banco = OpenDatabase(ActiveWorkbook.Path & "\Data\Cliente.accdb", False, False)
End Sub
NA HORA DE FAZER UPDATE
ComandoSQL = "Select * from tb_Clientes....."
Set consulta = banco.OpenRecordset(ComandoSQL)
With consulta
.Edit
.Fields("Cliente_DataCadastro") = txt_Data
.update
end with
Alguém pode me dar uma dica de onde está o problema?
Imagens em Anexo.
Fiz um vídeo com vários exemplos que funcionam.
No vídeo é usado Update no SQL, em vez de usar o Select.
Se te interessar fazer o Update no SQL, assista a este vídeo:
Em 90% dos casos em que não se anexa o arquivo, ocorrem mal-entendidos, gerando perda de tempo de ambos os lados.
@anderson Obrigadissimo pela sua ajuda e disposição.
Mas encontrei outra dificuldade, vc tem um contato q eu poderia falar com vc, como whats ou email?
Abraços.