Mise En Page D'une Feuille

[Xena_Boy]

Bonjour,


J'utilise excel pour l'impression de ticket de reçu sur une imprimante thermique mais la dimesin du papeir revient toujours à sa valeur par défaut qui de 80mm x 2970mm.

Y aurait il un code VBA qui me permettrait de régler le mise à longueur du ticket pour l'incorporer à ma macro qui sélectionne mon imprimante thermique.

Grand merci d'avance

Xena_Boy

 

[Excel-lent]

Re : Mise En Page D'une Feuille

Bjr Xena_Boy,

Tu as essayé :

Sub impressionA4()
'pour imprimer sur du papier A4
ActiveSheet.PageSetup.PrintArea = ""
With ActiveSheet.PageSetup
.PaperSize = xlPaperA4
End With
End Sub

Ceci dans le cas où ton imprimante utilise du papier A4, sinon changer la valeur "xlPaperA4" par ...