Formula para rango dinámico
Tengo esta formula; =DESREF(Hoja2!$G$2;0;0; CONTARA(Hoja2!$G:$G)-2) y otras muy parecidas con el 2 al final, no permite que inserte datos en celdas alternas, es decir NO SE PUEDE DEJAR ENTRECELDAS VACÍAS tienen que los datos estar seguidos pero, algunas veces por necesidad se tiene que dejar una o 2 celdas vacías y seguir.
Mi pedido es:
Una formula Dinámica para hacer referencia a un Nombre (existente con F3) pero que yo pueda ir agregando datos en la columna sea en celdas contiguas o no pero que en el ComboBox me muestre los datos seguidos, SIN ESPACIOS VACÍOS en el Combo
1 respuesta
Podrías arreglarlo poniendo la fórmula así:
=DESREF(Hoja2!$G$2;0;0;CONTARA(Hoja2!$G:$G)+contar.blanco($G:$G)-2)
Pero lamentablemente tendrá en cuenta las celdas en blanco y entonces te los volcará en tu combo.
Te recomiendo cargar tu combo analizando la columna para despreciar las celdas en blanco y cargar el combo mediante la sentencia additem
Si quedó claro recuerda finalizar la consulta
Gracias por tu pronta respuesta.
Estoy igual que antes. en lo mismo.
Lamentablemente, no tengo el conocimiento para crear las lineas que mencionas.
Si con los datos anteriores me puedes dar una mano, agradezco
Los datos están en Hoja2 del G2 adelante G1 es titulo
Private Sub UserForm_Initialize()
ComboBox1
End Sub
Te mando como quedaría la macro:
Private Sub UserForm_Initialize()
Sheets("hoja2").Select
Range("g2").Select
Range("g65000").End(xlUp).Offset(1, 0).Value = "final"
Do While ActiveCell.Value <> "final"
If ActiveCell.Value <> "" Then
ComboBox1.AddItem ActiveCell
End If
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell.ClearContents
End Subrecuerda finalizar la consulta
