Bonjour,
j'essaye de mettre une macro pour imprimer plusieurs plages de cellules de plusieurs feuilles dans un fichier unique pdf. j'ai donc mis cette macro :
Sub printtest1trim()
'
' printtest1trim Macro
' Macro enregistrée le 30/08/2009 par Philippe BIRAC
'
'
Sheets("i1").Select
Range("O1:X56").Select
Sheets("i2").Select
Range("O1:X57").Select
Sheets("i3").Activate
Range("O1:X57").Select
Application.ActivePrinter = "CutePDF Writer sur CPW2:"
Selection.PrintOut Copies:=1, ActivePrinter:="CutePDF Writer sur CPW2:", _
Collate:=True
End Sub
lorsque j'execute la macro, seule la dernière plage de la dernière feuille s'imprime dans mon fichier.
Si quelqu'un pouvait m'expliquer ou se trouve mon erreur, je le(s) remercie par avance
Philippe
j'essaye de mettre une macro pour imprimer plusieurs plages de cellules de plusieurs feuilles dans un fichier unique pdf. j'ai donc mis cette macro :
Sub printtest1trim()
'
' printtest1trim Macro
' Macro enregistrée le 30/08/2009 par Philippe BIRAC
'
'
Sheets("i1").Select
Range("O1:X56").Select
Sheets("i2").Select
Range("O1:X57").Select
Sheets("i3").Activate
Range("O1:X57").Select
Application.ActivePrinter = "CutePDF Writer sur CPW2:"
Selection.PrintOut Copies:=1, ActivePrinter:="CutePDF Writer sur CPW2:", _
Collate:=True
End Sub
lorsque j'execute la macro, seule la dernière plage de la dernière feuille s'imprime dans mon fichier.
Si quelqu'un pouvait m'expliquer ou se trouve mon erreur, je le(s) remercie par avance
Philippe