Discussion :

[devalender]

Bonsoir à tous
je veux imprimer un document word sans ouvrir Word voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
SI xl <> Null ALORS
		xl>>Documents>>Open("C:\EVOLIS\DRAFT\FICHIER.doc") //Fichier Word
		xl>>Visible = Faux
		xl>>ActiveDocument>>Bookmarks("TITREDECIDE")>>Select
		xl>>selection>>Typetext ("TEXTE 1") 
		xl>>ActiveDocument>>Bookmarks("TITRENIVEAU")>>Select
		xl>>selection>>Typetext ("TEXTE 2")
		xl>>ActiveDocument>>SaveAs(monfichierfinal)
		xl>>ActiveDocument>>PageSetup>>Zoom=False
		xl>>ActiveDocument>>PrintOut()
		xl>>Quit()   // Fermeture d'Excel
		libérer xl 
	FIN

Mais j'ai message d'erreur par rapport au code en rouge.

Erreur à la ligne 19 du traitement Clic sur BTN_SansNom1.
Vous accédez au membre Automation Zoom.
Erreur 80020006, Nom inconnu

je doute un peu sur la syntaxe

Merci

[michel.souris]

Bonjour,

As-tu essayé avec OLETrue, OLEFalse ?

[jurassic pork]

hello,
il me semble que la propriété zoom n'existe pas pour word. Elle existe pour excel.


msdn est ton ami

[devalender]

je viens de tenter le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
......
xl>>selection>>Typetext ("TEXTE 2")
xl>>ActiveDocument>>SaveAs(monfichierfinal)
xl>>ActiveDocument>>PrintOut()>>Background=OLEFalse // et xl>>ActiveDocument>>PrintOut()>>Background=faux
......

l'impression est lancé sans ouverture de Word, mais juste après j'ai le message d'erreur suivant.

Erreur à la ligne 19 du traitement Clic sur BTN_SansNom1.
L'objet sur lequel on accède au membre Background n'est pas un objet Automation.

[jurassic pork]

msdn est toujours ton ami

il faut passer des paramètres à printout. Tu as de la chance background est le premier paramètre et les paramètres sont facultatifs. Tu peux essayer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xl>>ActiveDocument>>PrintOut(false)

sinon il faut rentrer tous les paramètres

[devalender]

ok ! je viens de voir de cette pagehttp://msdn.microsoft.com/fr-fr/libr...ice.15%29.aspx.
et j'ai trouvé la solution.
Effectivement xl>>ActiveDocument>>PrintOut(False) marche ! car background est le premier paramètre.

Merci a tous