Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment créer un code de macro pour atteindre trouver et remplacer le texte dans Excel?

Normalement, nous utilisons la fonction intégrée Rechercher et remplacer pour rechercher et remplacer des valeurs dans Excel. En fait, vous pouvez trouver et remplacer du texte dans Excel directement avec le code de macro. Dans cet article, vous apprendrez comment créer un code de macro pour obtenir du texte trouvé et remplacé dans Excel.

Créer un code de macro pour atteindre le texte trouvé et remplacer dans Excel


Créer un code de macro pour atteindre le texte trouvé et remplacer dans Excel


Veuillez procéder comme suit pour créer un code de macro afin de trouver et remplacer du texte dans Excel.

1. appuie sur le autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Copiez ensuite le code VBA dans la fenêtre de code.

Code VBA: créer un code de macro pour obtenir le texte trouvé et remplacer dans Excel

Sub FindandReplaceText()
'Update by Extendoffice 2018/5/24
    Dim xFind As String
    Dim xRep As String
    Dim xRg As Range
    On Error Resume Next
    Set xRg =Cells
    xFind = Application.InputBox("word to search:", "Kutools for Excel", , , , , 2)
    xRep = Application.InputBox("word to replace:", "Kutools for Excel", , , , , 2)
    If xFind = "False" Or xRep = "False" Then Exit Sub
    xRg.Replace xFind, xRep, xlPart, xlByRows, False, False, False, False
End Sub

3. appuie sur le F5 clé pour exécuter le code.

4. En premier Kutools for Excel boîte de dialogue, entrez le texte ou la valeur que vous recherchez, puis cliquez sur le OK bouton. Voir la capture d'écran:

5. Dans la seconde Kutools for Excel boîte de dialogue, entrez le texte ou la valeur que vous allez remplacer et cliquez sur le OK .

Ensuite, tous les textes spécifiés sont remplacés par le texte souhaité immédiatement.

Note: Ce code est appliqué à la feuille de calcul active.


Articles Liés:



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.