Imprimer sur papier à en-tête

marjo_38

XLDnaute Nouveau
Bonjour,

J'ai une macro d'impression dans laquelle je voudrais séléctionner dans Impression propriété le type "Papier à en-tête" mais je n'y arrive pas.....:confused:
Sans cela ma macro d'impression n'a plus d'întéret...
Est-ce que quelqu'un peux m'aider????
Merci d'avance
Voici ma macro :

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Imprimer.Hide
Range("T1").Value = Imprimer.ComboBox1.Value
Range("T2").Value = Imprimer.ComboBox2.Value
If Imprimer.ComboBox1.Value <> "" Then
Range("c4:eek:69").Select
Range("m5") = "[Duplicata]"
Application.ActivePrinter = "\\gresrvr01\GRE_HP_4350_59A sur Ne02:"
' C'est ici qu'il faudrait que je selectionne le type "papier à en-tête
Selection.PrintOut Copies:=[T1], Collate:=True
Else: Range("T1") = ""
End If
If Imprimer.ComboBox2.Value = "" Then
Range("T2") = ""
ElseIf ComboBox2.Value <> "" Then
Range("M5") = "[Original]"
Range("c4:eek:69").Select
Application.ActivePrinter = "\\gresrvr01\GRE_HP_4350_59A sur Ne02:"
Selection.PrintOut Copies:=[T2], Collate:=True
End If
Range("A3").Select
 

Discussions similaires

Réponses
5
Affichages
805

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 595
Messages
2 090 094
Membres
104 374
dernier inscrit
cheick.coulibaly@dcsmali.