Sélectionner papier à en-tête

**marjo_38** · 01/04/2008, 14h29

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.....
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 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
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("c469").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("c469").Select
Application.ActivePrinter = "\\gresrvr01\GRE_HP_4350_59A sur Ne02:"
Selection.PrintOut Copies:=[T2], Collate:=True
End If
Range("A3").Select

**willybass** · 15/05/2008, 14h36

Bonjour,

Désolé de pas pouvoir t'aider...
pire....
J'AI EXACTEMENT le MêME PROBLEME,
avant de poster ma question je suis tombé sur ton post...
Je m'associe donc à ta requête...si ça te derrange pas ! LOL

willybass

**Pierre Fauconnier** · 15/05/2008, 18h18

Bonjour

Lorsque vous parlez de papier à entête, vous voulez parler de la sélection du bac d'imprimante?

**ucfoutu** · 15/05/2008, 19h04

Envoyé par Pierre Fauconnier

Bonjour

Lorsque vous parlez de papier à entête, vous voulez parler de la sélection du bac d'imprimante?

Très bonne question, en effet, car personnellement j'avais interprêté différemment et ainsi :

Si papier à entête, on n'imprime pas l'entête.
Si papier sans entête, on imprime l'entête.