RELLENAR TEXTBOX CON BUCLE FOR

Solo consultas sobre macros y código VBA Excel.
Reglas del Foro 1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!

RELLENAR TEXTBOX CON BUCLE FOR

Notapor pablotxas » 03 Oct 2018 04:25

Buenos días,

Estoy intentando rellenar un conjunto de varios Textbox (TextBox1, TextBox2, TextBox3, ...) mediante un bucle For, para introducir el contenido de algunas celdas.

Estos TextBox se encuentran incrustados en una de las hojas del Excel, pero no consigo de ninguna de las maneras poner algo del estilo:

For i = 1 To 6
ActiveSheet.Controls("TextBox" & i).Text = "prueba " & i
Next

y que funcione.....

He buscado alternativas y algunas hacen referencia a la función Me y otras cosas que no me permite ejecutar VBA...

¿Alguna sugerencia, amigos?

Un saludo y feliz día.

Pablo
pablotxas
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 5
Registrado: 09 Feb 2018 05:04

Re: RELLENAR TEXTBOX CON BUCLE FOR

Notapor Antoni » 03 Oct 2018 05:40

Código: Seleccionar todo
For i = 1 To 6
   ActiveSheet.OLEObjects("TextBox" & i).Object.Value = "Prueba " & i
Next
Avatar de Usuario
Antoni
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 5583
Registrado: 22 Dic 2009 04:58
Ubicación: GALICIA (ESPAÑA)

Re: RELLENAR TEXTBOX CON BUCLE FOR

Notapor pablotxas » 03 Oct 2018 13:33

¡Perfecto!

Muchas gracias Antoni, ha funcionado a la perfección. Lo había probado de unas cuantas formas pero no había dado con la solución.

Un saludo hasta Galicia.

Hasta pronto!

Pablo
pablotxas
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 5
Registrado: 09 Feb 2018 05:04


Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 11 invitados