Sam35
-
7 nov. 2001 à 09:30
msohet
Messages postés76Date d'inscriptionmardi 14 janvier 2003StatutMembreDernière intervention 3 mai 2005
-
15 sept. 2003 à 09:10
Voilà mon code :
Set MyApp = CreateObject("Word.Application")
MyApp.Visible = False
MyApp.displayAlerts = wdAlertsNone
MyApp.Documents.Open (Fich)
MyApp.Activedocument.PrintOut
' Do Until MyApp.BackgroundPrintingStatus <> 0
' Loop
MyApp.Activedocument.Close
MyApp.Quit
le problème est qu'avec ce code je ferme Word avant la fin du lancement de la tâche d'impression
ce qui génère un message qui demande si ont veut vraiment fermer l'application si on dit Oui, l'impression ne se fait pas.
J'ai bien essayé de faire une boucle d'attente, mais le résultat n'est pas convainquant.
msohet
Messages postés76Date d'inscriptionmardi 14 janvier 2003StatutMembreDernière intervention 3 mai 2005 15 sept. 2003 à 09:10
Même tarvail à réaliser, même probléme, même déception avec la fonction backgroundprintingstatus (soit dit en passant cette fonction gére la file d'attente d'une imprimante locale, pas de gestion d'imprimante réseau !!).
Si kelkun s'est déja sorti de ce m...... qu'il nous fasse signes.