yep ca marche merci !
j'ai un autre pb avec la méthode Range, mais je vais lancer un nouveau post.
Mais voici mon pb tout de même : "la méthode Range de l'objet _Worksheet a échouée"
*** CODE ***
Sub MiseEnPage(sheetName As Worksheet)
sheetName.Activate
sheetName.Range(Cells(1, 1), Cells(3, 2)).Select
End Sub