Discussion :

[loucasse]

Bonjour,

Je souhaite ouvrir un état en filtrant mes enregistrements ET rendre invisible certains contrôles.

J'ai tenté ça, mais ça ne fonctionne pas :

Code :

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

1
2
3
4
5
Private Sub pere_briant_Click()
DoCmd.OpenReport "e_duer", acViewPreview, "Père Briant", "[t_duer]![pere briant]=True", acNormal
Me.via_mistral.Visible = False
Me.via_euros.Visible = False
End Sub

En somme, je voudrais "fusionner" ces deux codes :

Code :

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

1
2
3
Private Sub pere_briant_Click()
DoCmd.OpenReport "e_duer", acViewPreview, "Père Briant", "[t_duer]![pere briant]=True", acNormal
End Sub

et

Code :

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

1
2
3
4
Private Sub Report_Open(Cancel As Integer)
Me.via_mistral.Visible = False
Me.via_euros.Visible = False
End Sub

Merci de votre aide

[loufab]

Bonjour,
Le Report est un objet assez spécial. Il est régi par un moteur interne de préparation.

Pour afficher/cacher et tout simplement interagir avec l'affichage le formatage pendant à la préparation il faut utiliser l'évènement Sur Formatage de la zone qui contient le contrôle à gérer.

A l'inverse le formulaire doit utiliser le Sur activation, la mise en forme conditionnelle ou encore d'autres événements particulier.

cordialement,

[loucasse]

Merci madefemere,

C'est exactement cela.

Merci bcp!

[madefemere]

Bonjour,

Du genre :

Code :

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

1
2
3
4
5
Private Sub pere_briant_Click()
DoCmd.OpenReport "e_duer", acViewPreview, "Père Briant", "[t_duer]![pere briant]=True", acNormal
Reports!e_duer.via_mistral.Visible = False
Reports!e_duer.via_euros.Visible = False
End Sub

Explication : ton Me ici faisait référence à l'objet appelant (formulaire je pense), mais non à l'objet qui vient d'être ouvert (l'état)

Cordialement,