macro impression

bonsoir les gens,

je viens de me faire une macro pour l'impression de plusieurs sélection de ma feuille mais cela m'imprime toujours que la derniere sélection

voici le code

Sub imprime()
'
' imprime Macro
'

'
Range("D5:Z65,D66:Z127,D129:Z189,D192:Z203").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1
ActiveWindow.SmallScroll Down:=18
End Sub


Merci de votre aide