Discussion :

[StephThai]

Bonjour,

je souhaite vérifier que la chaine de caractères, contenue dans une cellule, est contenue dans la chaine de caracteres d'une autre cellule.
Ex :
Cell A contient "toto"
Cell B contient "toto/tata"

Pour cela, j'appelle la methode Instr de la maniere suivante :
If (InStr(CellA.Value, CellB.Value, vbTextCompare) <> 0) Then ...

Je m'attends à rentrer dans ce bloc de code, mais je n'y rentre pas

Auriez-vous une idée de la raison ? Si oui, savez-vous comment résoudre ce probleme ?

Merci beaucoup !

[Renyeu]

Bonjour,
Un essai en pj à l'aide de la fonction TROUVE
Cdlt
Renyeu

[Philippe Tulliez]

Bonjour,
Il y a également la formule CHERCHE qui a la même syntaxe que TROUVE mais qui n'est pas sensible à la casse.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=CHERCHE(A2;B2)

[StephThai]

Bonjour,
merci, je viens de recuperer ton fichier, je regarde

Mais, fais-tu appel a des fonctions que tu as codees ?

Merci

[StephThai]

En fait, je cherche a faire cette comparaison au sein d'une methode que je code.

Merci pour vos conseils

[StephThai]

Rebonjour,
desolee de relancer, mais je cherche a effectuer cette comparaison, au sein d'une fonction VB. Auriez-vous une idee de ce qui cloche dans mon code ?

Merci d'avance

[Philippe Tulliez]

Bonjour,
Tu avais posé ta question en rubrique Excel et pas VBA
Fonction qui renvoie TRUE si le contenu de la cellule A se retrouve dans la cellule B et j'utilise TRIM pour enlever les espaces avant et après qui pourrait accidentellement avoir été encodé à droite et/ou à gauche de la valeur dans la cellule A

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Function IsPresent(CellA As Range, CellB As Range) As Boolean
  IsPresent = InStr(CellB, Trim(CellA)) > 0
End Function

Pour le test

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Test()
  Debug.Print IsPresent(Range("A2"), Range("B2"))
End Sub

[StephThai]

Merci beaucoup, au temps pour moi pour la categorisation de ma question

oui, je vois que j'avais inverse les parametres 1 et 2.

Bonne journee