Paso a paso para cargar un combobox desde la hoja

La cuestión es que no se cargar un bendito combobox desde una hoja de excel los datos que quiero ingresar al combobox están en la hoja2 columna A2 hasta la ultima fila con datos y el combo lo requiero en la hoja1 pero quiero saber paso a paso como se carga y se actualiza dicho combobox de antemano agradezco el que me apoyen con esta solicitud que es algo muy básico para algunos

2

2 respuestas

Respuesta
1

Esta macro carga los archivos de la hoja 2 al listbox a través de una matriz(filasxcolumnas) con esto tienes la ventaja sobre la opción additem y rowsource que no estas limitado a 10 columnas en el caso additem o a tener que cambiar el rango del rowsource cada que agregues un archivo, la macro actualiza el listbox cada que agregues un registro o lo borres.

Private Sub UserForm_Initialize()
matriz = Worksheets("Hoja2").Range("a2").CurrentRegion
With ListBox1
    .List = matriz
    .ColumnCount = Worksheets("Hoja2").Range("a2").CurrentRegion.Rows.Count
    .ColumnWidths = "4;4;4;4;4"
End With
End Sub
Respuesta
1

Si es un combobox de Control ActiveX

Pon el siguiente código en los eventos de tu hoja

Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    Set h2 = Sheets("Hoja2")
    ActiveSheet.ComboBox1.Clear
    For i = 2 To h2.Range("A" & Rows.Count).End(xlUp).Row
        ActiveSheet.ComboBox1.AddItem h2.Cells(i, "A").Value
    Next
End Sub

Sigue las Instrucciones para poner la macro en los eventos de worksheet

  1. Abre tu libro de excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
  4. En el panel del lado derecho copia la macro

'.[Sal u dos. Dante Amor. No olvides valorar la respuesta. 
'.[Avísame cualquier duda

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas