Combobox en Excel
Hola:
Quisiera saber como puedo tomar los datos de la hoja 2 de mi libro, para pasarlos a un combobox que tengo en la hoja 1, es una base de datos de 50 nombres y quiero agregarlos al combobox.
Espero ser lo más explicito para que puedas ayudarme.
Te agradecía mucho tu ayuda
Quisiera saber como puedo tomar los datos de la hoja 2 de mi libro, para pasarlos a un combobox que tengo en la hoja 1, es una base de datos de 50 nombres y quiero agregarlos al combobox.
Espero ser lo más explicito para que puedas ayudarme.
Te agradecía mucho tu ayuda
1 Respuesta
Respuesta de Elsa Matilde
1
Te recomiendo (también al resto de usuarios que puedan estar leyendo esta consulta) que aclaren qué tipo de control están utilizando, si de Barra Formulario o Cuadro de controles, ya que las instrucciones son distintas.
Explico para combobox (Barra formulario).
Manualmente: clic derecho sobre el control, en Rango de entrada ingresar la lista:
Hoja2!$A$1:$A$50
Por macro, que copiarás en un módulo ajustando el nombre de tu control:
Sub CargaCombo()
'
' Macro escrita por Elsamatilde
'
'ajustar nbre del control
ActiveSheet.Shapes("Drop Down 1").Select
With Selection
.ListFillRange = "Hoja2!$A$1:$A$50"
.LinkedCell = ""
.DropDownLines = 8
.Display3DShading = False
End With
Range("B10").Select
End Sub
Saludos
Elsa
** En este sitio encontrarás otras rutinas para controles:
Explico para combobox (Barra formulario).
Manualmente: clic derecho sobre el control, en Rango de entrada ingresar la lista:
Hoja2!$A$1:$A$50
Por macro, que copiarás en un módulo ajustando el nombre de tu control:
Sub CargaCombo()
'
' Macro escrita por Elsamatilde
'
'ajustar nbre del control
ActiveSheet.Shapes("Drop Down 1").Select
With Selection
.ListFillRange = "Hoja2!$A$1:$A$50"
.LinkedCell = ""
.DropDownLines = 8
.Display3DShading = False
End With
Range("B10").Select
End Sub
Saludos
Elsa
** En este sitio encontrarás otras rutinas para controles:
