Discussion :

[curt]

Bonjour à tous,

je souhaite provoquer la fermeture d'un Etat "aperçu" après un temps donné.
J'ai mis le code suivant sur l'évènement minuterie

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Report_Timer()
On Error GoTo Report_Timer_Err
 
    DoCmd.Close acReport, "PrnBilanDiffusion"
 
 
Report_Timer_Exit:
    Exit Sub
 
Report_Timer_Err:
    'MsgBox Error$
    Resume Report_Timer_Exit
 
End Sub

et réglé la minuterie à 1000 ....
et rien ne se passe. L'aperçu ne se ferme pas...

Quelqu'un pourrait me dire ce qu'il manque au code (ou peut-être la méthode n'est pas la bonne..)

D'avance merci.
Curt

[LE VIEUX]

salut,
cela devrait suffire

Code :

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

1
2
3
4
Private Sub Report_Timer()
DoCmd.Close
 
End Sub

attention ça ne marche pas sur aperçu avant impression ce qui est logique !

[curt]

Bonjour,

j'avais déjà essayé mais ça ne fonctionne pas.
merci tout de même.

[LE VIEUX]

y a pas de quoi,
j'ai testé et mon code marche, donc si 2 codes ne marchent pas ça vient peut-être pas des codes.....
bon courage,

[curt]

Bon à priori on ne peut pas (Voir http://loufab.developpez.com/splashscreen/ où il est indiqué que ça n'est applicable qu'au formulaire).

Effectivement, le même code sur les formulaires fonctionne. Pas sur les "Aperçu avant impression".

Si quelqu'un peut confirmer ça.
Bonne soirée.
Curt

[LE VIEUX]

ay,
peut être tous le monde il a raison,
tu es sur quelle version d'access, je suis sur 2007 et je peut te confirmer que ça marche.
verifie sur la propriété de ton état si tu as bien les évènements sur minuterie et sur intervalle minuterie. s'ils y sont en mettant 1000 sur intervalle et le code que je t'ai donné sur minuterie je ne vois pas pourquoi cela ne marcherait pas.

[curt]

J'ai trouvé.
Sur "aperçu avant impression" ça ne fonctionne pas.
Il faut se mettre en "mode état".

Ps: j'utilise Access 2007