questions d'écriture VBA

Bonjour à tous,

Je débute dans access et dans l'écriture de code VBA.

Je ne comprend pas pourquoi lorsque j'écris ça (cmdClose nom d'un boutton et forms1 nom du formulaire) :

Code:

---

1 2 3

Private Sub cmdClose_Click() DoCmd.Close acForm, "forms1" End Sub

---

Pourquoi ne veut-il pas fermer le formulaire ?

Même question mais pour ouvrir un état :

Code:

---

1 2 3 4 5

Private Sub print_Click() Dim Nom_Etat As String Nom_Etat = "etat1" DoCmd.OpenReport Nom_Etat, acPreview End Sub

---

Pourquoi ne veut-il pas ouvrir l'état1 ?

Merci

Bonjour,
bienvenue sur DVP :salut:

peux-tu nous en dire un peu plus sur le "ne veux pas ouvrir" stp ?

Souhaites-tu fermer le formulaire en cours ?

Essaie avec

Code:

---

DoCmd.Close acForm, Me.Name, acSaveYes

---

Alors dans les deux cas quand je click sur le bouton rien ne se passe rien, c'est comme s'il ne trouvait pas de code associée au bouton.

Pour le bouton fermer, je veux effectivement fermer le formulaire en cours et pour ouvrir l'état print(déja créé) il ne se passe rien quand je click sur le bouton.

J'ai essayé ce que tu m'as proposé mais cela ne change rien, j'ai l'impression qu'il ne comprend pas les commendes DoCmd.Close ou DoCmd.OpenReport

ok,
en mettant un point d'arrêt dans le code (F9) est-ce que tu peux nous dire si le code est bien lu ?

Non il n'arrive pas a lire le code, Il n'associe pas les codes aux boutons!!

ok,
assure-toi qu'access le relie bien en passant par l'interface de création
Control>Evenement>sur clic> génération code

Super, c'est bon ça marche. Merci bcp!!
Je pensais qu'il allait chercher le code automatiquement quand il etait ecrit.

J'ai une derniere petite question, voila dans mon formulaire j'ai un graphique dynamique que j'ai pu réaliser grâce à votre super tuto mais mon probleme est de savoir comment je pourrai imprimer ce graphique dans un état (a un instant T)

J'ai essayé de faire comme ce qui suit mais je me suis un peu embrouillé :

J'ai créé un premiere variable public :

Code:

---

Public Source_MonEtat As String

---

ensuite j'ai stocké le code source de mon graphique de mon formulaire dans cette variable (je pense que je me suis trompé ici, je veux juste sauvegarder le code sql de mon graphique) :

Code:

---

1 2 3 4 5 6

Private Sub print_Click() Dim Nom_Etat As String Nom_Etat = "graphetat" Source_MonEtat = Me.RecordSource DoCmd.OpenReport Nom_Etat, acPreview End Sub

---

et enfin j'ai essayé de recharger cette variable à l'ouverture de mon etat (qui contient que un graphique)(je veux juste remettre mon code sql dans le contenu du graphique) :

Code:

---

1 2 3

Private Sub Report_Open(Cancel As Integer) Me.RecordSource = Source_MonEtat End Sub

---

Et au final mon etat s'ouvre avec le cadre du graphique mais sans rien dedant puisqu'il ne trouve pas le contenu.

Je pense mettre amélioré en changeant dans le formulaire:

Code:

---

1 2 3 4 5 6

Private Sub print_Click() Dim Nom_Etat As String Nom_Etat = "graphetat" Source_MonEtat = graph.RowSource DoCmd.OpenReport Nom_Etat, acPreview End Sub

---

et dans l'etat :

Code:

---

1 2 3

Private Sub Report_Open(Cancel As Integer) graphetat.RowSource = Source_MonEtat End Sub

---

J'obtient un message d'erreur pour RowSource, comment pourrai-je faire????