If CelluleCible.Value = CelluleSource.Value Then

Bonjour

J'ai une plage de cellules "sources" qui comportent 2 lettres. (Tr, Tp, So ... etc). Chaque cellule a un couleur de fond différente.

J'ai une plage de cellules "cibles" qui comportent notamment les mêmes 2 lettres. J'arrive à mettre le même fond de couleur que dans les cellules "Sources" avec If CelluleCible.Text = CelluleSource.Text Then ....

Mais j'ai aussi des groupes de 3 lettres Tp1, Tr2 etc ... et j'aimerais qu'ils récupèrent les même couleurs de fond ..

Je voudrais donc dire :

Si le texte de la celluleCible commence par les lettres de la cellule Source, Alors ....

comment faire ?

Merci

RIPcagou a écrit :

Bonjour

J'ai une plage de cellules "sources" qui comportent 2 lettres. (Tr, Tp, So ... etc). Chaque cellule a un couleur de fond différente.

J'ai une plage de cellules "cibles" qui comportent notamment les mêmes 2 lettres. J'arrive à mettre le même fond de couleur que dans les cellules "Sources" avec If CelluleCible.Text = CelluleSource.Text Then ....

Mais j'ai aussi des groupes de 3 lettres Tp1, Tr2 etc ... et j'aimerais qu'ils récupèrent les même couleurs de fond ..

Je voudrais donc dire :

Si le texte de la celluleCible commence par les lettres de la cellule Source, Alors ....

comment faire ?

Merci

Bonsoir,

si j'ai bien compris,

If left(CelluleCible.Text,2) = CelluleSource.Text Then  'prendre le 2 premier caractères de la cible et comparer à la source.
h2so4 a écrit :

Bonsoir,

si j'ai bien compris,

If left(CelluleCible.Text,2) = CelluleSource.Text Then  'prendre le 2 premier caractères de la cible et comparer à la source.

Merci. C'est cela ..

En fait, j'avais trouvé la fonction left ... mais bettement j'avait écrit :

If CelluleCible.Text,2 = left(CelluleSource.Text,2) Then !!!

Comme quoi !!!

Encore merci, je mets en résolu

Rechercher des sujets similaires à "cellulecible value cellulesource then"