Bonjour à tous,

Après environ une dizaine d'heures de recherche, je me tourne vers ce forum pour trouver de l'aide.

Voici mon problème : j'ai besoin de faire un rechercher/remplacer mais pas dans un fichier, c'est dans une fenêtre ouverte d'une application OMNIS. Cette application OMNIS me génère des fiches de travail mais dans ces fiches il y a des références incompréhensibles et je veux faire des recherches/remplacer sur ces références pour qu'elles deviennent compréhensibles pour l’atelier de production. J'ai donc installé un logiciel de raccourcis clavier qui permet de lancer un fichier VBS en faisant par exemple : "WIN + H". Mon problème est que maintenant il faut que j'écrive le code du fichier VBS.

J'ai trouvé plein de truc mais toujours pour Word, Excel ou alors sur des fichiers texte.

Je me tourne vers vous pour trouver la solution.

J'avais trouvé ceci :
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
18
 
Selection.Find.ClearFormatting
			Const wdFindContinue = 1
			Const wdReplaceAll  = 2
   Selection.Find.Replacement.ClearFormatting
   With Selection.Find
        .Text = "A chercher Ref : M1256ST58475"
        .Replacement.Text = "remplacer par VIS M5"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
Merci pour votre aide