2011-01-21 8 views
0

J'ai besoin d'écrire et d'exceler macro pour rechercher une chaîne et le remplacer par un autre ... comment puis-je faire cela? AIDE:/macro Excel pour rechercher une chaîne spécifique

+0

Je pense que vous devez spécifier plus d'informations. Où avez-vous besoin de rechercher la chaîne? Avez-vous déjà du code ou avez-vous besoin de conseils pour commencer? – froeschli

Répondre

2

Vous pouvez enregistrer ces opérations et Alt + Maj + F11 pour ouvrir l'éditeur de script, puis faire référence au code généré par l'enregistreur. Je pense que cela peut vous donner quelques indices.

Et je pense que vous n'avez pas besoin d'utiliser Macro. Il suffit d'utiliser l'élément de menu "Rechercher et remplacer" et choisissez l'option souhaitée.

+0

il me donne le code absolu pour chaque cellule pas un code extensible à la feuille de calcul entière. – user434885

+0

aussi j'ai besoin de rechercher chaque ligne et remplacer les valeurs avec dans chaque cellule, par exemple. 1-abc 344-abc 455-abc sont des cellules différentes, mais j'ai besoin de remplacer abc, Excel n'a pas la fonction de recherche et de remplacement pour cela. atleast pas en fonction en 2007 – user434885

2

Utilisation de l'interface utilisateur dans Excel 2007

  1. Sélectionnez la cellule A1
  2. Cliquez sur l'onglet Accueil dans le ruban
  3. Cliquez sur 'Trouver & Sélectionnez' icône et sélectionnez 'Remplacer'
  4. Cliquez sur le bouton 'Options'
  5. Entrez le texte pour rechercher 'abc' dans la boîte 'Find What'
  6. Entrez le texte à remplacer « abc » avec la « Remplacer par » boîte
  7. Assurez-vous que les cases à cocher ne sont pas cochés
  8. Assurez-vous que l'intérieur = feuille, recherche = Par ligne et regarder dans = formules
  9. Cliquez sur 'Remplacer tout' bouton

Replace screenshot


en utilisant VBA Code

Sub Replace_abc() 

    Sheets("Sheet1").Select 
    Range("A1").Select 
    Cells.Replace What:="abc", Replacement:="def", LookAt:=xlPart, _ 
     SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ 
     ReplaceFormat:=False 

End Sub 
Questions connexes