WORD VBA IMPRIMER TOUT UN RÉPERTOIRE DE FICHIER *.DOC TOUS LES DOCUMENTS D'UN DO
cs_Waldo2188
Messages postés142Date d'inscriptionjeudi 12 février 2004StatutMembreDernière intervention20 mai 2008
-
7 mars 2005 à 11:35
Alazrian
Messages postés4Date d'inscriptionmercredi 9 janvier 2008StatutMembreDernière intervention27 février 2008
-
23 janv. 2008 à 16:14
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
Alazrian
Messages postés4Date d'inscriptionmercredi 9 janvier 2008StatutMembreDernière intervention27 février 2008 23 janv. 2008 à 16:14
J'ai essayé de rajouté comme tu l'a fait pour qu'il n'affiche pas de message d'alerte pour les marges :
objword.DisplayAlerts=wdAlertsNone
Mais rien a faire il me l'affiche quand même.
D'où est-ce que ca peut venir ?
jddz
Messages postés4Date d'inscriptionlundi 14 juin 2004StatutMembreDernière intervention21 décembre 2006 21 déc. 2006 à 21:57
En effet, Il est certain que l'objet Printer dans word 2002 a évolué.
Je ne suis pas en mesure de coder moi même une classe d'accès universelle dans toutes les versions de microsoft office...reste à le tester sous 2007 !
Cette version fonctionne assez bien sous 97.
(en tout cas ma secrétaire ne passe pas sa vie à imprimer des words ///)
grivouille
Messages postés1Date d'inscriptionlundi 6 novembre 2006StatutMembreDernière intervention 7 novembre 2006 7 nov. 2006 à 01:06
C'est vraiment ce que je recherchais!! :-).
Malheureusement je ne parviens (visiblement) pas à le faire fonctionner complètement avec Word 2002 SP3. J'ai une erreur 461 et le débugger pointe sur "Me.cboPrinters" (ligne 225).
Etant néophyte, je ne sais pas s'il sagit d'un problème de compatibilité entre les versions de word, ou si j'ai fait une fausse manoeuvre.
Avez-vous rencontré le même problème ?
Je vous remercie d'avance pour vos réponse et pour le temps que vous y aurai consacré :-).
Bonne journée à vous
59clark
Messages postés1Date d'inscriptionmardi 5 septembre 2006StatutMembreDernière intervention 5 septembre 2006 5 sept. 2006 à 18:24
Bonjour, code impec !!
Sela devrait bien m'aider...
J'aimerais imprimer une liste de fichier contenu dans une table, mais les fichiers ne sont pas tous du type Word, ni office d'ailleur... Pourrais tu m'aider ?
jddz
Messages postés4Date d'inscriptionlundi 14 juin 2004StatutMembreDernière intervention21 décembre 2006 7 mars 2005 à 17:06
Tout est dans cette petite note, où l'on neutralise les alertes cf les paramètres employés.
Biensur ce n'est pas de moi car c'est vraiement chiadé, mais je l'ai découvert sur un truc complètement différement et je l'ai adapté au cas de figure....
'petite note sur print out avec display alert false et background false
'ainsi on n'a pas de message spéciaux types les marges d'impression etc...
Application.ActivePrinter = printer
With Application
.DisplayAlerts = wdAlertsNone
.PrintOut FileName:=docu, Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=nbre, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=False, PrintToFile:= _
False
.DisplayAlerts = wdAlertsAll
cs_Waldo2188
Messages postés142Date d'inscriptionjeudi 12 février 2004StatutMembreDernière intervention20 mai 2008 7 mars 2005 à 11:35
Salut, j'ai trouvé ton code excélent!!!
Mais une chose reste flou, pourrais tu détaillé ta partie du code qui imprime, car je n'est pas tout compris.
En plus tu parle d'une chose qui m'interresse fortement.
(C'est le faite de ne pas avoir de message à propos des marge)
donc si tu pouvais détailler plus ca serai simpas
23 janv. 2008 à 16:14
objword.DisplayAlerts=wdAlertsNone
Mais rien a faire il me l'affiche quand même.
D'où est-ce que ca peut venir ?
21 déc. 2006 à 21:57
Je ne suis pas en mesure de coder moi même une classe d'accès universelle dans toutes les versions de microsoft office...reste à le tester sous 2007 !
Cette version fonctionne assez bien sous 97.
(en tout cas ma secrétaire ne passe pas sa vie à imprimer des words ///)
7 nov. 2006 à 01:06
Malheureusement je ne parviens (visiblement) pas à le faire fonctionner complètement avec Word 2002 SP3. J'ai une erreur 461 et le débugger pointe sur "Me.cboPrinters" (ligne 225).
Etant néophyte, je ne sais pas s'il sagit d'un problème de compatibilité entre les versions de word, ou si j'ai fait une fausse manoeuvre.
Avez-vous rencontré le même problème ?
Je vous remercie d'avance pour vos réponse et pour le temps que vous y aurai consacré :-).
Bonne journée à vous
5 sept. 2006 à 18:24
Sela devrait bien m'aider...
J'aimerais imprimer une liste de fichier contenu dans une table, mais les fichiers ne sont pas tous du type Word, ni office d'ailleur... Pourrais tu m'aider ?
7 mars 2005 à 17:06
Biensur ce n'est pas de moi car c'est vraiement chiadé, mais je l'ai découvert sur un truc complètement différement et je l'ai adapté au cas de figure....
'petite note sur print out avec display alert false et background false
'ainsi on n'a pas de message spéciaux types les marges d'impression etc...
Application.ActivePrinter = printer
With Application
.DisplayAlerts = wdAlertsNone
.PrintOut FileName:=docu, Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=nbre, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=False, PrintToFile:= _
False
.DisplayAlerts = wdAlertsAll
7 mars 2005 à 11:35
Mais une chose reste flou, pourrais tu détaillé ta partie du code qui imprime, car je n'est pas tout compris.
En plus tu parle d'une chose qui m'interresse fortement.
(C'est le faite de ne pas avoir de message à propos des marge)
donc si tu pouvais détailler plus ca serai simpas