Discussion :

[flute21]

Bonjour à tous,
Je voudrais créer un code permetant d'écrire la valeur d'une variable vba dans une cellule sachant que la variable vba à utiliser dépend d'une autre cellule.

Par ex :
J'ai 2 variable vba riri et loulou
En faisant une boucle for sur le nombre de ligne à traiter, je veux que la colonne B prennent la valeur de la variable dont le nom est égale à la cellule de la même ligne dans la colonne A.
soit :
riri = 1
loulou = 2
A1 = riri --> B1 = 1
A2 = riri --> B2 = 1
A3 = loulou --> B3 = 2
A4 = riri --> B4 = 1
A5 = loulou --> B5 = 2
...

Je n'ai aucune idée de comment coder cette fonction sous VBA, est ce que vous auriez une idée ?

Merci d'avance

Flute21

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
for I=1 to 10 'pour la cellule A1 à A10
      if range("A" & I)=riri then range("B" a i)=riri
      if range("A" & I)=loulou then range("B" a i)=loulou
next

[flute21]

Merci pour votre retour rapide mais je veux faire cela pour des centaines de variables donc j'aimerais éviter d'écrire des centaines de fois la condition if. Je voulais savoir si c'était possible de faire cela automatiquement.

[Invité]

il n'existe pas de possibilité d’appeler une variable par son nom MaVariab("RR")!
tu ne peu que faire un tableau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
dim tableau(150) as string
 
tableau(50)="1"
tableau(120)="2"
For i = 1 To 10 'pour la cellule A1 à A10
    For t = 0 To UBound(tableau)
          If Range("A" & i) = tableau(t) Then Range("B" & i) = tableau(t)
    Next
Next

[flute21]

D'accord c'est bien ce que je pensais. Merci pour la confirmation.