Bonjour,

Lorsque j’exécute le insert into et si la date n’est pas renseigné dans txtDateC j’ai une erreur "Incompatibilité de type" sur cette ligne.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
lstr_DateC = IIf(IsNull(DateUS(txtDateC.Value)), "", DateUS(txtDateC.Value))

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
lstr_DateC = IIf(IsNull(DateUS(txtDateC.Value)), "", DateUS(txtDateC.Value))
 
StrSql = "INSERT INTO [tbl Chèques] (RéfAdhérent, Emetteur, Banque, Montant, N°Chèque, DateC, ObservationsC)" & _
              "values('" & lstr_RéfAdhérent & "'," & Chr(34) & Nz(lstr_Emetteur) & Chr(34) & "," & Nz(lstr_Banque) & ",'" _
              & Nz(lstr_Montant) & "'," & Chr(34) & Nz(lstr_N°Chèque) & Chr(34) & "," & Nz(lstr_DateC) & "," _
              & Chr(34) & Nz(lstr_ObservationsC) & Chr(34) & ");"
 
     DoCmd.RunSQL (StrSql)
Comment exécuter le Insert Into si txtDatec n'est pas renseigné ?

Merci pour votre aide.

Salutations