Le VB à ses raisons que la raison ignore - Page 2

Je te remercie de me donner cette piste mais serais tu encore plus gentil de poser la partie de l'aide qui m'intéresse car vois tu je suis en entreprise et malheureusement pour l'aide acces vba n'existe pas j'ai bien chercher un fichier sur internet mais pas moyen donc lorsque je cherche un propriété c'est une par une et je ne trouve pas grand chose souvent

Merci de ton aide

je parlais de ce code...

Private Sub cmdListProperties_Click()
ListControlProps Me
End Sub

Public Sub ListControlProps(ByRef frm As Form)
Dim ctl As Control
Dim prp As Property

On Error GoTo props_err

For Each ctl In frm.Controls
Debug.Print ctl.Properties("Name")
For Each prp In ctl.Properties
Debug.Print vbTab & prp.Name & " = " & prp.Value
Next prp
Next ctl

props_exit:
Set ctl = Nothing
Set prp = Nothing
Exit Sub

props_err:
If Err = 2187 Then
Debug.Print vbTab & prp.Name & " = Only available at design time."
Resume Next
Else
Debug.Print vbTab & prp.Name & " = Error Occurred: " & Err.Description
Resume Next
End If
End Sub

Merci bien je me penche dessus

la solution était de bien vérifier dans la table lié au formulaire de saisie que les champs de saisie accepte les Null et surtout les chaînes vides à partir de la le code tout au début est bon sauf qu'il faut mettre v=""
l'inconvéniant de ceci est qu'il faudra tester à chaque fois si les champs de saisie sont bien remplis avant d'enregistrer
sinon msgbox

voila mystère résolus