Bonjour
j'ai essayé d'utiliser la macro donné par MichelXLD
Elle m'ouvre bien le fichier Word mais me retourne une erreur n°5
Argument ou appel de procédure incorrect
D'où vient le problème? Le débogage ne m'indique rien en particulier
merci
phoque.r
j'ai essayé d'utiliser la macro donné par MichelXLD
Code:
Sub RemplacerMotDocWord() ' en projet
'necessite d'activer la reference microsoft Word xx.x Object Library
Dim wordApp As Word.Application
Dim wordDoc As Word.Document
Set wordApp = CreateObject("Word.Application")
wordApp.Visible = True
Set wordDoc = wordApp.Documents.Open("C:\Documents and Settings\michel\test.doc")
With wordDoc.Content.Find
.ClearFormatting
.Text = "Insert_communes"
With .Replacement
.ClearFormatting
.Text = "ville"
End With
.Execute Replace:=wdReplaceAll
.Forward = True
.Wrap = wdFindContinue
End With
End Sub
Elle m'ouvre bien le fichier Word mais me retourne une erreur n°5
Argument ou appel de procédure incorrect
D'où vient le problème? Le débogage ne m'indique rien en particulier
merci
phoque.r