Définition de variable

Bonjour,

j'aimerais savoir comment on peut attribuer un nom "variable" à une variable dans vba ?

Par exemple dans les lignes suivantes :

For i = 1 To 12

ActiveWorkbook.Names.Add Name:="donnee1", RefersToR1C1:=

"=Données!R3C:R25C"

ActiveWorkbook.Names("donnee1").Comment = ""

Next

comment attribuer à chaque tour de boucle, le nom "donnée i" à la variable.

Merci

Bonjour pilou,

Je n'ai pas testé mais essaie avec :

For i = 1 To 12

ActiveWorkbook.Names.Add Name:="donnee" & i, RefersToR1C1:=

"=Données!R3C:R25C"

ActiveWorkbook.Names("donnee" & i).Comment = ""

Next

Merci , mais écrire "donnee" & i , dans la boucle, ne fait que créer une seule variable appelé donnee ??!!!

En d'autres termes ca ne marche pas ...

Merci de votre aide

2test-loureed.xlsm (16.75 Ko)

Ah oui j'avais pas vu la petite erreur dans la formule. Et si tu essaie comme ceci :

For i = 1 To 12

ActiveWorkbook.Names.Add Name:="donnee" & i, RefersToR1C1:= _
"=Données!R3C[" & i & "]:R25C[" & i & "]"
ActiveWorkbook.Names("donnee" & i).Comment = ""

Next

Bonjour,

essaie ceci

For i = 1 To 12
ActiveWorkbook.Names.Add Name:="donnee" & i, _
RefersToR1C1:="=Données!R3C" & [i] & ":R25C" & [i]
Next

Amicalement

Dan

edit dan :

Oups Vbanew je ne t'avais pas vu poster.

Ou avec ce code :

For i = 1 To 12
ActiveWorkbook.Names.Add Name:="donnee" & i, _
RefersToR1C1:=Sheets("Données").Range(Cells(3, i), Cells(25, i))
Next
Rechercher des sujets similaires à "definition variable"