Cómo agregar datos a un control ComboBox o un ListBox en Excel para Mac

Id. de artículo: 185388 - Ver los productos a los que se aplica este artículo
Expandir todo | Contraer todo

En esta página

Resumen

En este artículo proporciona ejemplos de cómo utilizar un Microsoft macro de Visual Basic para aplicaciones para rellenar un control ListBox o ComboBox .

Más información

Microsoft proporciona ejemplos de programación con fines ilustrativos únicamente, sin ninguna garantía tanto expresa como implícita. Esto incluye, entre otras, las garantías implícitas de comerciabilidad e idoneidad para un fin determinado. Este artículo se supone que está familiarizado con el lenguaje de programación que se muestra y con las herramientas que se utilizan para crear y depurar procedimientos. Los ingenieros de soporte técnico de Microsoft pueden explicarle la funcionalidad de un determinado procedimiento, pero no modificarán estos ejemplos para ofrecer mayor funcionalidad ni crearán procedimientos que cumplan sus requisitos específicos.
Puede utilizar un control, como un cuadro combinado o un cuadro de lista en un formulario de hoja de cálculo o de usuario. Los métodos para rellenar los controles son similares. Los ejemplos en este artículo utilizan los controles de un formulario de usuario.

Cómo utilizar un cuadro de entrada y el método AddItem para rellenar un cuadro de lista

Nota : en este ejemplo también se puede utilizar con un cuadro combinado.

Para rellenar un control ListBox mediante un cuadro de entrada y el método AddItem , siga estos pasos:
  1. Crear un nuevo libro en Microsoft Excel para Mac.
  2. Presione opción + F11 para iniciar el Editor de Visual Basic.
  3. En el menú Insertar , haga clic en UserForm .
  4. Crear un control ListBox y dos controles CommandButton en el formulario de usuario.
  5. Seleccione el primer botón de comando. Presione F6 para ver las propiedades de ventana. Escriba Escriba un nuevo elemento en el cuadro de propiedad de título .
  6. Seleccione el segundo botón de comando. Presione F6 para ver las propiedades de ventana. Escriba Cerrar en el título del cuadro de propiedad.
  7. Haga doble clic en el formulario de usuario. Aparecerá la ventana de código para el formulario de usuario.
  8. Escriba el siguiente código:
    Private Sub CommandButton1_Click()
        Dim x As Variant
    
        x = InputBox _
        ("Type Data To Be Placed Into The ListBox and Click OK")
    
        ListBox1.AddItem x
    End Sub
    
    Private Sub CommandButton2_Click()
       ' Close the UserForm.
       Unload Me
    End Sub
    					
  9. En el menú Ejecutar , haga clic en Ejecutar Sub/UserForm para ejecutar el formulario de usuario.
  10. Haga clic en Escriba un nuevo elemento . Escriba prueba en el cuadro de entrada que aparece. Haga clic en Aceptar .
prueba se agrega a la lista en el cuadro de lista en el formulario de usuario. Para cerrar el formulario de usuario, haga clic en Cerrar .

Cómo utilizar la propiedad Column para agregar elementos a un cuadro combinado

Nota : también puede utilizar este ejemplo con un cuadro de lista.

Para rellenar un cuadro combinado mediante la propiedad de columna , siga estos pasos:
  1. Inicie Excel para Mac y crear un nuevo libro.
  2. Escriba los datos siguientes en Sheet1 del libro nuevo:
          A1: Apples
          A2: Pears
          A3: Bananas
    					
  3. Presione opción + F11 para iniciar el Editor de Visual Basic.
  4. En el menú Insertar , haga clic en UserForm .
  5. Crear un control ComboBox y dos controles CommandButton en el formulario de usuario.
  6. Seleccione el primer botón de comando. Presione F6 para ver las propiedades de ventana. Escriba Escriba datos en el título del cuadro de propiedad.
  7. Seleccione el segundo botón de comando. Presione F6 para ver las propiedades de ventana. Escriba Cerrar en el título del cuadro de propiedad.
  8. Haga doble clic en el formulario de usuario. Aparecerá la ventana de código para el formulario de usuario.
  9. Escriba el siguiente código:
    Private Sub CommandButton1_Click()
       Dim MyArray(0, 2) As String
    
       MyArray(0, 0) = Worksheets(1).Range("A1").Value
       MyArray(0, 1) = Worksheets(1).Range("A2").Value
       MyArray(0, 2) = Worksheets(1).Range("A3").Value
    
       ComboBox1.Column() = MyArray
    End Sub
    
    Private Sub CommandButton2_Click()
      ' Close the UserForm.
      Unload Me
    End Sub
    					
  10. En el menú Ejecutar , haga clic en Ejecutar Sub/UserForm para ejecutar el formulario de usuario.
  11. Cuando aparezca el formulario de usuario, haga clic en Escribir datos .
  12. Haga clic en la flecha desplegable del cuadro combinado.
Puede seleccionar manzanas , Peras o Bananas en el cuadro combinado. Para cerrar el formulario de usuario, haga clic en Cerrar .

Referencias

Para obtener más información sobre formularios de usuario, en el Editor de Visual Basic, haga clic en el Ayudante, escriba UserForms y, a continuación, haga clic en Buscar para ver los temas devueltos.

Propiedades

Id. de artículo: 185388 - Última revisión: martes, 23 de enero de 2007 - Versión: 3.2
La información de este artículo se refiere a:
  • Microsoft Excel 2004 for Mac
  • Microsoft Excel X para Macintosh
  • Microsoft Excel 2001 para Macintosh
  • Microsoft Excel 98 para Macintosh
Palabras clave: 
kbmt kbhowto kbprogramming KB185388 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 185388

Enviar comentarios