solicito ayuda para manejar TextBox dentro de un For...

04/08/2005 - 01:45 por Jose Manuel Garcia | Informe spam
Private Sub CommandButton1_Click()

Set r = Range("Datos")
For n = 1 To 2
aa = "Textbox" + CStr(n)
'No funciona porque a tiene "TextBox1"
r.Cells(n, 1) =aa.value
Next n

End
End Sub
¿Como puedo manejar TextBox dentro de un For... Next
 

Leer las respuestas

#1 Fco. Javier Bedoya
04/08/2005 - 02:04 | Informe spam
Hola :
Creo que lo que necesista es hacer la iteración sobre la colección de
controles que contiene al TextBox.
Por ejemplo :

Dim n As Control

For Each n In Me.Controls
If (n.Name.ToString = "TextBox1") Then n.Text = aa.text
Next

Un saludo.

Javier Bedoya.
Web : http://javierbedoya.iespana.es [En desarrollo/Sin actualizar]
Para responder a mis mensajes de las usenet quitar de mi dirección
de correo.

"Jose Manuel Garcia" escribió en el
mensaje news:049701c59885$7620caa0$

Private Sub CommandButton1_Click()

Set r = Range("Datos")
For n = 1 To 2
aa = "Textbox" + CStr(n)
'No funciona porque a tiene "TextBox1"
r.Cells(n, 1) =aa.value
Next n

End
End Sub
¿Como puedo manejar TextBox dentro de un For... Next

Preguntas similares