Cargar encabezados de una hoja en un combobox

necesito que un combobox me muestre los encabezados de la hoja por ejemplo: nombre, apellido, telefono. Etc.

estos datos se encuentran en la primer fila de la hoja.

1 Respuesta

Respuesta
1

Te anexo el código

Private Sub UserForm_activate()
'Por.Dante Amor
    For i = 1 To Sheets("Hoja1").Cells(1, Columns.Count).End(xlToLeft).Column
        ComboBox1.AddItem Sheets("Hoja1").Cells(1, i)
    Next
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas