Bonjour,
Je travaille dans un hôpital et je suis en train de préparer le support planning 2021 pour les infirmiers.
J'aimerais qu'ils puissent imprimer le planning sur une seule page qui regroupe 2 sections de cellules de la même feuille "ActiveSheet"
J'arrive à générer l'impression des 2 sections mais celle-ci se fait toujours sur 2 pages différentes.
Cela fait 3h que je parcoure le forum et j'ai tout essayé : (fit to page , zoom etc...) mais ca ne fonctionne pas je suis toujours sur 2 pages à l'impression
Voilà ma commande :
Sub PlanningIADE()
'
' PlanningIADE Macro
' Impression du planning encadrement + IADE
'
' Touche de raccourci du clavier: Ctrl+Shift+A
'
ActiveWindow.SmallScroll Down:=-21
Range("A6:AI47").Select
Selection.PrintOut Copies:=1, Collate:=True
End Sub
Sub PlanningIBODE()
'
' PlanningIBODE Macro
' Impression du planning encadrement + IBODE
'
' Touche de raccourci du clavier: Ctrl+Shift+B
'
ActiveWindow.SmallScroll Down:=-21
Range("A6:AI16,A80:AI111").Select
Selection.PrintOut Copies:=1, Collate:=True
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
End Sub
--> Pour le planning IADE je n'ai pas de soucis car les zones de cellules à imprimer sont contigues (A6 à AI16 puis A17 à AI47) donc j'ai mis "A6;AI47)
--> Pour le planning IBODE en revanche les 2 zones ne sont plus contigues donc je renseigne les 2 sections (A6 à AI16 puis A80 à AI111) mais l'impression se fait toujours sur 2 pages différentes
Merci d'avance à ceux qui auront la solution car je dois encore générer les plannings d'autres catégories professionnelles toujours avec cette premiere section de A6 à A16