VBA - décalage entre prévisualisation d'impression PDF et PDF obtenu

Bonjour à tous,

Je cherche à réaliser un PDF à partir d'une plage de cellule séléctionnée par un utilisateur.

Le code suivant fonctionne et permet d'obtenir une pré-visualisation du fichier PDF :

Private Sub CommandButton1_Click()

With Sheets("TEST")
Selection.BorderAround _
ColorIndex:=1, Weight:=xlMedium
     .PageSetup.PrintArea = Selection.Address
     .PrintPreview
End With

End Sub

Mon problème est qu'il y a un décalage entre la pré-visualisation et le fichier obtenu : la délimitation des pages semble être différente. Alors que les pages sont correctement ajustées sur la pré-visualisation elles ne le sont plus une fois le PDF enregistré.

Auriez-vous une solution pour résoudre ce problème ?

Bonjour,

Avez-vous le problème quand vous faites la manipulation manuellement ? Car a mon avis il s'agit d'avantage d'un problème de publipostage classique (marges, etc) plutot que de VBA.