Discussion :

[Daejung]

Bonjour,

Je voudrais changer le texte d'une étiquette d'un rapport en VBA mais j'ai beau chercher sur le web, je ne trouve pas la solution.

J'essaie par exemple

Code :

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

Me.Étiquette25.Caption = "blabla"

mais un message d'erreur me dit "membre de méthode ou de données introuvable"

Si je mets ce code dans l'évenement "sur chargement" du rapport, cela fonctionne bien, mais je l'ai placé dans une procédure VBA qui ouvre le rapport et en change certaines paramètres

Code :

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

DoCmd.OpenReport .....

Merci pour votre aide

[marot_r]

Bonjour.

Je n'ai jamais fait cela mais essaye dans ta procédure après le docmd.open

Code :

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

reports("NomDURApport").controls("NomTonEtiquette").caption="UneValeur"

sinon, tu peux passer cette valeur en paramètre du docomd.openreport (c'est le dernier paramètre)

et mettre le code suivant dans le rapport :

Code :

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

1
2
3
if not isnull(me.openargs) then
   me.NomTonEtiquette.Caption=me.openargs
end if

En prod., je te recommande de donner un nom significatif à ton étiquette (ex EtiquetteTitreMensuel, ou TitreMenusuel). Cela facilite la lecture et la compréhension de ton code.

A+

[Daejung]

Merci

je venais de trouver justement la même solution ailleurs avec le paramètre OpenArgs: http://www.vbforums.com/showthread.p...OLVED-OpenArgs

et

https://msdn.microsoft.com/fr-fr/lib...ffice.15).aspx

Cela marche très bien

Merci encore