Bonjour,
Je souhaiterai à partir des noms contenus dans une série de cellules faire une boucle afin de définir des variables objets (range).


Voici une partie des cellules qui donnera le nom des variables.
A1= immat, b1= genre, c1= carrosserie

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
For i = 1 To 3
MsgBox Evaluate(Cells(1, i).Address).Value
 
Set Evaluate(Cells(1, i).Address).Value = Cells(1, i).EntireColumn
' soit l'équivalent de 
' set immat = Cells(1, i).EntireColumn
next i
Est ce possible ?