Encore comparaison de deux celluleRésolu

Question

Bonjour,

j'ai des cellules ainsi constitu&#233;es

Celulle 1 valeur = TOTO
Celulle 2 Valeur = TOTO(XXX)
Celulle 3 Valeur= (XXX)TOTO
Celulle 4 Valeur= TATA

je voudrai faire une fonction sous excel qui me permet de renvoyer 1 ou autre chose dif&#233;rent de 0 si la valeur de la celulle 1 apparait  dans une autre celulle. 
exemple je compare 1 &#224; 2  et 2 &#224; 3 ca me reponds ok
mais 1 &#224; 4 ca me reponds faux

J'ai deja pos&#233; la question mais on m'a pas r&#233;pondu quelque chose de correct

Merci d'avance

nanou1605 · Accepted Answer

Bonjour,

Tu peux utiliser la fonction Instr() 
(voir l'aide pour plus de détail)

Exemple:
avec une fonction
Ch est la chaine dans laquelle s'effectue le recherche
ChRecherche est la chaine recherchée

Public Function EstDansChaine(Ch As String, ChRecherche As String) As Boolean
If InStr(1, Ch, ChRecherche) Then
   EstDansChaine = True
Else
   EstDansChaine = False
End If
End Function


'exemple d'utilisation de la fonction :
' Range("A1") = TOTO(XXX)
' Range("A2") = TOTO

Sub test()
If EstDansChaine(Range("A1").Value, Range("A2").Value) Then
   MsgBox "La chaine existe"
Else
   MsgBox "La chaine recherchée n'existe pas"
End If
End Sub

'**********************************************
'Ou alors plus simplement (sans fonction) :

Sub test2()
If InStr(1, Range("A1").Value, Range("A2").Value) Then
   MsgBox "La chaine existe"
End If
End Sub

Voila, j'espére avoir répondu a ta question.

@+

funkay91 · Answer

Merci bcp

Encore comparaison de deux cellule

2 réponses

Discussions similaires