Bonjour,

j'ai suivi vos différents conseils sur le FAQ Access pour passer une valeur d'un formulaire à un autre cependant, il me reste une erreur.
J'ai un formulaire produit ou je peux consulter des produits ou en ajouter. L'ajout se fait par l'évenement NotInList dans une combo qui réfère tous mes noms de produit. Si je rajoute un produit access créer automatiquement un Produit ID.

Dans ce formulaire, j'ai mis un bouton qui ouvre un formulaire qui gère les matérials de chaque produit. C'est pourquoi, j'aimerais quand on click sur ce bouton ouvrir le formulaire en faisant passer l'argument produit ID.

Mon code est le suivant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Private Sub Command47_Click()
 
DoCmd.OpenForm "material",,,,,,[ProduitID]
 
End sub
Ensuite, au chargement de mon formulaire material, j'ai le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Private Sub Form_Load()
 
If IsNull(OpenArgs) = False then
  Me![MaterialProduitID] = Me.OpenArgs
End If
 
End Sub
Tout ceci marche quand j'ai séléctionné un produit dans ma combobox name. Cependant en ouvrant mon formulaire produit je fais un GotoRecord New parce que je veux pas qu'il y ait de produit séléctioné.

Si maintenant je click directement sur le bouton material, j'ai le message d'erreur suivant :

Run-time error '2498'
An expression you entered is the wrong data type for one of the arguments.
Connaissez vous une solution pour remedier à ce problème?

Merci d'avance,

Cordialement