Masquer ligne et imprimer

Re : Masquer ligne et imprimer

Bonjour Aladin,

C'est bizarre! Peux-tu nous montrer ta macro?

Re : Masquer ligne et imprimer

Bonjour Excel-lent et le forum
J' ai réussi a faire mon impression en rajoutant ceci "ActiveSheet.PrintOut" dans ma macro
voici la macro
Sub Masquer_Lignes_Impression()
Sheets("Recap").Select
Application.ScreenUpdating = False
Range("A34").Select
Dim cel As Range
For Each cel In Range("A34:A133")
If cel = "" Then
cel.EntireRow.Hidden = True

End If
Next cel
ActiveSheet.PrintOut
Application.ScreenUpdating = True
End Sub
je l' ai testé aujourd' hui sur du format A3 et ca fonctionne, mais j' ai un souci ayant 2 imprimantes sur mon poste, je suis obligé de parametre l' imprimante au format A3 par defaut sur mon poste. y a t il un moyn de modifier la macro afin qu' elle donne le choix de l' imprimante et aussi dans la macro parametrer les polices afin de reduire à l' impression
Aladin