Chercher une chanine de caractéres dans une cellule avec VBA ?

T

thebenoit59

XLDnaute Accro

• 23 Juin 2016

• #2

Re : Chercher une chanine de caractéres dans une cellule avec VBA ?

Bonjour Seb.
Tu peux essayer ainsi :

Code:

Dim crit$, i%
crit = "<var:_"

With Sheets("TRADUCTION")
For i = 3 To 50
If .Cells(i, 2).Value Like "*" & crit & "*" Then .Activate:  .Cells(i, 2).Select: MsgBox "J'ai trouvé"
Next i
End With

 

Vote positif 0 Vote négatif

S

sebjedi38

Guest

• 23 Juin 2016

• #3

Re : Chercher une chanine de caractéres dans une cellule avec VBA ?

Salut,

Merci pour l'aide 🙂 J'etais en train d'écrire que j'avais trouvé la boulette !
j'avais inversé les paramétrés dans l’instruction InStr("<var:_", Resultat1)

Il faut mettre InStr(Resultat1, "<var:_")

Merci pour l'aide 🙂

Séb

 

Vote positif 0 Vote négatif

T

thebenoit59

XLDnaute Accro

• 23 Juin 2016

• #4

Re : Chercher une chanine de caractéres dans une cellule avec VBA ?

De rien.

Tu pourrais optimiser ton code en évitant d'activer chaque cellule, mais juste celle contenant le résultat voulu.

 

Vote positif 0 Vote négatif

S

sebjedi38

Guest

• 23 Juin 2016

• #5

Re : Chercher une chanine de caractéres dans une cellule avec VBA ?

oui effectivement cela serait plus efficace 🙂

 

Vote positif 0 Vote négatif