trouver cellules excel contenant certains caracter

[Oliv]

je souhaiterais connaître une fonction pour savoir si une cellule donnée contient oui ou non un certain type de chaîne de caractere.
par exemple, lequel de ces mots (apparaissant dans une celulle)

'monde'
'mais'
'maj'

contient la chaîne de caractère 'mon'.

'monde' vrai
'mais' faux...

Merci

 

[Philippe]

SALUT,

Cette routine recherche dans la plage A2:J10 les cellules dont le contenu contient le bout de chaine saisi en A1, si le test est 'vrai', le texte de la cellule est coloré en rouge


Sub rech()
chaine = Range('A1').Value
x = Len(chaine)
Range('B1').Value = x
Range('A2:J10').Select
For Each vcel In Selection
test = vcel.Value
vcel.Interior.ColorIndex = 20
If test = '' Then GoTo suit
lon = Len(test)
Range('C1').Value = lon
If lon < x Then GoTo suit
For d = 0 To lon - x
soustest = Right(test, lon - d)
If Left(soustest, x) = chaine Then
vcel.Font.ColorIndex = 3
GoTo suit
End If
Next d
suit:
Next

End Sub


A adapter en fonction de tes besoins...

 

[jocelyn]

Bonjour le Forum,
Bonjour Oliv, Philippe,


en fichier joint un essai avec une formule.

A+
Jocelyn [file name=oliv.zip size=4277]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/oliv.zip[/file]