Bonjour,
J’ai plusieurs Dim base1 As Variant, Dim base2 As Variant etc. (27bases)
Que je renseigne avec la fonction Range ("A2").CurrentRegion etc. (27bases)
Non soucis c’est qu’à chaque fois ou je veux prendre des valeurs
Dans différentes base je suis obligé de réécrire une ligne complète
Du type Range("f2") = base3(1, MyValue1)
Range("g2") = base1(1, MyValue1) etc. etc.
L’idée c’est de remplacer base1 ou base3 par base = "base" & Range ("B1")
ou B1 Correspond au N° de la base à consulter.
Cela ne fonctionne pas en l’état c’est peut-être pas possible.
Merci par avance si quelqu’un a une idée. https://www.developpez.net/forums/im...s/icon_eek.gif