Discussion :

[shepard01]

Bonjour,

Je cherche le code qui permet de (tous se passe dans le répertoire courant) :
- "scanner" le document en cour (ActiveDocument) Word pour y chercher le marqueur écrit au sein du document : INSERTFQQ . J'ai l'idée d'utiliser un signet comme dans le code ci-dessous.
- "scanner" le dossier où se trouve ce document actif pour y chercher un document Word commençant toujours par : FQQ (ex : FQQ - V1 - test64.docx). Pas fait dans le code ci-dessous.
- "Remplacer" le marqueur INSERTFQQ par le document Word FQQ trouvé précédemment.

J'ai cette piste :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub INSERT_FQQ()
 
Selection.GoTo What:=wdGoToBookmark, Name:="INSERTFQQ"
  With ActiveDocument.Bookmarks
        .DefaultSorting = wdSortByName
        .ShowHidden = True
  End With
 
    Selection.InsertFile FileName:="FQQ - V1 - test64.docx", Range:="", _
    ConfirmConversions:=False, Link:=False, Attachment:=False
End Sub

Merci de votre aide.

[78chris]

BOnjour

Une approche un peu différente mais efficace

http://www.excel-formations.fr/Trucs_astuces/WORD00.php

[shepard01]

@78chris Merci de votre réponse. Malheureusement ceci ne m'aidera pas.