Med ett " ListView " kontroll med kryssrutor i Visual Basic for Applications ( VBA ) form kan göra din ansökan mer dynamisk genom att förse användaren med alternativ . En " ListView " kontroll visar objekt med hjälp av någon av fyra olika vyer , och ordnar objekt i kolumner med eller utan spalt Microsoft Excelheadings . Använd " ListItems.Add " egenskapen att lägga till objekt , och använda " checked " egenskap för att avgöra vilka objekt kontrollerades av användaren . Saker du behöver
Microsoft Excel
Visa fler instruktioner
1
Launch Microsoft Excel , klicka på " Utvecklare " fliken och klicka på " Visual Basic " för att öppna VBA Editor fönster . Klicka på " Infoga " -menyn och klicka på " UserForm " för att skapa en ny form . Klicka på " Verktyg ", klicka " ytterligare kontroller , " och markera rutan bredvid " Microsoft ListView kontroll " för att lägga till en ny " ListView " kontrollen i formuläret .
2
Högerklicka på " ListView " kontroll och klicka på" Egenskaper ". Rulla ner fönstret Egenskaper och välj " Sant " bredvid " kryssrutor. " Klicka " CommandButton " från " Toolbox " rutan och klicka på formuläret för att lägga till en ny knapp kontroll . Lägg till en andra knapp med samma teknik .
3
Dubbelklicka på " CommandButton1 " för att skapa en click-händelse för denna knapp . Lägg till följande kod för att befolka " ListBox " med tre punkter :
Me.ListView1.ListItems.Add ( 1 ) = " Check Punkt 1 "
Me.ListView1.ListItems.Add ( 2 ) = " Check Punkt 2 "
Me.ListView1.ListItems.Add ( 3 ) = " Check Punkt 3 "
4
Växla tillbaka till formuläret och dubbelklicka på " CommandButton2 " för att skapa en ny click-händelse för denna knapp . Lägg till följande kod i en slinga genom " ListBox " produkter och skriva ut alla markerade objekt till " omedelbar " fönstret :
för Counter = 1 Att Me.ListView1.ListItems.Count
p Om mig . ListView1.ListItems.Item ( räknare ) . Kontrollerad Sedan
Debug.Print Me.ListView1.ListItems.Item ( räknare ) . Text
End If
Nästa
5
Växla tillbaka till formuläret och klicka på " F5 " för att köra programmet . Klicka " CommandButton1 " att befolka " ListView " kontroll och klicka på " CommandButton2 " för att visa markerade objekt .
