Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

varaible et paramètre

2 réponses
Avatar
claude
bonjour à tous
je voudrai définir la longeur d'un tableau en utilisant une variable
apparemment, les tableaux n'acceptent que les constantes
(je stocke les en-têtes de colonne dans une variable tableau)
a = ActiveCell.End(xlToRight).Column - 1
Dim TabloNomIndex(1 To a)
For i = 1 To a
TabloNomIndex(i) = ActiveCell
Next

y-a-t-il moyen de contourner ???
ou de transformer ma variable en paramètre (ou constante)

merci d'avance
claude

2 réponses

Avatar
JB
Bonjour,

Dim TabloNomIndex
a = ActiveCell.End(xlToRight).Column - 1
ReDim TabloNomIndex(1 To a)
For i = 1 To a
TabloNomIndex(i) = ActiveCell
Next

JB
http://boisgontierjacques.free.fr/


On 8 déc, 12:53, "claude" wrote:
bonjour à tous
je voudrai définir la longeur d'un tableau en utilisant une variable
apparemment, les tableaux n'acceptent que les constantes
(je stocke les en-têtes de colonne dans une variable tableau)
    a = ActiveCell.End(xlToRight).Column - 1
    Dim TabloNomIndex(1 To a)
    For i = 1 To a
        TabloNomIndex(i) = ActiveCell
    Next

y-a-t-il moyen de contourner ???
ou de transformer ma variable en paramètre (ou constante)

merci d'avance
claude


Avatar
claude
bonjour
merci JB
excellent
:-))
claude


"JB" a écrit dans le message de news:

Bonjour,

Dim TabloNomIndex
a = ActiveCell.End(xlToRight).Column - 1
ReDim TabloNomIndex(1 To a)
For i = 1 To a
TabloNomIndex(i) = ActiveCell
Next

JB
http://boisgontierjacques.free.fr/


On 8 déc, 12:53, "claude" wrote:
bonjour à tous
je voudrai définir la longeur d'un tableau en utilisant une variable
apparemment, les tableaux n'acceptent que les constantes
(je stocke les en-têtes de colonne dans une variable tableau)
a = ActiveCell.End(xlToRight).Column - 1
Dim TabloNomIndex(1 To a)
For i = 1 To a
TabloNomIndex(i) = ActiveCell
Next

y-a-t-il moyen de contourner ???
ou de transformer ma variable en paramètre (ou constante)

merci d'avance
claude