¿Cómo puedo hacer una lista desplegable dinámica en Excel 2003

¿ Saber cómo crear controles en Microsoft Excel le ayuda a hacer su aplicación más dinámica. Excel , una aplicación de hoja de cálculo , puede utilizar los controles para proporcionar al usuario un mayor control de sus datos . Un control ComboBox es una combinación de un cuadro de texto y un cuadro de lista . El usuario puede introducir un elemento de la lista en el cuadro de texto para mostrar el cuadro de lista de una lista de elementos que puede seleccionar. Utilice Visual Basic para Aplicaciones ( VBA ) para crear dinámicamente un control. Instrucciones
1

lanzamiento de Excel 2003 y haga clic en el menú Herramientas. Seleccione Macro y Editor de Visual Basic . Inserte un nuevo módulo haciendo clic en el menú Insertar y seleccione Module. Escriba lo siguiente para crear un nuevo procedimiento :

createDropDownList Sub Private ()

On Error GoTo Err_createDropDownList :
2

Escriba lo siguiente para crear dinámicamente un nuevo ComboBox control en la hoja de cálculo activa Excel :

ActiveSheet.OLEObjects.Add ( ClassType : = " Forms.ComboBox.1 " , Link: = False , _

DisplayAsIcon : = False , izquierda : = 70 , Top : = 60 , _

Ancho: = 100 , Altura: . . = 25 )

Con objeto

AddItem "Item List 1 "

. AddItem "Item List 2 "

. AddItem "Item List 3 "

extremo con

extremo con

Este código también se suman tres elementos al control ComboBox
3

escriba lo siguiente para salir del procedimiento y los errores de la manija: .

Exit_createDropDownList :

Exit Sub

Err_createDropDownList :

MsgBox Err.Description

Reanudar Exit_createDropDownList :

End Sub
4

Press "F5 " para ejecutar el procedimiento de . Usted verá un nuevo control ComboBox creado en su hoja de trabajo.