Saltar al contenido

Llenar ComboBox


Recommended Posts

publicado
Hace 30 minutos , Antoni dijo:

Así, a bote pronto:

ComboBox1.Additem TextBox1

.

@Antoni no puedo puntuarte no me deja, no se el motivo, gracias por el aporte

publicado
Hace 56 minutos , JSDJSD dijo:

Sube tu archivo, y explica lo que pretendes

@JSDJSD en cuanto pueda lo subo he tenido un problema enorme y tengo que reacerlo entero porque se me han borrado todos los formularios y macros

publicado
Hace 1 minuto , Marcos14 dijo:

@JSDJSD en cuanto pueda lo subo he tenido un problema enorme y tengo que reacerlo entero porque se me han borrado todos los formularios y macros

@JSDJSD a ti tampoco me deja puntuarte no se que ocurre

publicado

@Antoni y @JSDJSD os comunico que la ayuda que había solicitado despues de la idea dada por @Antoni he logrado solucionarlo mediante esta macro que me recoge los datos introducidos en otra hoja y me los carga en el combobox

 

Dim Filas As Long
Dim Finales As Long
Dim a As Long
Dim Listas As String

Filas = hj5.Range("b" & Rows.Count).End(xlUp).Row + 1
Finales = Filas - 1
For a = 5 To Finales
    Listas = hj5.Cells(a, 2)
    Me.cmbobjeto.AddItem (Listas)
Next a

me coge los datos que hay en hoja 5 (hj5), y los carga en le combobox (cmbobjeto) y estos datos junto con otros me los deja en la hoja 3 (hj3).

Aunque aun no esta terminado os paso el archivo 

https://mega.nz/file/A5RAxKjY#zmeQ71ok4HNSLcuzHXgV3Z5PRNF3LWjVa9cTzWdQZwc

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.