Discussion :

[lololebricoleur]

Bonjour,

J'ai besoin d’exécuter un code VBA avant l'impression d'un état.
J'ai donc choisi un événement dans les propriétés de mon état et saisi le code VBA de ma procédure.
Quand je test avec un aperçu avant impression, cela fonctionne parfaitement.

Mais quand je demande l'impression direct de l'état, la procédure n'est pas exécutée !?
J'ai essayé différents événement mais aucun ne fonctionne en impression directe.

Le code de ma procédure :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub Report_Load()
MsgBox ("4")
 
If Me.INS_QCM_Resultat = 1 Then
 
    Me.Trait_Haut.Visible = True
    Me.Titre.Visible = True
    Me.Sous_Titre.Visible = True
    Me.Trait_Bas.Visible = True
 
Else
 
    Me.Trait_Haut.Visible = False
    Me.Titre.Visible = False
    Me.Sous_Titre.Visible = False
    Me.Trait_Bas.Visible = False
 
End If
 
End Sub

Le code que j'utilise pour imprimer mon état :

Code :

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

If Nbex > 0 Then DoCmd.OpenReport stDocName, acNormal

Vous auriez une solution ?
Merci de votre aide

[marot_r]

Bonjour

Intéressant et surprenant comme problème.

Personnellement j'essaierai de mettre mon code dans OnPrint et/ou OnFormat.

Ces 2 événements devraient être exécuter que ce soit en prévisualisation ou en impression.

A+

[lololebricoleur]

J'ai effectivement vu des choses sur internet concernant ces "événements" mais je ne les trouves ni dans les propriétés de l'état, ni dans la fenêtre VBA.

Comment utiliser et quelle syntaxe dois-je respecter pour les exploiter ?

Merci encore

[madefemere]

Bonsoir Laurent et René,

Laurent,
René veut parler des évènements Au Formattage et Sur Impression de la section "Détail" de ton état.

Cordialement,

[lololebricoleur]

Cool, j'ai encore appris un super truc aujourd’hui grâce à vous messieurs.

Je n'avais jamais vu qu'il y avait des événements spécifiques liés aux sections d'un état !
Je vais me coucher moins stupide ce soir.
J'adore ce forum, dommage que ne puisse pas autant contribuer que les vous.

Merci encore