Bonjour Sylvain,
Normalement, ça marche. "OFFSET" te permet de te déplacer à partir d'un cellule donnée. Dans ton exemple, 2 en bas, 3 à gauche, soit .Offset(2,3) :
ActiveSheet.PageSetup.PrintArea = _
Range("a3", Range("a3").Offset(2, 3)).Address
Bonne journée