Discussion :

[delisle59]

Bonjour,

J'ai du code VBA sur chargement d'un état.

Le code s'exécute bien en mode preview: DoCmd.OpenReport "rptOuvertureProjet, acViewPreview" mais pas si j'imprime directement: DoCmd.OpenReport "rptOuvertureProjet"

Il est important pour moi de savoir si l'usager a bien imprimé l'état.

Si j'ouvre en mode preview, comment savoir si l'usager a bien imprimé l'état et ne l'a pas fermé sans imprimer
Si j'imprime directement comment faire pour exécuter le code?

Merci de votre aide
Patrice

[ClaudeLELOUP]

Bonjour,

J'ai du code VBA sur chargement d'un état.

Nouveauté depuis Access2000 ou bien tu parles d'un autre événement ?

[delisle59]

Bonjour et merci,

J'utilise Access 2010 et j'ai bien l'événement sur Chargement

J'utilise cette entourloupe pour forcer Access à exécuter mon code:

DoCmd.OpenReport "rptOuvertureProjet", acViewPreview
DoCmd.OpenReport "rptOuvertureProjet"
DoCmd.Close acReport, "rptOuvertureProjet"

Ça fonctionne mais j'aimerais procéder d'une façon conforme. J'ai tenté de procéder autrement en transférant mon code à l'événement sur Ouverture mais ça plante ici:
Me.NomProjet = DLookup(...) Access me dit que je ne peux attribuer de valeur à cet objet alors que je le peux sur chargement!

[ClaudeLELOUP]

Mais que veux-tu faire au juste ? Modifier ton état (la source de NomProjet) avant de l'exécuter ?

[delisle59]

Mon état n'a pas de source. Pour ce faire il faudrait que je crée une requête d'analyse croisée.

Ce que je vais tenté de faire

[ClaudeLELOUP]

Ton état n'a pas de source. OK. Mais les contrôles de ton état ont une propriété Source contrôle que tu essaies probablement de garnir quand tu écris

Code :

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

Me.NomProjet = DLookup(...)

Donne plus de détails sur ce que tu veux faire, si tu veux que l'on t'aide.

[delisle59]

Tous les contrôle de mon état son indépendant

Sur chargement le code passe par tous les contrôles de l'état et leurs attribuent des valeurs

Mon problème c'est que le code s'exécute uniquement en mode preview:
DoCmd.OpenReport "rptOuvertureProjet", acViewPreview
L'État s'affiche avec les bonnes valeurs. Parfait
Je peux l'imprimer. Ça imprime avec les valeurs. Parfait
Mais comment savoir si l'usager a vraiment imprimer l'état?

Je me suis dit: Pas besoin d'afficher l'état puisqu'il a été validé par l'usager. Juste l'imprimer avec la commande:
DoCmd.OpenReport "rptOuvertureProjet"
Oups... le code ne s'exécute pas?
et je ne sais pas pourquoi

Je peux garder mon entourloupe
DoCmd.OpenReport "rptOuvertureProjet", acViewPreview
DoCmd.OpenReport "rptOuvertureProjet"
DoCmd.Close acReport, "rptOuvertureProjet"

de cette façon ça fonctionne
Mais je vais créer une requête croisée et en faire la source de mon état. Ce sera plus conforme. Je ferai le suivi sur le forum.