Discussion :

[AdiAccess]

Bonjour,
Je souhaite ouvrir un état lorsque je clique sur le bouton état de mon formulaire. Dans plusieurs variables je stocke des données. Je souhaite que ces données s'affichent dans les zones de texte. Pour cela j'utilise le code suivant:

Code :

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

1
2
3
4
 
Private sub Etat_Click()
DoCmd.OpenReport "Etat Iso", acViewPreview
Reports![Etat Iso].txtetat=mavaleurdevariable

mon état s'ouvre bien, mais le champ txtetat est vide.
J'ai remarqué qu'en passant en mode création et à nouveau en mode affichage la valeur du champ txtetat contient bien la valeur qui se trouve dans la variable mavaleurdevariable!

existe t'il un code vba permettant de forcer une mise à jour de l'état?
ou que fraudrait-il faire?

Merci beaucoup pour votre aide
Adiaccess

[Invité]

Bonjour

Ne mets pas ton code

Code :

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

Reports![Etat Iso].txtetat=mavaleurdevariable

dans ton formulaire, mets le dans ton Etat.

Dans celui-ci, essayes sur les évènements

Code :

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

Private Sub Report_Open(Cancel As Integer)

ou

Code :

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

Private Sub Report_Page()

Bien sûr ta variable doit être déclarée en Public.

Sinon, utilises le dernier paramètre de ton instruction DoCmd.OpenReport .., un petit coup de pour plus d'explications.

Tu récupères la donnée de l'autre coté (dans ton état) avec

Code :

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

Me.txtetat= me.OpenArgs

Starec

[AdiAccess]

Bonjour Starec,

J'ai bien essayé plusieurs fois, mais rien à faire je n'y arrive pas.
Tel que je comprends la chose j'ai:

Un premier code qui fait partie du code du formulaire qui me permet d'ouvrir l'état à partir du formulaire

Code :

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

1
2
3
Private Sub ETAT_Click()
DoCmd.OpenReport "Etat1", acViewPreview
End Sub

Et tel que je comprends ton explication il faudrait que je rajoute dans le code de l'état:

Code :

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

1
2
3
Private Sub Report_Open(Cancel As Integer)
Reports![Etat1].txtetat = gb_Pression
End Sub

gb_Pression est une variable public

Merci pour votre aide
AdiAccess

[AdiAccess]

J'ai trouvé,
en ayant une variable public, ex gb_Pression,

dans le code de l'état il faut saisir:

Code :

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

1
2
3
Private Sub ZoneEntêtePage_Format(Cancel As Integer, FormatCount As Integer)
Reports.etat1.texte.Value = gb_Pression
End Sub

Il faut bien faire attention dans quelle zone on travail:
ZoneEntêtePage, Détail etc...
vous pouvez sélectionner la zone et regarder le nom dans les propriétés.