En poursuivant votre navigation sur ce site, vous acceptez l'utilisation de cookies pour vous proposer des contenus et services adaptés. Mentions légales.

Recherche

Recherche

Les mémos

Je débute...

Visites

 1026502 visiteurs

 2 visiteurs en ligne

Imprimer Word invisible

Pour imprimer un document Word en arrière plan, donc sans voir apparaitre l'application, on peut utiliser la fonction suivante.

On placera cette fonction dans un module général.

Public Function fnPrintHide(sFichier As String)
    '
    ' Syntaxe :
    '
    '  fnPrintHide ("C:\Mes documents\Toto.doc")
    '
    On Error GoTo errPrintHide
    Dim oApp As Object
    Set oApp = CreateObject("Word.Application")
    '
    With oApp
        .Visible = False
        .Documents.Open FileName:=sFichier
        .PrintOut False
        .ActiveDocument.Close
        .Quit
    End With
    '
    Set oApp = Nothing
    '
exitPrintHide:
    Exit Function

errPrintHide:
    Resume exitPrintHide

End Function


 


Catégorie : Les mémos - Automation
Page lue 5335 fois

Vous êtes ici :   Accueil » Imprimer Word invisible