|
|
|
|
1- ajouter dans Excel la bibliothèque : Microsoft Word Object Library
Sub liste_docsword()
On Error GoTo erreur_liste
' crée l'objet application Word
Set appli_word = Word.Application
Dim docword As Document
' examine les documents ouverts
For Each docword In appli_word.Documents
liste_docs_ouverts = docword.Name & "," & liste_docs_ouverts
Next docword
' fin traitement
Exit Sub
' routine erreur
erreur_liste:
MsgBox Err.Description
End Sub
|
Convertir un fichier word avec pdf Copier une partie d'un fichier pdf sur un fichier word Fichier nrg ouvrir Fichier pps ouvrir Fichier word ne s'ouvre pas Fichier wps ouvrir Fichier xtm ouvrir Impossible d'ouvrir un pdf nom fichier trop long Impossible d;ouvrir fichier word des problenes ont ete deceles Lenteur ouverture fichier word 2007 Nom fichier dans document word Ouvrir un fichier word avec open office Probleme ouverture fichier word Récuperer un fichier word ouvert mais non enregistré Savoir si un fichier est ouvert vba Transformer fichier word en jpeg Vba excel protextion fichier à l'ouverture Vba nom fichier word
