Executer une macro a l'impression

Bonjour,

est il possible d'executer une macro a l'impression du document, et quel est la marche a suivre?

Merci d'avance.

Salut Graham et le forum.

Avant l'impression du document, code à placer dans ThisWorkbook

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Ton code à excécuter
End Sub

Mytå

Une autre posibilité, tu gères toi même le contrôle de l'impression

Sub Impression()
'Traitement du fichier
Sheets("Feuil1").PrintOut
'Suite du traitement
Sheets("Feuil1").PrintOut
'....
End Sub

Mytå

bonjour j'ai testé le code suivant

Private Sub Workbook_BeforePrint(Cancel As Boolean)

'Ton code à excécuter

For i = 30 To 313

With Sheets("PRODUITS")

If Range("I" & i).Value = "" Then

Rows(i).EntireRow.Hidden = True

End If

End With

Next i

End Sub

ça fonctionne. Mais je voudrais savoir.

- ça lance la macro avec le bouton "Aperçu" peut on ne pas lancer la macro avec (juste avec "impression") ?

2ème chose :

je masque des lignes avec cette macro. Est ce que je peux dans la même fouler (ça veut dire une fois l'impression

effectuée). réafficher mes lignes avec donc la même macro?

merci pour votre aide.

je sais que c'est un vieux sujet mais il n'y a pas une âme charitable pour m'aider