Cherche Formule

Sylvie64 · 26 Octobre 2010

Bonjour,

j'aimerai mettre les cellules des colonnes A,B,C en U,V,W et en x,y,Z comme indiqué par les chiffres en couleur, voir PJ.

Y a t-il une possibilité ?

Merci de votre aide.

Sylvie

Tibo · 26 Octobre 2010

Re : Cherche Formule

Bonjour Sylvie,

Pas sûr d'avoir compris.

en V2, peut-être ceci :

Code:

=SI(NB.SI($A$2:$A$18;$U2)=0;"";RECHERCHEV($U2;$A$2:$C$18;2;0))

en W2, sa petite soeur :

Code:

=SI(NB.SI($A$2:$A$18;$U2)=0;"";RECHERCHEV($U2;$A$2:$C$18;3;0))

formules à recopier vers le bas

Si pas ça, reviens avec plus de précisions

@+

BOISGONTIER · 26 Octobre 2010

Re : Cherche Formule

Bonjour,

Code:

Sub essai()
 For Each c In Range("U2:U1000,X2:X1000")
   Set k = [A2:A1000].Find(c, LookAt:=xlWhole)
   If Not k Is Nothing Then c.Resize(, 3).Interior.ColorIndex = k.Interior.ColorIndex
 Next c
End Sub

JB
Formation Excel VBA JB

Sylvie64 · 26 Octobre 2010

Re : Cherche Formule

Bonjour,

Merci Tibo, tu as très bien compris ce que je voulais dire, résultat excellent !!!

Merci JB, en fait ton module et très bien (je vais le retenir pour la suite) mais se ne sont pas les couleurs
qui m'intéresse c'est ce qui se trouve dans les cellules (voir PJ, j'ai rectifié pour comprendre ce que j'aimerai)

J'ai de 258586 numéros donc cela me facilite le travail avec vos formules.

C'est mon explication qui n'est pas bonne, pas facile d'expliquer

Merci à vous deux

Sylvie

Cherche Formule

Sylvie64

XLDnaute Occasionnel

Tibo

XLDnaute Barbatruc

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

Sylvie64

XLDnaute Occasionnel

Discussions similaires