Discussion :

[Korleone]

J'ai une série de texte dans un tableau, et j'aimerais que dans la colonne de gauche du texte, y apparaisse le résultat de cette variable (qui à le même nom que le texte de la cellule).

En fait, j'aimerais lire la cellule de texte, et faire quelque chose comme :

Range("A1").value = Variable qui à le même nom que la valeur (c'est à dire sans les "")

(C'est assez compliqué à expliquer en fait, j'espère que vous m'avez compris)...

Merci

[casavba]

peux-tu illustrer par un exemple.

Merci

[jfontaine]

Je ne vois pas comment tu peux faire ca.

Le mieux serait de créer un tableau de variable ou tu trouverais dans dans une dimension le libelle et dans une autre dimension la valeur.

[patbou]

bonjour

je n ai pas tt compris a ta demande ...
pour remplacer les "" utilise la fonction replace

[alsimbad]

je pense que j'ai compris de quoi tu parle, mais c'est pas forcément clair, comme c'est une explication pour CP de VBA, tu m'excuseras si je me trompe
je pense que tu as un soucis pour écrire ta variable parce que tu l'écris comme suit

Code :

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

1
2
3
 
variable = "brutus"
Range("A1").value = "variable"

pour la clarté de l'explication, je ne vais pas employer le mot variablesinon on vas se perdre

Code :

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

1
2
3
 
u = "brutus"
Range("A1").value ="u"

le premier u est le nom de la variable
le "brutus" est la valeur texte de la variable
le "u" est une erreur car il donne a la cellule A1 la valeur texte u
si tu l'écris

Code :

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

Range("A1").value = u

la valeur écrite en cellule A1 sera brutus sans guillemet

[fred65200]

bonjour à tous,

de ce que j'en ai compris

Supprimer les guillemets dans une chaîne

Code :

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

1
2
3
4
5
6
7
Sub SupprGuillemets()
Dim maStr As String
maStr = Replace(Range("B1"), """", "")
Range("A1") = maStr
'ou tout simplement
' Range("A1") = Replace(Range("B1"), """", "")
End Sub

cordialement

[jfontaine]

J'ai l'impression que ce que Korleone recherche c'est mettre en A1 la valeur de la variable qui a le meme nom que la valeur de la cellule B1

Peux tu nous dire si c'est ca Korleone

[Korleone]

Tout d'abord, merci de vos réponses.
@ jfontaine : C'est bien ce que je cherche à faire

En fait, voici un exemple.

En A1, j'ai un texte, par exemple : "Spielberg"
En A2, j'ai "Hitchcock"
En A4, j'ai "Truffaut"
En A5, j'ai "Antonioni"
...

J'aimerais dans la cellule B1 avoir la variable Spielberg
en B2 la variable Hitchcock
...

Donc, pour mon code, j'aimerais lire les valeurs de la colonne A (une par une), puis, dans la colonne à gauche, afficher le résultat de la variable du même nom.

(Pour info, les variables sont déjà définies dans le code Visual Basic).

J'espère que vous m'avez compris

[jfontaine]

Malheureusement, a part passer par un tableau, je ne vois pas comment faire.

Peutêtre pourrais tu en début de procédure en chargeant une a une les variables de l'application.

[alsimbad]

en fait tu veux te servir du nom spielberg comme d'une variable qui s'appelerai spielberg
dans ce cas tu écris :
en a1 : Spielberg
et dans ton code tu écris
spielberg = "spielberg"
ou bien
spielberg = range("a1").value
ou bien si tu tien a l'écrire aussi en B1
dans B1 tu écris la formule =A1
ou bien par le code, tu vas pouvoir écrire range
B1 = spielberg
ce qui vas te donner

Code :

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

1
2
3
 
spielberg = "spielberg" 'ou bien spielberg = range ("a1").value
range B1 = Spielberg