rechercher remplacer en VB sur excel

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : rechercher remplacer en VB sur excel

bozoleclown

Bonjour,

je voudrais grace a une macro vb sous excel remplacer tous les "toto" par "tata" dans un tableau mais sans modifier par exemple "toto 2"
j'ai ce script qui fonctionne bien:

Code :

Public Sub Rempl()
Dim feuil As Worksheet
For Each feuil In ThisWorkbook.Worksheets
Cells.Replace What:="toto", Replacement:="tata", LookAt:=xlPart, SearchOrder _
:=xlByColumns, MatchCase:=True, SearchFormat:=False, ReplaceFormat:=False
Next feuil
End Sub

mais le probleme c'est que si il tombe sur une case "toto 2" il va me la remplacer par "tata 2" ce que je ne veux pas.
comment faire en sorte que cela respecte bien la casse?
avec le MatchCase:=True je pensait que ca serait bon mais ce n'est pas le cas.

merci pour votre aide.

Publicité

Marc L

Bonjour,

parce que ce n'est pas un problème de casse mais de logique ‼

Pourquoi avoir paramétré alors LookAt à xlPart ?

bozoleclown

bah je ne sais pas trop, je ne connait pas trop ce langage, j'ai recuperé ce bout de code et essayé de trouver les parametres qui vont bien mais je n'y arrive pas.
donc il faut changer le parametres pour lookat?

edit: ca doit etre xlWhole en fait, je vais test :jap:

Message édité par bozoleclown le 27-01-2014 à 17:22:25

FORUM HardWare.fr

Programmation

VB/VBA/VBS

rechercher remplacer en VB sur excel

Sujets relatifs
Aide exercice VB	Requete SQL en VBA avec Excel
probleme de taille d'un tableau excel envoyé par mail	[VB.NET] Programme d'envoi de paquet
[VB.net] que signifie << ?	Excel 2010 - Ruban disparait lorsque le classeur n'est plus actif
[VBA-Excel] Comment appeler un fichier pour récupérer des données ?	[VB.net] Web service - Redémarrage IIS
ecrire dans un fichier excel	Copie de fichiers video selon lignes tableau Excel
Plus de sujets relatifs à : rechercher remplacer en VB sur excel

Page générée en 0.043 secondes