Discussion :

[DocDen]

Bonjour,

J'ai une appli en VB6 qui alimente une feuille Excel 2000 (à partir d'une table SQL-Serveur) et affiche ensuite l'aperçu-avant-impression d'Excel.

Je voudrais pouvoir garder l'information que la demande d'impression de ma feuille a été faite. (utile pour ma procédure qui doit imprimer automatiquement toutes les feuilles qui ne l'ont pas encore été manuellement)

Y'a t-il un évènement en VBA qui me permettrait de savoir ça ?
J'ai bien essayé WorkBook_BeforePrint, mais c'est exécuté avant l'aperçu-avant-impression...

Le code

Code :

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

Application.Dialogs(xlDialogPrintPreview).show

ne me renvoie aucune valeur.

Merci de vos conseils

[mnarchi]

il suffit d'utiliser la procédure évènementielle suivante:

Code :

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

1
2
3
4
Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Range("A1").Value = Range("A1").Value + 1
    Cancel = True ' annule l'impression (facultatif)
End Sub

[DocDen]

Je te remercie de ta réponse, mais j'ai déjà essayé pas mal de choses avant de poster, notamment ce code.

Le problème est que l'évènement BeforePrint se déclenche avant que l'aperçu-avant-impression n'arrive à l'écran. (en fait juste après l'exécution de la commande "ActiveWorkbook.PrintPreview"). Et il ne se déclenche pas après que l'utilisateur ait appuyé sur le bouton "Imprimer" de l'aperçu...

Une autre idée ?