XL2000: Cómo quitar todos los elementos de un control ListBox o ComboBox

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): 213721
Este artículo se ha archivado. Se ofrece "tal cual" y no se volverá a actualizar.
Resumen
No hay ningún único método que se puede utilizar para quitar todos los elementos de un control ListBox o ComboBox en un UserForm . El método que se utiliza para quitar un elemento depende de si el control de cuadro de lista o cuadro combinado está enlazado a una hoja de cálculo. En este artículo contiene ejemplos que quitan elementos de un control de ejemplo que está enlazado a una hoja de cálculo y un ejemplo de control es no enlazado a una hoja de cálculo.
Más información
Microsoft proporciona ejemplos de programación con fines ilustrativos únicamente, sin ninguna garantía tanto expresa como implícita, incluyendo, pero sin limitarse a, las garantías implícitas de comerciabilidad e idoneidad para un propósito determinado. En este artículo se supone que está familiarizado con el lenguaje de programación que se muestra y las herramientas utilizadas para crear y depurar procedimientos. Los profesionales 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 a necesidades específicas.
Si tiene poca experiencia en programación, desea póngase en contacto con un Microsoft Certified Partner o servicios de consultoría de Microsoft. Para obtener más información, visite estos sitios Web de Microsoft:

Microsoft certificado Partners - https://partner.microsoft.com/global/30000104

Servicios de asesoramiento de Microsoft - http://support.microsoft.com/gp/advisoryservice

Para obtener más información acerca de las opciones de soporte técnico que están disponibles y cómo ponerse en contacto con Microsoft, visite el siguiente sitio Web de Microsoft: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

ListBox o ComboBox que está enlazado a una hoja de cálculo

Para crear un UserForm que contiene un control ListBox que está enlazado a una hoja de cálculo de ejemplo y, a continuación, quitar elementos en el control, siga estos pasos:
  1. Cierre y guarde los libros abiertos y después cree un nuevo libro.
  2. En la Hoja1, escriba los valores siguientes:
           A1: Alpha       A2: Bravo       A3: Charlie       A4: Delta       A5: Echo					
  3. Inicie el Editor de Visual Basic (presione ALT+F11).
  4. Si no está visible la ventana Propiedades , haga clic en Propiedades en el menú Ver (o presione F4).
  5. Si la ventana Explorador de proyectos no está visible, haga clic en Explorador de proyectos en el menú Ver .
  6. En el menú Insertar , haga clic en UserForm .
  7. Dibuje un control ListBox en el UserForm .
  8. Cambie a la ventana de Propiedades (presione F4).
  9. Cambie la propiedad RowSource del control ListBox en el valor siguiente:
    Sheet1! a1: A5
  10. Dibuje un control CommandButton del UserForm .
  11. Haga doble clic en el botón de comando para abrir la ventana de código para el control CommandButton .
  12. En el módulo, escriba el siguiente código para el evento Click de CommandButton :
    Private Sub CommandButton1_Click()    ListBox1.RowSource = ""End Sub					
  13. Ejecutar el UserForm .

    El cuadro de lista que agregó al UserForm se rellena con los valores que introdujo en Sheet1.
  14. Haga clic en el CommandButton .
Todos los elementos se quitan ListBox1.

Control ListBox o ComboBox que no está enlazado a una hoja de cálculo

Para generar un ejemplo UserForm que contiene un control ListBox que se rellena con una matriz de valores cuando se carga el formulario UserForm y, a continuación, quitar elementos en el control, siga estos pasos:
  1. Cierre y guarde los libros abiertos y después cree un nuevo libro.
  2. Inicie el Editor de Visual Basic (presione ALT+F11).
  3. Si no está visible la ventana Propiedades , haga clic en Propiedades en el menú Ver (o presione F4).
  4. En el menú Insertar , haga clic en UserForm .
  5. Haga doble clic en el UserForm para abrir la ventana de código para el UserForm .
  6. En el módulo, escriba el siguiente código para el evento Initialize de UserForm :
    Private Sub UserForm_Initialize()    Dim MyArray As Variant    Dim i As Integer    'Initialize array with values to populate ListBox.    MyArray = Array("Alpha", "Bravo", "Charlie", "Delta","Echo")    For i = LBound(MyArray) To Ubound(MyArray)        'Add a value from MyArray to ListBox1.        UserForm1.ListBox1.AddItem MyArray(i)    NextEnd Sub						
    este procedimiento rellena ListBox1 cuando se carga el UserForm .
  7. Dibuje un control ListBox en el UserForm .
  8. Dibuje un control CommandButton del UserForm .
  9. Haga doble clic en el botón de comando para abrir la ventana de código para el control CommandButton .
  10. En el módulo, escriba el siguiente código para el control CommandButton de evento Click:
    Private Sub CommandButton1_Click()    Dim i As Integer    For i = 1 To ListBox1.ListCount        'Remove an item from the ListBox.        ListBox1.RemoveItem 0    Next iEnd Sub						
    VisualBasic este procedimiento quita todos los elementos de ListBox1.
  11. Ejecutar el UserForm .
  12. Haga clic en el CommandButton .
Todos los elementos se quitan ListBox1.
Referencias
Para obtener más información sobre cómo utilizar el control ListBox, en el Editor de Visual Basic, haga clic en Ayuda de Microsoft Visual Basic en el menú Ayuda , escriba control listbox en el Ayudante de Office o el Asistente para Ayuda y, a continuación, haga clic en Buscar para ver el tema.

Para obtener más información sobre cómo utilizar la propiedad OrigenDeLaFila (RowSource), en el Editor de Visual Basic, haga clic en Ayuda de Microsoft Visual Basic en el menú Ayuda , escriba la propiedad rowsource en el Ayudante de Office o el Asistente para Ayuda y, a continuación, haga clic en Buscar para ver el tema.

Para obtener más información sobre cómo utilizar el método RemoveItem, en el Editor de Visual Basic, haga clic en Ayuda de Microsoft Visual Basic en el menú Ayuda , escriba el método removeitem en el Ayudante de Office o el Asistente para Ayuda y, a continuación, haga clic en Buscar para ver el tema.

XL2000

Advertencia: este artículo se tradujo automáticamente

Propiedades

Id. de artículo: 213721 - Última revisión: 12/05/2015 12:17:42 - Revisión: 3.5

Microsoft Excel 2000 Standard Edition

  • kbnosurvey kbarchive kbmt kbhowto kbprogramming kbui KB213721 KbMtes
Comentarios