Récupérer les données Textbox

tototiti2008

XLDnaute Barbatruc

• 1 Octobre 2010

• #2

Re : Récupérer les données Textbox

Bonjour btellier,

Euh... pas sûr d'avoir bien compris

Code:

[B][I]Private Sub CommandButton2_Click()
Range("A1").value = TextBox1.Text
Range("A2").value = TextBox2.Text[/I][/B]
[B][I]End Sub[/I][/B]

?

 

Vote positif 0 Vote négatif

B

btellier

Guest

• 1 Octobre 2010

• #3

Re : Récupérer les données Textbox

Merci pour cette réponse rapide.

En appliquant ce code, seule la 1ère ligne fonctionne : Range("A1").value = TextBox1.Text

Il ne me récupère pas et ne me colle pas les données dans la 2e cellule !!

Ou le code n'est pas complet, ou quelque chose est mal parametrée je suis un peu perdu.

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 1 Octobre 2010

• #4

Re : Récupérer les données Textbox

Re,

aurais-tu un bout de fichier exemple ? inférieur à 48 Ko et sans données confidentielles

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 1 Octobre 2010

• #5

Re : Récupérer les données Textbox

bonjour tous
un exemple attention textboxs pas renommées autrement il faut utiliser TypeName ou TypeOf

Code:

Private Sub CommandButton1_Click()
 Dim i As Byte
 For i = 1 To 10
 Cells(1, i) = Controls("Textbox" & i).Value
 Next i
End Sub

10textbox pour l'exemple si la feuille de reception est différente il faut utiliser l'nstruction with

 

Vote positif 0 Vote négatif

B

btellier

Guest

• 1 Octobre 2010

• #6

Re : Récupérer les données Textbox

J'ai créé un 2 fichier car celui sur lequel je travaille et trop lourd.
En essayant ta formule sur le 2e fichier allégé, elle fonctionne. Je n'y comprends plus rien, sur le gros fichier, seule la 1ère ligne est récupérée.

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 1 Octobre 2010

• #7

Re : Récupérer les données Textbox

Bonjour Laetitia,
Re,

@Laetitia
et tu as une explication sur le fait que mon code simpliste ne fonctionne pas ?
Parce que moi, je n'ai pas d'idée sans un bout de fichier...

 

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 1 Octobre 2010

• #8

Re : Récupérer les données Textbox

re tototiti ; ton code marche. que veut faire exactement l'ami btellier ?????? AVEC UN EXEMPLE PLUS SIMPLE🙄

en simplifiant

Code:

Range("A1") = TextBox1.Value
Range("A2") = TextBox2.Value

d'ailleurs mon code une erreur

Code:

Cells(i, 1) = Controls("Textbox" & i).Value

et non

Code:

Cells(1, i) = Controls("Textbox" & i).Value

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 1 Octobre 2010

• #9

Re : Récupérer les données Textbox

Bonjour,

A tout hasard vérifie peut être le nom de ta textbox... et si A2 n'est pas fusionnée...

bon après midi
@+

 

Vote positif 0 Vote négatif

B

btellier

Guest

• 1 Octobre 2010

• #10

Re : Récupérer les données Textbox

Merci pour votre aide...Bon we

 

Vote positif 0 Vote négatif

B

btellier

Guest

• 1 Octobre 2010

• #11

Re : Récupérer les données Textbox

Non malheureusement j'ai déjà vérifié tous ces points...

 

Vote positif 0 Vote négatif

B

btellier

Guest

• 1 Octobre 2010

• #12

Re : Récupérer les données Textbox

Le code persiste à me coller uniquement la ligne en gras et m'ignore toutes les autres...
Range("A1") = TextBox1.Value
Range("A2") = TextBox2.Value
Lorsque je les inverse, il me colle uniquement la veleur de la TextBox2 dans la cellule A2, en gros il ne considère que la 1ère ligne...

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 1 Octobre 2010

• #13

Re : Récupérer les données Textbox

Re,

tu n'aurais pas une procédure événementielle dans le module de la feuille concernée ??

 

Vote positif 0 Vote négatif

B

btellier

Guest

• 1 Octobre 2010

• #14

Re : Récupérer les données Textbox

Non, justement j'ai supprimé toutes les macros, les différents liens qui pouvaient exister avec d'autres feuilles dans le but de supprimer tout risque d’interférence. Mais le code ne fonctionne toujours pas. Je commence à désespérer, je dois présenter l'outil ce lundi et je bloque sur ce qui semblait être un détail au départ.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 1 Octobre 2010

• #15

Re : Récupérer les données Textbox

Re

mets un point d'arrêt au début de la procédure du bouton, touche F9 sur la 1ère ligne dans l'éditeur vba et en suite exécute le code pas à pas touche F8 pour vérifier ce qui se passe....

 

Vote positif 0 Vote négatif