PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

|
|
|
FR
Inicio → WINDEV 2024 → fermer document ole word
fermer document ole word
Iniciado por wolf.herve, set., 08 2005 9:15 PM - 1 resposta
#1
Publicado em setembro, 08 2005 - 9:15 PM
bonjour,

qui peut m'aider, svp ?

je n'arrive pas a fermer un document word préalablement ouvert ou créé !

voici les differents tests effectués :

:Mail>>Documents(NomDocument)>>Close.SaveChanges = ::wdDoNotSaveChanges

word>>ActiveDocument>>close(Vrai) // Fermeture du document

word>>Quit() // Fermeture de Word

:Mail>>Documents(NomDocument)>>close(Vrai) // Fermeture du document

// fermeture du new document en cours
:mail>>Documents>>close(Vrai)

:mail>>ActiveDocument>>close(Vrai) // Fermeture du document

merci d'avance
Herve
#2
Publicado em setembro, 08 2005 - 10:03 PM
J,avais fait ca pour fermer les mails ouverts de outlook. Il faut juste que tu supprimes ou modifies le test sur KIND




wd est un objet OLE dynamique = ObjetActif("Word.Application")

i est un entier

eNbTotal est entier

//Nombre de documents Word ouverts

eNbTotal = wd>>Documents>>Count()

POUR i=1 A eNbTotal

wd>>Windows(i)>>Activate


//Si ce document Word est un mail alors on le sauve et on le ferme
SI wd>>ActiveDocument>>Kind()=2 ALORS
wd>>ActiveDocument>>Save()
wd>>ActiveDocument>>Close()
eNbTotal--
i--
FIN
FIN
→ Voltar para WINDEV 2024