Me.OpenArgs Null alors que ce n'est pas vrai
Bonjour, tout est dans le titre, j'ai souvent le même problème et il paraît aléatoire, ma raison me dit que ce n'est pas possible et qu'une autre explication doit exister, encore sur un truc simple :
Que j'utilise pour savoir depuis quel formulaire appelant (j'envoie le nom de l'appellant, avec Me.Name ou parfois autre chose, mais c'est toujours une chaine de caractères), Me a été ouvert, or parfois Me.OpenArgs à la bonne valeur et parfois il vaut Null ce qui me fait planté ma procédure d'ouverture.
Exemple:
Appelant
Code:
1 2 3
| Private Sub RECHNOM4_Click()
DoCmd.OpenForm "FPic_Gen_Nav", acNormal, "", "", acEdit, acNormal, "P1"
End Sub |
Appelé
Code:
1 2 3 4 5 6 7 8 9 10 11 12
| Private Sub Form_Open(Cancel As Integer)
Select Case Me.OpenArgs
Case "P0"
Me.RecordSource = "Rq_GenPicP0"
Case "P1"
Me.RecordSource = "Rq_GenPicP0"
Case ...
Case ...
End Select |
Je ne comprends pas comment Me.OpenArgs peut-être Null.