Discussion :

[littlepower]

Bonour, comme le titre l'indique, mon objectif est d'ouvrir un modèle word qui est dans le même dossier que mon classeur excel. Dans le fichier word je veux remplacer le mot identification par le nom des personnes concernées. Bref je veux rechercher du texte et le remplacer par autre chose. J'ai essayer selection.find, mais on m'écrit toujours une erreur à la pemière ligne de mon selection.find. Merci de votre compréhension.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
word.Visible = True
 
        Set nouveau_word = word.Documents.Add(Template:=modele)
 
        Selection.Find.ClearFormatting
        Selection.Find.Replacement.ClearFormatting
 
        With Selection.Find
            .Text = "identification"
            .Replacement.Text = ""
            .Forward = True
            .Wrap = wdFindContinue
            .Format = True
 
        End With
 
        Selection.Find.Execute

[Theze]

Bonjour,

Je ne suis pas trop habitué à manipuler Word mais regarde avec un signet sur ton mot, la recherche sera peut être plus facile.

Hervé.