XL2000: Ako odstrániť všetky položky z ListBox alebo ComboBox

Preklady článku Preklady článku
ID článku: 213721 - Zobraziť produkty, ktorých sa tento článok týka.
Rozbaliť všetko | Zbaliť všetko

Na tejto stránke

SUHRN

Neexistuje jednotný spôsob, pomocou ktorých môžete odstrániť všetky položky zListBox alebo ComboBox kontrolu na UserForm. Metóda, ktorá umožňuje odstrániť položku závisí, či ListBox alebo ComboBox Ovládací prvok viazaný na pracovnom hárku. Tento článok obsahuje príklady, že odstránenie položiek zo vzorky kontroly, ktorý je viazaný na pracovnom hárku a kontrola vzorky, ktorá je nie viazané na pracovnom hárku.

DALSIE INFORMACIE

Spoločnosť Microsoft poskytuje príklady programovacieho základňa, bez záruky buď vyjadrenej alebo implicitnej záruky, vrátane, ale nie výlučne, implicitných záruk obchodovateľnosti a vhodnosti na konkrétny účel. Tento článok predpokladá, že ovládate predvádzaný programovací jazyk a nástroje na vytváranie a ladenie procedúr. Microsoft podporu odborníkov môže pomôcť vysvetliť funkčnosť konkrétny postup, ale nie modifikuje tieto príklady poskytovať pridanú funkčnosť alebo výstavbe postupy vašim špecifickým potrebám.
Ak máte obmedzené programovania skúsenosti, budete chcieť kontaktovať Microsoft Certified Partner alebo Microsoft poradenských služieb. Pre viac informácií, navštívte týchto webových lokalít spoločnosti Microsoft:

Microsoft certifikované partneri- https://partner.Microsoft.com/Global/30000104

Poradenské služby Microsoft- http://support.Microsoft.com/GP/advisoryservice

Ďalšie informácie o možnosti podpory, ktoré sú k dispozícii a o tom, ako kontaktovať spoločnosť Microsoft, navštívte nasledujúcu webovú lokalitu spoločnosti Microsoft:http://support.Microsoft.com/default.aspx?scid=FH;EN-US;CNTACTMS

ListBox alebo ComboBox ovládacieho prvku, ktorý je viazaný na pracovnom hárku

Vybudovať vzorky UserForm ktorý obsahuje ListBox Ovládací prvok, ktorý je viazaný na pracovnom hárku a potom odstráňte položky v ovládacom prvku, postupujte nasledovne:
  1. Zatvorte všetky otvorené zošity a potom vytvorte nový zošit.
  2. Na hárku s názvom Hárok1, napíšte nasledovné hodnoty:
           A1: Alpha
           A2: Bravo
           A3: Charlie
           A4: Delta
           A5: Echo
    					
  3. Spustite Editor jazyka Visual Basic (stlačte kombináciu klávesov ALT + F11).
  4. Ak Vlastnosti okno nie je zobrazený, kliknite na tlačidlo Vlastnosti na View ponuka (alebo stlačte F4).
  5. Ak Prieskumník projektu okno nie je zobrazený, kliknite na tlačidlo Prieskumník projektu na View ponuka.
  6. Na Vložiť ponuky, kliknite na tlačidlo UserForm.
  7. Nakresliť ListBox kontrolu na UserForm.
  8. Prepnúť na Vlastnosti okno (stlačte F4).
  9. Zmena RowSource Vlastnosť ListBox kontrolu na nasledovnú hodnotu:
    Hárok1!A1: A5
  10. Nakresliť CommandButton kontrolu na UserForm.
  11. Dvakrát kliknite na CommandButton otvorenie okna kód pre CommandButton.
  12. Do modulu zadajte nasledujúci kód pre CommandButton Kliknite na udalosť:
    Private Sub CommandButton1_Click()
        ListBox1.RowSource = ""
    End Sub
    					
  13. Spustiť UserForm.

    Zozname, ktoré ste pridali do UserForm je osídlena hodnoty, ktoré ste zadali Hárok1.
  14. Kliknite na CommandButton.
Všetky položky sa odstránia z ListBox1.

ListBox alebo ComboBox, ktoré nie je viazané na pracovný hárok

Vybudovať vzorky UserForm ktorý obsahuje ListBox Ovládací prvok, ktorý je osídlena pole hodnôt pri UserForm načíta a potom odstrániť položky v ovládacom prvku, postupujte nasledovne:
  1. Zatvorte všetky otvorené zošity a potom vytvorte nový zošit.
  2. Spustite Editor jazyka Visual Basic (stlačte kombináciu klávesov ALT + F11).
  3. Ak Vlastnosti okno nie je zobrazený, kliknite na tlačidlo Vlastnosti na View ponuka (alebo stlačte F4).
  4. Na Vložiť ponuky, kliknite na tlačidlo UserForm.
  5. Dvakrát kliknite na UserForm otvorenie okna kód pre UserForm.
  6. Do modulu zadajte nasledujúci kód pre UserForm Inicializácia udalosti:
    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)
    
        Next
    End Sub
    						
    Tento postup sa vyplní ListBox1 pri UserForm je načítaný.
  7. Nakresliť ListBox kontrolu na UserForm.
  8. Nakresliť CommandButton kontrolu na UserForm.
  9. Dvakrát kliknite na CommandButton otvorenie okna kód pre CommandButton.
  10. Do modulu zadajte nasledujúci kód pre CommandButtonKliknite na udalosť:
    Private Sub CommandButton1_Click()
        Dim i As Integer
    
        For i = 1 To ListBox1.ListCount
    
            'Remove an item from the ListBox.
            ListBox1.RemoveItem 0
    
        Next i
    End Sub
    						
    Tento postup Visual Basic odstráni všetky položky z ListBox1.
  11. Spustiť UserForm.
  12. Kliknite na CommandButton.
Všetky položky sa odstránia z ListBox1.

ODKAZY

Ďalšie informácie o používaní ovládací prvok zoznam v editore jazyka Visual Basic, kliknite na tlačidlo Pomocník programu Microsoft Visual Basic na Pomocník ponuka, typu Ovládací prvok zoznam v Asistentovi programu Office alebo Sprievodcu odpoveďami a potom kliknite na tlačidlo Vyhľadávanie Ak chcete zobraziť tému.

Ďalšie informácie o používaní vlastnosť RowSource v editore jazyka Visual Basic, kliknite na tlačidlo Pomocník programu Microsoft Visual Basic na Pomocník ponuka, typu rowsource nehnuteľnosti v Asistentovi programu Office alebo Sprievodcu odpoveďami a potom kliknite na tlačidlo Vyhľadávanie Ak chcete zobraziť tému.

Ďalšie informácie o používaní RemoveItem metódy v editore jazyka Visual Basic, kliknite na tlačidlo Pomocník programu Microsoft Visual Basic na Pomocník ponuka, typu removeitem metóda v Asistentovi programu Office alebo Sprievodcu odpoveďami a potom kliknite na tlačidlo Vyhľadávanie Ak chcete zobraziť tému.

Note This is a "FAST PUBLISH" article created directly from within the Microsoft support organization. The information contained herein is provided as-is in response to emerging issues. As a result of the speed in making it available, the materials may include typographical errors and may be revised at any time without notice. See Terms of Use for other considerations.

Vlastnosti

ID článku: 213721 - Posledná kontrola: 21. októbra 2011 - Revízia: 2.0
Informácie v tomto článku sa týkajú nasledujúcich produktov:
  • Microsoft Excel 2000 Standard Edition
Kľúčové slová: 
kbhowto kbprogramming kbui kbmt KB213721 KbMtsk
Strojovo preložené
DÔLEŽITÉ: Tento článok bol preložený pomocou softvéru na strojový preklad od spoločnosti Microsoft, nie prekladateľom. Spoločnosť Microsoft ponúka články preložené prekladateľmi aj strojovo preložené články, vďaka čomu máte možnosť prístupu ku všetkým článkom databázy Knowledge Base vo svojom jazyku. Strojovo preložený článok však nie je vždy perfektný. Môže obsahovať chyby týkajúce sa slovnej zásoby, syntaxe alebo gramatiky, podobne ako cudzinec môže robiť chyby, keď rozpráva vašim jazykom. Spoločnosť Microsoft nenesie zodpovednosť za akékoľvek nepresnosti, chyby alebo škody spôsobené akýmkoľvek nepresným prekladom obsahu alebo jeho použitím zo strany zákazníkov. Spoločnosť Microsoft softvér na strojový preklad pravidelne aktualizuje.
Pokiaľ chcete vidieť anglickú verziu článku, kliknite sem:213721

Odošlite odozvu

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com