Une macro d'impression différente sous wordRésolu

Question

Bonjour,

J'ai un document à imprimer sur une page ordinaire puis sur une page en-tête.

Cela plusieurs fois par heure. 
A chaque fois il faut que je change la configuration des bac. Une fois le bac 2 (papier ordinaire )puis le Bac 3(papier en-tête).

Je commence à saturé. Existe t'il une macro permettant d'automatisé ça ?

Merci.

Dur dur la culture ! Surtout celle de l'esprit.

Bikarfioul · Accepted Answer

J'ai trouvé 

' PRINT_MULTI
' Macro enregistrée le 27/10/2004 par LAFFONT loïc
' La configuration papier de l'imprimante
' réseau doit être ordinaire  pour les
' deux bac d'alimentations
'
    With ActiveDocument.Styles(wdStyleNormal).Font
        If .NameFarEast = .NameAscii Then
            .NameAscii = ""
        End If
        .NameFarEast = ""
    End With
    With ActiveDocument.PageSetup
        .FirstPageTray = wdPrinterLowerBin
        .OtherPagesTray = wdPrinterLowerBin
    End With
    ActiveDocument.PrintOut
    
    With ActiveDocument.Styles(wdStyleNormal).Font
        If .NameFarEast = .NameAscii Then
            .NameAscii = ""
        End If
        .NameFarEast = ""
    End With
    With ActiveDocument.PageSetup
        .FirstPageTray = wdPrinterUpperBin
        .OtherPagesTray = wdPrinterUpperBin
    End With
    ActiveDocument.PrintOut
End Sub

Solution trouvé grace à
http://www.vbfrance.com/forum.v2.aspx?ID=179311

Dur dur la culture ! Surtout celle de l'esprit.

Une macro d'impression différente sous word

1 réponse

Discussions similaires