A voir également:
- Code vba pour imprimer une page word
- Supprimer une page word - Guide
- Word numéro de page 1/2 - Guide
- Espace insécable word - Guide
- Traduire une page web - Guide
- Imprimer tableau excel sur une page - Guide
3 réponses
J'ai trouvé ça mais sans succès :
Sub PrintDocWord()
'
' PrintDocWord Macro
' Macro créée le 27/04/2011 par Administrateur
'
Dim objWord As Word.Application
Dim docWord As Word.Document
Dim Fichier As String
Set objWord = CreateObject("Word.Application") '-- ouvrir une session Word
objWord.Visible = False '-- masquer l'application Word
docWord.PrintOut '-- imprimer le document
docWord.Close '-- fermer le document Word
objWord.Quit '-- fermer la session Word
Set docWord = Nothing '-- détruire l'objet Document
Set objWord = Nothing '-- détruire l'objet Word
End Sub
Il me dit erreur : erreur d'execution 91
variable objet ou variable de bloc with non définie
Sub PrintDocWord()
'
' PrintDocWord Macro
' Macro créée le 27/04/2011 par Administrateur
'
Dim objWord As Word.Application
Dim docWord As Word.Document
Dim Fichier As String
Set objWord = CreateObject("Word.Application") '-- ouvrir une session Word
objWord.Visible = False '-- masquer l'application Word
docWord.PrintOut '-- imprimer le document
docWord.Close '-- fermer le document Word
objWord.Quit '-- fermer la session Word
Set docWord = Nothing '-- détruire l'objet Document
Set objWord = Nothing '-- détruire l'objet Word
End Sub
Il me dit erreur : erreur d'execution 91
variable objet ou variable de bloc with non définie
Utilisateur anonyme
Modifié par argixu le 27/04/2011 à 11:21
Modifié par argixu le 27/04/2011 à 11:21
Bonjour
"Ou si possible un code qui permet de lancer la boite de dialogue qui demande la sélection de l'imprimante. "
et le Ctrl+P ne suffit pas ?
Argitxu
"Ou si possible un code qui permet de lancer la boite de dialogue qui demande la sélection de l'imprimante. "
et le Ctrl+P ne suffit pas ?
Argitxu
