Excel - Rechercher et remplacer une plage

Problème

Je veux trouver et remplacer une gamme de valeurs sur Excel?

Quelqu'un peut-il me faire savoir si cela est possible?

Solution

J'ai cela dans mon projet mais je peux remplacer une gamme de cellules.

 Sub ChgInfo () Dim WS en tant que feuille de calcul Dim Search en tant que chaîne Remplacement de la dim en tant que String Dim invite en tant que String Dim Titre en tant que String Dim MatchCase As Boolean MsgBox "Cette option affecte tous les éléments de la feuille de calcul. Elle est créée pour modifier ADM. PERSONNEL, PI / PD NAME ou TITRE DU PROJET uniquement. "& VbCrLf &" Pour plus d'informations, voir: Matrice des procédures de traitement ", vbExclamation + vbOKOnly, " Lire avant "Prompt =" Quelle est la valeur d'origine que vous souhaitez remplacer? " Title = "Entrée de valeur de recherche" Search = InputBox (Invite, Titre) Prompt = "Quelle est la valeur de remplacement?" Title = "Entrée de valeur de recherche" Replacement = InputBox (Invite, Titre) pour chaque WS dans les feuilles de calcul WS.Cells.Replace What: = recherche, remplacement: = remplacement, _ LookAt: = xlPart, MatchCase: = False Next End Sub