Re : Automatiser une impression
Bonjour koukou, savertoo, le Forum,
Un essai avec zones nommées tata, titi, toto :
Sub LanceImpression()
Application.Goto Reference:="tata"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Application.Goto Reference:="titi"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Application.Goto Reference:="toto"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("A1").Select
End Sub
Bonne journée à vous tous