Bonsoir salisa, davidc57, 🙂
Salisa, ton approche ne me semble pas logique dans l'état actuel de mes connaissances, quand tu demandes une impression en x exemplaires, je ne pense pas qu'on puisse gérer les sauts de pages des différents exemplaires, déjà que sur un classeur ça peut être coton.. 🙂
Je te propose donc une autre approche, c'est d'automatiser ta recopie 19 fois avec les hauteurs de lignes. vois le classeur joint en
Feuil2 tu appuies sur CTRL+Maj+R. ensuite il faudra gérer ta pagination imprimante selon marges etc.. En mettant un saut de page manuel au bon endroit ça doit être bon.
La commande lance la macro suivante :
Sub Macro2()
Dim I As Integer
' Macro enregistrée le 12/05/2006 par Brico
Rows('2:5').Select
Selection.Copy
For I = 1 To 19
Range('A65536').End(xlUp)(4).Select
ActiveSheet.Paste
Next I
Application.CutCopyMode = False
End Sub
Bonne soirée,
Brico [file name=imprimer20.zip size=8090]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/imprimer20.zip[/file]