[VB] Comment fermer un document Word ?

Comment fermer un document Word ? [VB] - Programmation

Marsh Posté le 09-08-2001 à 10:19:05    

quelle est la commande pour fermer un document Word ?
Merci


---------------
Une ptite aide en VB et jVBien
Reply

Marsh Posté le 09-08-2001 à 10:19:05   

Reply

Marsh Posté le 09-08-2001 à 12:18:56    

A partir d'Excel ?!?!?!?
 
T'as trouver une soluce pour ton autre problème ??

Reply

Marsh Posté le 09-08-2001 à 12:32:53    

oui en fait  j'ouvre un document word classique  
puis je lance une macro qui est dans ce document classique  
et cette macro me fais la copie de mon big document Word sans publipostage puis ce que je ve c'est ferme ce document Word classique ...personnne a besoin de voir ca LOL
 
si je fais blabla.Application.Visible = false  ca me ferme tt  
mais ca je ne ve pas  il fo que la copie sans publipostage reste ouverte et que le document Word classique se ferme
Quelle est la commande VB ?


---------------
Une ptite aide en VB et jVBien
Reply

Marsh Posté le 09-08-2001 à 12:36:09    

Pour finir oui c'est a partir d'execl que je ve fermer se document Word


---------------
Une ptite aide en VB et jVBien
Reply

Marsh Posté le 09-08-2001 à 13:18:41    

Tu fais comment pour l'ouvrir (syntaxe), parce que si tu sais l'ouvrir, tu dois savoir le fermer...

Reply

Marsh Posté le 09-08-2001 à 13:31:19    

Wordoffer = ThisWorkbook.Sheets("files" ).[fileessai]
 
Set Woffer = GetObject(, "Word.Application" )
Set Woffer = GetObject(ThisWorkbook.Path + "\" + Wordoffer)
Woffer.Application.Visible = True   Woffer.Application.Activate    
 
Avec WordOffer  le non du .doc  par ex  essai.doc


---------------
Une ptite aide en VB et jVBien
Reply

Marsh Posté le 09-08-2001 à 13:43:44    

Woffer.Application.ActiveDocument.Close
 
Trois paramètres :
 
SaveChanges : Optional Variant. Specifies the save action for the document. Can be one of the following WdSaveOptions constants: wdDoNotSaveChanges, wdPromptToSaveChanges, or wdSaveChanges.
 
OriginalFormat : Optional Variant. Specifies the save format for the document. Can be one of the following WdOriginalFormat constants: wdOriginalDocumentFormat, wdPromptUser, or wdWordDocument.
 
RouteDocument : Optional Variant. True to route the document to the next recipient. If the document doesn't have a routing slip attached, this argument is ignored.

Reply

Marsh Posté le 09-08-2001 à 14:16:51    

Merci bcp ca marche J'ai un peu galerer pour le placer au bon endroit mais c'est ok  Merci :jap:  
 
une autre ptite question stpl
 
Si je veux enregistrer un fichier WORD qq part je suis oblige de presiser un chemin ... logique  
excel saura l'ouvrir ... puisquil connait le chemin  mais si je change d'ordi les chemins ne seront plus valides est excel plante .. logique
 
N'y a t il pas une commande sous VB (Word) similaire a la commande Excel
 
Woffer.SaveAs Filename:=ThisWorkbook.Path + chemin + nom
 
Merci bcp


---------------
Une ptite aide en VB et jVBien
Reply

Marsh Posté le 09-08-2001 à 14:23:11    

J'peut toujours faire une petite recherche mais ça je ne sais pas...

Reply

Marsh Posté le 09-08-2001 à 14:30:08    

ok c'est trop simpa Bendes  
tu me sauves la vie tu pe pas savoir
 
je vais essayer comme pour excel  avec thisWorkbook  on verra


---------------
Une ptite aide en VB et jVBien
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed