Pourquoi ce n'est reconnu comme variable ?

C

carlos

XLDnaute Impliqué

• 7 Janvier 2009

• #2

Re : Pourquoi ce n'est reconnu comme variable ?

Re

Petit correctif car c'est du texte.

Bonjour

Ceci ne marche pas non plus.

Dim NomJ1 as string
Dim NomJ2 as string

NomJ1 = "Pierre"
NomJ2 = "Alain"
etc...

for i = 1 to 10
msgbox "NomJ" & num
next i

Comme resultat , j'ai "NomJ1" en texte alors que je veux Pierre , etc ????

Merci Carlos

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 7 Janvier 2009

• #3

Re : Pourquoi ce n'est reconnu comme variable ?

Bonjour carlos,

je te conseilles d'utiliser un tableau

Code:

Dim NomJ(1 to 2) as String
 
NomJ(1)="Pierre"
NomJ(2)="Alain"
 
For i = 1 to 2
Msgbox NomJ(i)
next i

 

Vote positif 0 Vote négatif

C

carlos

XLDnaute Impliqué

• 7 Janvier 2009

• #4

Re : Pourquoi ce n'est reconnu comme variable ?

Bonsoir Tototiti2008

tu es Excelleron .

Merci beaucoup

Carlos

 

Vote positif 0 Vote négatif

Gael

XLDnaute Barbatruc

• 8 Janvier 2009

• #5

Re : Pourquoi ce n'est reconnu comme variable ?

Bonjour Carlos, Bonjour Tototiti,

La solution du tableau est bien sûr la meilleure, cependant j'aimerais bien savoir s'il y a moyen de faire référence à une variable avec une formule de type "Nom" & i.

Si par exemple on souhaite déclarer cet ensemble de prénoms sous forme de constantes, comme on ne peut pas, à ma connaissance, déclarer un tableau de constantes on va créer une variable pour chaque prénom et l'idéal serait de pouvoir les appeler avec une numérotation variable.

Y-a-t-il une solution en ce sens?

@+

Gael

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 9 Janvier 2009

• #6

Re : Pourquoi ce n'est reconnu comme variable ?

Bonjour à tous

Gael 🙂, voici peut être une solution, un peu lourde je l'avoue mais elle fonctionne

 

Pièces jointes

• essai_insert_fonction.xls

  30.5 KB · Affichages: 66

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 9 Janvier 2009

• #7

Re : Pourquoi ce n'est reconnu comme variable ?

Bonjour carlos
Bonjour tototiti 🙂
Bonjour Gael 🙂
Bonjour Wilfried 🙂

Dans le genre tableau

Code:

Public tablo()
Sub test()
tablo = Array("Pierre", "Paul", "Jacques", "Marcel")
For n = LBound(tablo) To UBound(tablo)
 MsgBox ("tablo" & n & " = " & tablo(n))
Next n
End Sub

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 9 Janvier 2009

• #8

Re : Pourquoi ce n'est reconnu comme variable ?

Bonjour à tous,

Wilfried, je suis impressionné... pas simple mais je n'aurais jamais pensé aller aussi loin 🙂

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 9 Janvier 2009

• #9

Re : Pourquoi ce n'est reconnu comme variable ?

Re,

sinon si on souhaite vraiment faire référence à une valeur à partir d'un texte, peut-être par l'objet Dictionary ?

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 9 Janvier 2009

• #10

Re : Pourquoi ce n'est reconnu comme variable ?

Re

si on reprend l'expression de Gael:
declarer un tableau de constantes
la solution est bien tableau=Array("","","")
qui s'exploite en tableau(n)
Quel serait l'interet d'un "tableau" & n ??

 

Vote positif 0 Vote négatif

Gael

XLDnaute Barbatruc

• 9 Janvier 2009

• #11

Re : Pourquoi ce n'est reconnu comme variable ?

Bonjour à tous,

Merci de ta réponse PierreJean. J'étais resté bloqué sur le fait que l'instruction "Const" ne permet pas de déclarer une donnée de type Tableau.

La solution est effectivement simple en passant par Array au début d'une macro, la variable pouvant être déclarée en "Public".

Certains langages comme Javascript permettent de récupérer le contenu d'une variable avec une instruction de type Eval("Nom" & i) ce que VBA ne permet pas de faire.

@+

Gael

 

Vote positif 0 Vote négatif