Bonjour Dgé, le Forum
Pour ta question, c'est assez difficile de te répondre, car :
Soit tu parles d'action faites directement par Word (style une Impression de Contrat), là Excel n'y pourra rien !!!
Soit tu parles d'action pilotée par Excel sur des fichiers Word, et là évidemment c'est très différent !!! Mais il faut tout de même un assez haut niveau de connaissance en programmation pour piloter Word depuis une Interface Excel.
Soit Tu parles d'un petit ultilitaire qui te listerait tes fichiers Word dans Excel en vu de statistique sur la liste des documents Word ce genre de Code dans un Module Standard Excel pourrait te servir :
Option Explicit
Const Chemin As String = "C:\Mes Documents\" '<<< A adapter of Course !
Sub ListWorldDoc()
Dim NomPropre() As Variant
Dim ChercheFichier As FileSearch
Dim i As Integer
Set ChercheFichier = Application.FileSearch
With ChercheFichier
.NewSearch
.Filename = "*.doc" '<<< on peut chercher une String partielles "*Toto*.doc"
.LookIn = Chemin
.SearchSubFolders = False '<<< Changer Pour TRue pour "scruter" les S/répertoires...
.Execute msoSortByFileName, msoSortOrderAscending
If .Execute > 0 Then
With .FoundFiles
For i = 1 To .Count
Cells(i, 1) = Dir(.Item(i))
Next i
End With
Else
MsgBox "Pas de Fichier trouvé dans " & Chemin
End If
End With
End Sub
Il listera sur la feuille Excel active tous les fichiers avec extension ".doc" dans le répertoire... Attention il parait que sur les premières versions de Windows XP, la méthode FileSearch bug ! (à vérifier)
Voilà, sinon il faut voir du Coté VBA sous Word mais nous ne sommes pas spécialisé...
Bon Week End
@+Thierry