Bonjour,

J'ai une macro sur excel 2003 qui me permet d'imprimer ma feuille

Je précise que je dispose d'une imprimante qui imprime en recto verso.

Donc je voudrais que lorsque je lance l'impression depuis ma macro, celà imprime ma feuille excel coté recto, et un document pdf coté verso

Mon document pdf est stocké ici : C:\monpdf.pdf

Actuellement voici mon code :

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
23
24
 
Private Sub CommandButtonImprimer_Click()
    Dim X As String
    Dim erreur As String
    erreur = ""
    Dim onBoucle As Boolean
    onBoucle = True
    While onBoucle
        X = InputBox(erreur & " Saisir le nombre de copies à effectuer . ", "Impression")
        If X = "" Then
            onBoucle = False
            Exit Sub
        End If
        If Not IsNumeric(X) Then
            erreur = addRetourLigne("Veuillez insérer un nombre de copie valide.")
        Else
            If X > 0 Then
                ActiveSheet.PrintOut Copies:=X, Collate:=True
            End If
            onBoucle = False
        End If
    Wend
    Exit Sub
End Sub
Merci d'avance