Cuando intento cargo un cuadro combinado me sale el siguiente mensaje:
Se ha producido un error 424 - Se requiere un objeto
Este es el código que utilice:
Sub Cargar_cbo_Unidad()
Dim Rango As Range
Dim Celda As Range
Range("B4").Select
Set Rango = Worksheets("Unidades").Range(Selection, Selection.End(xlDown)).Select
'Cuando utilizo un rango en especifico el código funciona
Set Rango = Worksheets("Unidades").Range("B4:B6")
For Each Celda In Rango
cbo_Unidad.AddItem Celda.Value
Next Celda
End Sub