OVH Cloud OVH Cloud

Valeur d'un TextBox dans une cellule

6 réponses
Avatar
Starwing
Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur: #NOM?

Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing
brault-lavoieNOSPAM@sympatico.ca
--

6 réponses

Avatar
ru-th
Salut

Sub test()
With UserForm1
.TextBox1 = 2 * [a1]
.TextBox2 = Left([a2], 2)
.TextBox3 = Right([a3], 2)
.Show
End With
End Sub

a+
rural thierry


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

Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur:
#NOM?


Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--




Avatar
Starwing
Bonjour ru-th,

Je me suis mal exprimé...

Voici un exemple de mon problème
http://cjoint.com/?mrqxrMMiRQ

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--
"ru-th" a écrit dans le message de
news:
Salut

Sub test()
With UserForm1
.TextBox1 = 2 * [a1]
.TextBox2 = Left([a2], 2)
.TextBox3 = Right([a3], 2)
.Show
End With
End Sub

a+
rural thierry


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

Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur:
#NOM?


Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--








Avatar
Rai
Bonjour,

Pour ma part, j'ai compris la question dans "l'autre sens" :
Comment affecter le contenu d'un textbox à une cellule, sans générer l'affichage de #nom.

Dans ce cas-là, je propose :
[A2].FormulaLocal = TextBox2.Text

Bonne continuation

Rai

"ru-th" a écrit dans le message de news:
Salut

Sub test()
With UserForm1
.TextBox1 = 2 * [a1]
.TextBox2 = Left([a2], 2)
.TextBox3 = Right([a3], 2)
.Show
End With
End Sub

a+
rural thierry


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

Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur:
#NOM?


Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--








Avatar
Starwing
Bonjour rai,

Merci, c'était là mon problème...

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--
"Rai" a écrit dans le message de
news:
Bonjour,

Pour ma part, j'ai compris la question dans "l'autre sens" :
Comment affecter le contenu d'un textbox à une cellule, sans générer
l'affichage de #nom.

Dans ce cas-là, je propose :
[A2].FormulaLocal = TextBox2.Text

Bonne continuation

Rai

"ru-th" a écrit dans le message de news:

Salut

Sub test()
With UserForm1
.TextBox1 = 2 * [a1]
.TextBox2 = Left([a2], 2)
.TextBox3 = Right([a3], 2)
.Show
End With
End Sub

a+
rural thierry


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

Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur:
#NOM?


Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--








Avatar
ru-th
Salut

Sheets("Feuil1").Range("B" & I).FormulaLocal = Controls("TextBox" & I).Value

a+
rural thierry

"Starwing" a écrit dans le message de news:
eYtD$
Bonjour ru-th,

Je me suis mal exprimé...

Voici un exemple de mon problème
http://cjoint.com/?mrqxrMMiRQ

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--
"ru-th" a écrit dans le message de
news:
Salut

Sub test()
With UserForm1
.TextBox1 = 2 * [a1]
.TextBox2 = Left([a2], 2)
.TextBox3 = Right([a3], 2)
.Show
End With
End Sub

a+
rural thierry


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

Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur:
#NOM?


Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--












Avatar
Starwing
Merci beaucoup ru-th,

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--
"ru-th" a écrit dans le message de
news:
Salut

Sheets("Feuil1").Range("B" & I).FormulaLocal = Controls("TextBox" &
I).Value


a+
rural thierry

"Starwing" a écrit dans le message de news:
eYtD$
Bonjour ru-th,

Je me suis mal exprimé...

Voici un exemple de mon problème
http://cjoint.com/?mrqxrMMiRQ

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--
"ru-th" a écrit dans le message de
news:
Salut

Sub test()
With UserForm1
.TextBox1 = 2 * [a1]
.TextBox2 = Left([a2], 2)
.TextBox3 = Right([a3], 2)
.Show
End With
End Sub

a+
rural thierry


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

Bonjour à tous,

Dans trois TextBox:

TextBox1.Value = "=2*A1"
TextBox2.Value = "=GAUCHE(A2)"
TextBox3.Value = "=DROITE(A3)"

Dans TextBox2.Value et TextBox3.Value, Excel me retourne la valeur:
#NOM?


Pourquoi ?A vez-vous une idée pour remédier à cette situation?

--
Au plaisir de vous revoir ...
Visitez >> http://www.excelabo.net
Le merveilleux site de Misange
Starwing

--