Comparaison de deux celulles

funkay91 Messages postés 20 Date d'inscription mercredi 9 novembre 2005 Statut Membre Dernière intervention 22 novembre 2005 - 21 nov. 2005 à 09:35
AnteManoclis Messages postés 154 Date d'inscription jeudi 22 mai 2003 Statut Membre Dernière intervention 6 septembre 2007 - 21 nov. 2005 à 14:43
bonjour,

J'aurai une petite question. Quelqu'un pourrait me dire qu'elle fonction je pourrai utilisé pour comparer deux cellule.
exemple

1ere cellule : Nom
2eme cellue : Nom (présent à 8h00)

donc faudrai qu'il cherche juste la présence du nom parmi les valeur de la cellule
merci d'avance

3 réponses

AnteManoclis Messages postés 154 Date d'inscription jeudi 22 mai 2003 Statut Membre Dernière intervention 6 septembre 2007
21 nov. 2005 à 12:03
Salut,



Un truc comme ça devrait marcher:



Dim i as byte

i = InStr(1, 1ere_cellule, 2eme_cellule, vbTextCompare)



La variable i vaudra 0 si le Nom n'est pas dans ta 2eme cellule.

S'il y est, i indiquera sa position dans la chaîne de caractère (ici, i vaudra 1)


Tchô
AnteManoclis
0
funkay91 Messages postés 20 Date d'inscription mercredi 9 novembre 2005 Statut Membre Dernière intervention 22 novembre 2005
21 nov. 2005 à 13:08
Mais j'y arrive pas

je rentre i = Instr(1, Cells(1,1).value,Cells(2,1).value, vbtextCompare)
il me renvoie i = 1 ou 29 etc... mais ca veut rien dire et surtout il y a aucune comparaison de faite

donc je suis pas avancé
0
AnteManoclis Messages postés 154 Date d'inscription jeudi 22 mai 2003 Statut Membre Dernière intervention 6 septembre 2007
21 nov. 2005 à 14:43
Juste après insère le code suivant, tu devrais retrouver le Nom:



Call Msgbox ( Mid( Cells(1,1).value, i, Len( Cells(2,1).value)))

Tchô
AnteManoclis
0
Rejoignez-nous