Comment affecter le contenu d'une Cell a une variable contenue dans une autre cell

Bonjour,

Je voudrais savoir comment affecter le contenu d'une cellule par le contenu d'une autre cellule.
example:
A(1)= toto
A(3)=24

Je voudrais affecter a toto la valeur 24, de tel sorte que si je display la variable toto il me dise 24.
J'ai essaye avec la commande INDIRECT, mais je n'y suis pas arrive

Merci de m'aider

Bonsoir,

Crée le nom "Toto" (Menu Insertion, Nom, Définir... ou, si tu utilises Excel 2007, Formules puis Gestionnaire de noms), et affecte-lui la valeur 24.

Merci ,

Ce n'est pas ce que je cherche a faire.
En fait j'ai le tableau suivant

F G
6: FSBaseAdress 0000
7: CDLocationBasePointer 0200
8: RDLocationBasePointer 0100

Ce tableau peut evoluer, en fait ce sont des pointeurs d'adresses et dans mon code VBA je me sers des variables qui sont en F6,F7 et F8 et je veux que ces variables contiennent les valeures qui sont en G.

Est-ce possible ? et si oui comment.

J'ai bien essaye avec la commande INDIRECT, mais celle-ci ne fonctionne pas (pas reconnue sous VBA avec Excell 2003 SP2) et je ne sais pas pourquoi.

Merci de m'aider

Re,

Code:

---

1 2 3 4 5 6

Sub Variables() Dim FS As String, CD As String, RD As String FS = Range("G6") CD = Range("G7") RD = Range("G8") End Sub

---

Mais je ne comprends pas où se trouve l’indirection.

Je crois que je me suis mal exprime. Ce n'est pas FS, ni CD ni RD que je veux affecter avec les valeures de G6,G7 et G8. Mais ce sont les variables qui sont dans F6, F7 et F8 soit:
FSBaseAdress = 000
CDLocationBasePointer=0200
..etc
Je veux pouvoir utilier le contenu des cells en F6,F7 et F8 comme variables et leur affecter les valeures de G6,G7 et G8.

C'est pour cela que je pqrle d'indirection. De plus, je ne sais pas pourquoi ma fonction INDIRECT n'est pas reconnue en vba chez moi ?

Dans l’exemple de code, j'ai utilisé FS, CD et RD comme nom de variables. Si tu as déjà des variables, utilise-les à la place :

Code:

---

1 2 3 4 5 6

VSub Variables() Dim FS As String, CD As String, RD As String FSBaseAdress = Range("G6") CDLocationBasePointer = Range("G7") RDLocationBasePointer Range("G8") End Sub

---

Oui ! c'est vrai mais ce n'est pas ce que je veux faire. Je sais affecter le contenu des cellules a des variables. Mais en fait je veux extraire le contenu d'une cellule ici F6 et en faire une variable. Les variable ainsi que les nom peuvent changer donc si today je l'appelle FSBaseAdress je peux aussi en changer le nom, par contre sa position en F6 ne changera pas. C'est pourquoi je veux extraire le contenu de F6 et lui affecter le contenu de G6 et le tout me donnera la variable FSBaseAdress=0000 ... etc.
Ext-ce que la commande INDIRECT existe sous VBA ?

Ce que je ne comprends pas est cette phrase :

Citation:

---

Envoyé par gilles06

Mais ce sont les variables qui sont dans F6, F7 et F8

---

Tu peux inscrire le nom de variables dans des cellules, mais cela ne dispense pas de les définir dans VBA : il n'y a donc pas de variables dans les cellules, mais de simples chaînes de caractères.

Ou alors on n’a pas forcément besoin de VBA, et on en revient à ma première option, qui est de définir des noms :

Celui en F6 pour le contenu de la cellule G6
...

Et dans les cellules, on peut alors utiliser ces 3 noms comme on le ferait en VBA avec des variables.

Desole, mais je ne comprends pas.
Je veux utiliser le contenu de F6 comme variable et lui affecter le contenu de G6, de tel facon a avoir ensuite que le contenu de F6 soit egal au contenu de G6.

Désolé nos 2 messages précédents (ceux de 17h01 et 17h05, heure française) se sont croisés. :(

Je ne vois aucun moyen d’utiliser une indirection pour nommer une variable.

Si F6 est invariant, la seule chose qui se rapproche de ton souhait, qui me vienne à l’esprit est

Code:

---

1 2 3 4 5

Sub Variable() Dim F6(1) As String F6(0) = Range("F6") F6(1) = Range("G6") End Sub

---

F6(0) te permet de retrouver le contenu de F6, le nom que tu aurais voulu donner à la variable et F6(1) renvoie la valeur en G6.

A défaut d’une variable classique, tu as un tableau avec le nom et la valeur.

Merci de ton aide.
Perso je n'y suis pas arrive par cette methode. Par contre j'ai pu y arriver autrement.

Peux-tu me dire pourquoi la fonction INDIRECT ne fonctionne pas chez moi ? il ne la reconnais pas.
J'utilise Excell/VBA 2003

Merci