CREAR COMMANDBUTTON EN TIEMPO DE EJECUCION

[federtuc]

LO QUE NECESITO ES CREAR UNA CIERTA CANTIDAD DE COMMANDBUTTON EN UN USERFORM DEPENDIENDO DE LA CANTIDAD DE DATOS QUE HAYA EN LA COLUMNA A DE LA HOJA 1.

COLUMNA A
FILA 1 ROJO
FILA 2 VERDE
FILA 3 AZUL
FILA 4 AMARILLO
FILA5 BLANCO

EL CODIGO TIENE QUE CREAR EN ESTE CASO 5 COMMANDBUTTON EN FORMA HORIZONTAL UNO AL LADO DE OTRO SEPARADOS A UNA DISTANCIA DE 1 CM MAS O MENOS.

PERO EN EL CASO QUE SEA:

COLUMNA A
FILA 1 ROJO
FILA 2 VERDE
FILA 3 AZUL
FILA 4 AMARILLO
FILA5 BLANCO
FILA 6 NEGRO

EL CODIGO TIENE QUE CREAR EN ESTE CASO 5 COMMANDBUTTON EN FORMA HORIZONTAL UNO AL LADO DE OTRO SEPARADOS A UNA DISTANCIA DE 1 CM MAS O MENOS.
Y EL COMMANDBUTTON 6 CREADO TENDRA QUE IR POSICIONADO DEBAJO DEL COMMANDBUTTON 1.

SI FUESEN 7 LOS DATOS EN LA COLUMNA A, EL COMMANDBUTTON 7 CREADO TENDRA QUE IR POSICIONADO DEBAJO DEL COMMANDBUTTON 2.

SI FUESEN 8 LOS DATOS EN LA COLUMNA A, EL COMMANDBUTTON 8 CREADO TENDRA QUE IR POSICIONADO DEBAJO DEL COMMANDBUTTON 3.

Y ASI SUCESIVAMENTE.

PODRIAN AYUDARME?

DEJO EL EJEMPLO EN UNA IMAGEN

https://onedrive.live.com/?id=EEBEFEF83 ... F830C706ED

 

 

[Antoni]

Te adjunto un formulario que hace lo que pides, aunque no se para que lo quieres, porqué no vas a poder hacer nada con los botones.

Botones.xlsm

[federtuc]

Muchas gracias Antoni, es lo que quería lograr!

Ahora solamente es crearle el código para el evento del listbox que voy a aumentar, suponiendo que haciendo click en el commandButton1 el listbox1 en su primera comumna se cargue el dato.

Si hago click en el commandButton2 se cargue el dato en el listbox también en su primera columna.

Y así con todos los command button.

Se entiende?

Muchas gracias la verdad Antoni.

Es un genio usted!

 

 

 

[Antoni]

Si no subes tu archivo y te explicas un poco mejor, no se puede continuar con lo que pides.

[federtuc]

LO QUE QUIERO LOGRAR ES QUE AL DARLE CLICK A UNO DE LOS BOTONES CARGUE EL LISTBOX1

SUPONGAMOS QUE HAGO CLICK EN EL PRIMER BOTON CON NOMBRE= ROJO, DEBERIA IR CARGANDO EL LISTBOX CON ESE DATO O SEA ROJO.

SI HAGO CLICK EN EL SEGUNDO BOTON= AZUL,  EL SEGUNDO ITEM DEL LISTBOX CARGUE CON ESE DATO, O SEA AZUL.

Y ASI CON TODOS LOS BOTONES.

 

 

Botones.xlsm

[Antoni]

Prueba a ver si es eso.

 

Botones (2).xlsm

[federtuc]

Excelente Antoni. Me ha ayudado en lo que necesitaba.

Una última preguntita:

Si al momento de crear los CommandButtons deseo crear unas etiquetas (Label) debajo de cada Botón CommandButton con el mismo Nombre, como sería el codigo? Muchas gracias desde ya.

[Antoni]

A la espera de ver que se te ocurre ahora. 

Botones (3).xlsm

[federtuc]

Ahora quisiera lograr si es posible filtrar mediante una busqueda los commandbutton. Lo he intentado pero no lo he logrado.

Tengo un textbox1 en el userform1

Si yo escribo Azul en el textbox1 entonces deberia solo verse en el formulario el CommandButton2 y su etiqueta y deberian desaparecer todos los restantes CommandButtons y sus etiquetas.

Lo que quier lograr es algo parecido a buscar en listbox mientras se escribe en textbox. 

Me explico?

 Antoni confio en usted, espero no traerle dolor de cabeza 

 

[federtuc]

Voy a intentar filtrando los datos de la hoja, ya lo he logrado, ahora necesito saber si funcionara con los commandbutton a la hora de crearlos.

Mi pregunta es iré bien por ese lado?

dejo aqui el archivo

 

textbox busca.xlsm

[federtuc]

HICE UN FILTRADO AVANZADO SEGUN LO QUE VAYA ESCRIBIENDO EN EL TEXTBOX, AHORA TENGO QUE ARMAR LA ORDEN PARA QUE DE ACUERDO A LA COLUMNA H DE LA HOJA SE CREEN LOS COMMANDBUTTON EN EL USERFORM1 AL MOMENTO DE ESCRIBIR EN EL TEXTBOX.

CREO QUE VOY BIEN

 

textbox busca(1).xlsm

[Antoni]

Lo que has pedido más lo próximo que vas a pedir. 

Botones (4).xlsm

[federtuc]

Lo habia podido lograr, pero lo de usted es para aplaudir y agradecerle! Mas eficiente y rapido el metodo de usted Antoni.