[Resolvido]Atualizar campo Data com Null

Pessoal, bom dia!!
Estou precisando, mais uma vez, da ajuda de vocês.

Em alguns casos, ao editar algum registro, é necessário atualizar um campo do tipo data com Null.

Para verificar a funcionalidade, testei o comando em uma consulta com SQL:
  UPDATE Creditos SET DtBaixa = Null WHERE codigo = 1498;

O resultado foi o esperado, funcionou.

Mas quando faço no VBA, ocorre erro de "Violação de Bloqueio":
   strSQL = "UPDATE Creditos SET DtBaixa = Null WHERE codigo = 1498;"
DoCmd.RunSQL strSQL

Abraço.

Boa tarde,
Resolvi após identificar que estava tentando atualizar a Data antes da linha rs.Update do rs.Edit.
With rs
   rs.Edit
       'Aqui atualizo os campos (exceto DtBaixa)
       ' Anteriormente, equivocadamente, estava colocando o código aqui!
   rs.Update
   'Cadastra ou Atualiza a Data da Baixa, permitindo Null
   DoCmd.SetWarnings False
   strSQL = "UPDATE Creditos SET DtBaixa =" & _
   IIf(txtDtBaixa = "", "NULL", "#" & Format(txtDtBaixa, "dd/mm/yyyy") & "#") & _
   " WHERE codcred = " & Me.txtCOD_CREDITO & ";"
   DoCmd.RunSQL strSQL
   DoCmd.SetWarnings True
End with