Bonjour,

J'ai le code suivant pour un bouton retour :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub Retour_Click()
  MsgBox (Me.OpenArgs)
  ' Fermer le formulaire
  DoCmd.Close
 
  ' Ouvrir le formulaire
  DoCmd.OpenForm Me.OpenArgs
End Sub
La MsgBox m'affiche bien le bon nom de formulaire d'origine.
Ensuite j'ai le message suivant :
Erreur d'exécution '5':
Argument ou appel de procédure incorrect
Je lance donc le Débogage qui me signale que l'erreur serait là :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
DoCmd.OpenForm Me.OpenArgs
Je ne vois pas l'erreur de syntaxe

Par contre si je fais ceci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub Retour_Click()
 
  Dim strForm As String
  strForm = Nz(Me.OpenArgs, "")
 
  ' Fermer le formulaire
  DoCmd.Close
 
  ' Ouvrir le formulaire
  DoCmd.OpenForm strForm
End Sub
Là tout va bien.
Est on obligé de passer par une variable ?

Merci d'avance