Como usar el Combobox en el formulario VBA en Excel Cap 8

Опубликовано: 12 Октябрь 2024
на канале: Sepamos Excel
15,890
179

El Cuadro combinado, también conocido como ComboBox, es un control ActiveX que nos permite crear una lista desplegable de la cual podremos seleccionar alguno de sus elementos. ... Para ambos casos tomaré los valores de la columna A y los insertaré como los elementos del cuadro combinado.
#sepamosexcel #sepamosexcelvba #vbasepamosexcel #sepamosexcelcurso #sepamosexcelviral #excelsepamos #sepamosexcelmacros #excelsepamos #vbasepamosexcel #excel #usarexcel #excelavanzado #excelintermedio #sepamosexcelcapacitacion #capacitacionsepamosexcel #sepamosexcelcapacitaciones #capacitacionessepamosexcel #capacitacionexcel #excelcapacitacion #capacitacionesexcel #excelcapacitaciones #datos #basededatos #cursodeexcel #datosenexcel #formulario #sepamosexcelbuenaventura #sepamosexcelcolombia #formulariosvbaexcel #vbaexcel #excelvba #excelvbatutorial #excelvbs #visual #visualbasic #visualbasicvba #cursodeexcel #cursovba #excelyvba #vbayexcel #vba #cursovba #vbacurso #sepamosexcelbasico #sepamosexcelintermedio #sepamosexcelavanzado #basicosepamosexcel #intermediosepamosexcel #avanzadosepamosexcel #excelsepamos #visual #visualbasic #programacionvba #cursodevba #cursodevba #userform #basic #usarexcel #macrosvba #excelmacros #excelvbamacros #textboxexcel #textbox #label #labelvba #listboxexcel #listbox #combobox #listbvba #comboboxvba #rgb #backcolor #forecolor #listview #listviewvba #click #cap8
------------------------
Dim fila As Integer
Range("e1").Activate
fila = ActiveCell.CurrentRegion.Rows.Count
ActiveCell.Offset(fila, o) = TextBox1.Text
ActiveCell.Offset(fila, 1) = TextBox2.Text
ActiveCell.Offset(fila, 2) = TextBox3.Text
ActiveCell.Offset(fila, 3) = TextBox4.Text
ActiveCell.Offset(fila, 4) = ComboBox1.Text

TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox4 = Empty
ComboBox1 = ""
----------------------------------
ComboBox3.AddItem "JEFE"
ComboBox3.AddItem "POLICIA"
ComboBox3.AddItem "ALCALDE"
ComboBox3.AddItem "SECRETARIO"
ComboBox3.AddItem "JEFE DE SALUD"
ComboBox3.AddItem "OPERADOR"
ComboBox3.AddItem "AUXILIAR"
-------------------------------------------
Youtube:   / @sepamosexcel  
-------------------------------------------
facebook:  / sepamos-excel-101442901878990  
-------------------------------------------
Instagram:  / sepamosexcel  
-------------------------------------------
Grupo:  / 776342862959403