Problème pour inserer une cellule texte

Re : Problème pour inserer une cellule texte

Bien le bonjour Enrique...

' il faut trier les deux colonnes avec la clé de trisur la colonne des noms

AdresChamp$ = Range(Cells(NoPremLig, NoPremCol), Cells(NoDernLig, NoDernCol)).Address
AdresTri$ = Cells(NoPremLig, NoColDesNoms).Address
ActiveSheet.Range(AdresChamp$).Sort Key1:=ActiveSheet.Range(AdresTri$)

Bonsoir. Roland

Re : Problème pour inserer une cellule texte

Merci roland, ca me simplifira les choses.
J'y suis arriver mais comme-ca...
=SI(E5=C5;B5;"")&SI(E5=C7;B7;"")&SI(E5=C6;B6;"")&SI(E5=C8;B8;"")&SI(E5=C9;B9;"") &SI(E5=C10;B10;"")&SI(E5=C11;B11;"")&SI(E5=C12;B12;"")&SI(E5=C13;B13;"")&SI(E5=C14;B14;"")&SI(E5=C15;B15;"")&SI(E5=C16;B16;"")&SI(E5=C17;B17;"")&SI(E5=C18;B18;"")&SI(E5=C19;B19;"")&SI(E5=C20;B20;"")&SI(E5=C21;B21;"")&SI(E5=C22;B22;"")&SI(E5=C23;B23;"")&SI(E5=C24;B24;"")&SI(E5=C25;B25;"")&SI(E5=C26;B26;"")&SI(E5=C27;B27;"")&SI(E5=C28;B28;"")&SI(E5=C29;B29;"")