tengo un problema con visualizar una lista despegable dependiente en VBA con Excel para ingresar registros, esta es mi hoja de cálculo llamada DATOS con la tabla, primero tengo un problema con los espacios vacíos que en la lista desplegable me aparecen y no sé cómo quitarlos.
Esta es la fórmula que utilizo en la casilla “B19”: =DESREF(INDIRECTO(DIRECCION(1;COINCIDIR(B15;A1:D1;0)));1;0;11;1)
Esta fórmula la coloque en administrador de nombres con el nombre de: listanombres
El otro problema que tengo es que al hacer este proceso con VBA, me aparece la primera lista, pero al seleccionar un valor me da error.
Mi código es el siguiente en VBA
Private Sub ComboBox1_Change()
ThisWorkbook.Sheets("DATOS").Range("B15").Value = Me.ComboBox1.Value
Me.ComboBox2.Value = ""
Me.ComboBox2.RowSource = "listanombres"
End Sub
Private Sub UserForm_Initialize()
ThisWorkbook.Sheets("DATOS").Range("B15").ClearContents
ComboBox1.List = Worksheets("DATOS").Range("A2:A4").Value
End Sub