A l aide Excel 2010 demande de debloguer

Sub imprimer()
With Worksheets("Facture").PageSetup
.CenterHorizontally = True
.PrintArea = "$A$1:$E$40"
.PrintTitleRows = ("$B$1")
.Orientation = x1Portrait
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
Worksheets("Facture").PrintOut
End Sub

erreur d execution 1004

Il me demander de debloguer : Orientation = x1Portrait
que dois je faire
merci de votre soutient

1 réponse

  1. Contributeur
    Bonjour,

    que dois je faire :
    mettre le bon paramètre avec un l (xlPortrait) et non un 1 (x1Portrait)
    0