Discussion :

[AndréPe]

Bonsoir,
J'ai une appli Access qui contient un formulaire indépendant "frmCotis" qui devrait s'ouvrir à partir du bouton de commande "cmdCot" par le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Public Sub cmdCot_Click()
 frmCotis, acNormal, , , , acDialog, vAnCot

mais je reçois l'erreur d'exécution 2501 "L'opération Openform a été annulée".
vAnCot est un integer. C'est une commande courante, pourquoi cette erreur ?
Auriez-vous une idée ?
Cordialement

[tee_grandbois]

bonsoir,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Public Sub cmdCot_Click()
 frmCotis, acNormal, , , , acDialog, vAnCot

mais je reçois l'erreur d'exécution 2501 "L'opération Openform a été annulée".
vAnCot est un integer. C'est une commande courante, pourquoi cette erreur ?

le nom du formulaire étant un littéral, il faut les guillemets:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Public Sub cmdCot_Click()
 Docmd.OpenForm "frmCotis", acNormal, , , , acDialog, vAnCot

(où est passé la commande Docmd.OpenForm dans le code posté ?)

[AndréPe]

tee_grandbois #
Bonjour et merci de ta réponse.
Je ne comprends pas ce qui s'est passé, car après avoir envoyé ma réponse, je me suis aperçu qu'il manquait le début de la ligne 2 et ai aussitôt fait une rectification.
Où est-elle passée ?
Le code que j'utilise est bien celui que tu suggères.
je cherche toujours l'origine de cette erreur et te tiens au courant.
A+

[hyperion13]

Salut
D'où vient ton argument vAnCot ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Sub cmdCot_Click()
If Not IsNull(vAnCot) Then
Docmd.OpenForm "frmCotis", acNormal, , , , acDialog, vAnCot
End If
End Sub

[AndréPe]

Hyperion13 #
Ce vAnCot est une variable globale interger et a une valeur (2020 ici)

Je n'ai pas encore eu le temps de continuer mes recherches de solution.
merci de vos suggestions.