Le portail francophone de la géomatique

bonjour,
ayant connu des problemes similaires, je me suis servi de SEARCH PLUS, trouve sur le site www.spatialplus.com .
On y trouve aussi COPY PLUS qui permet de recuperer un wor et toutes les tables qui y sont associees dans un meme repertoire (interessant pour la transmission d'info sur CD). et d'autres encore...
En esperant que cela puisse vous aider.
Cordialement,

L'utilisation de macros MS-Word est assez pratique,
il permet d'enregistrer un rechercher remplacer, et par edition du code, d'ajouter d'autres rechercher remplacer, et donc de pouvoir appliquer une liste de rechercher remplacer a n'importe quel fichier en executant la macro...

Un exemple d'utilisation des macros VB de Word :

Sub Remplacer()
'Remplacer Macro
Dim Resultat As Boolean
Resultat = SR( F_dept , France_Departement )
Resultat = SR( C:cartes , H:mappingFrance )
End Sub

Function SR(ByVal Chercher As String, ByVal Remplacer As String) As Boolean
Set wrd = GetObject(, Word.Application )
wrd.DisplayAlerts = wdAlertsNone
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = Chercher
.Replacement.Text = Remplacer
.Forward = True
.Wrap = wdFindAsk
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Function

En demarrant la macro Remplacer(), les occurences specifiees dans le code sont remplacees...

Antoine