fonction incomplete comment ajouter des conditions

Bonjour à tous,

J'aurai besoin d'un petit coup de main, j'ai inséré une fonction IF dans une macro (tout va bien jusque là), en fonction d'un numéro de compte, elle m'affiche un BBH ou rien. Mais elle est incomplète et je devrait ajouter une liste de plus de 4000 comptes. Comment faire ?

Code:

---

1 2

ActiveCell.FormulaR1C1 = _ "=IF(OR(RC[-3]=""0000046225P"",RC[-3]=""0000049494L"",RC[-3]=""0000049558L"",RC[-3]=""0000049559M"",RC[-3]=""0000049561U"",RC[-3]=""0000049562V"",RC[-3]=""0000049563W"",RC[-3]=""0000049564X"",RC[-3]=""0000049675X"",RC[-3]=""0000050143B"",RC[-3]=""0000050423R"",RC[-3]=""0000050453S"",RC[-3]=""0000050471S"",RC[-3]=""0000050493Q"",RC[-3]=""0000050624R"",RC[-3]=""0000050730M"",RC[-3]=""0000050882K"",RC[-3]=""0000060052L"",RC[-3]=""0000060950Y"",RC[-3]=""0000067009K"",RC[-3]=""0000067026X"",RC[-3]=""0000067232L"",RC[-3]=""0000067242N"",RC[-3]=""0000068003N"",RC[-3]=""0000068034N"",RC[-3]=""0000069836K"",RC[-3]=""0000069978Z"",RC[-3]=""0000071531X"",RC[-3]=""0000072506Y"",RC[-3]=""0000072584L""),""BBH"","""")"

---

Bonjour,

Tu pourrais inscrire ta liste dans un onglet et faire une RechercheV sur un compte, du genre
=Si(Esterreur(RechercheV(TaCellule; TaFeuille!TaColonne;1;Faux));""; "BBH")

Oui j'y ai pensé mais la macro doit tourner sur des fichier diffents type resultat d'extraction sinon il faudrait que je demande a ma macro de coller les 4000 compte dans un coin du fichier a chaque fois que je ferai un extraction

La macro pourrait être dans un autre fichier, incluant le listing de codes. Ta formule pourrait regarder dans le fichier d'extraction et remettre les formules en valeur par la suite pour éviter les liaisons externes...

Mais c'est difficile à dire sans connaître tous les aleas...

http://www.developpez.net/forums/d13...e/#post7342157