Listeboks i Excel VBA (eksempler) - Hvordan lage listerute i Excel?

Innholdsfortegnelse

Listeboks i VBA er en liste som er tilordnet en variabel, og listen har forskjellige innganger å velge på. Fra listeboksen kan vi velge flere alternativer samtidig, listeboksen kan gjøres til en brukerform i Excel VBA ved å velge listen boksalternativ og tegner det på brukerskjemaet for en listeboks, vi har et navngitt område som har visse verdier gitt for å velge i en listeboks.

Hva er listeboks i Excel VBA?

En listeboks er en liste hvor en bruker kan velge et element. List Box i Excel VBA kan brukes hvis du vil vise en liste over verdier som brukerne kan velge mellom.

Hvordan lage listerute i Excel?

Følg disse trinnene for å opprette listeboksen i Excel-regneark:

Først må du aktivere Developer-fanen for å utmerke seg synlig på båndet, slik at du kan komme til VBA og ActiveX-kontrollkommandoene. For å få frem kategorien Utvikler , hente frem dialogboksen Alternativer for Excel , klikk Tilpass bånd i Excel , og merk av for Utvikler.

  • Klikk på Excel-båndet, velg deretter kategorien Utvikler, og klikk deretter på Sett inn, og klikk deretter på listebokskontrollen for å sette inn den nye listeboksen i Excel-regnearket.
  • Deretter tegner du et rektangel i Excel-regnearket for å opprette listeboksen i Excel.
  • Når du velger List Boxin excel, klikker du på utviklerfanen og velger Egenskaper. Egenskaper-vinduet åpnes.
  • I vinduet Egenskaper, for innstillingen List Fill Range, angir du Dager - det navngitte området med ukedagene.
  • Klikk i egenskapen Multi-Select, og velg 1-fmMultiSelectMulti fra rullegardinlisten, som vist på skjermbildet nedenfor.
  • Klikk i List Style-egenskapen, og velg 1-fmListStyleOption fra rullegardinlisten. Dette legger til avkrysningsruter til venstre for listeelementene, som vist i skjermbildet nedenfor.
  • Lukk Egenskaper-vinduet.

Du kan lukke designmodus ved å klikke på designmodus.

Hvordan lage listerute i Excel VBA?

Du kan vurdere følgende eksempel for å få en bedre forståelse av VBA List Box:

Eksempel 1

For å koble denne listeboksen til en celle, høyreklikker du på listeboksen (sørg for at designmodus er valgt) og klikker på Egenskaper. Fyll ut B17 for koblet celle, som vist på skjermbildet nedenfor.

Månedslistenavn som måned går til eiendommer, og velg listefyllingsområde som måned.

Data vil endres i celle B17-celler når du endrer ditt valg i listeboksen, som vist på skjermbildet nedenfor.

Eksempel 2 - Hvordan lage en listeboks på et brukerskjema?

  • Gå til kategorien Utvikler, og klikk deretter Visual Basic fra koden, eller trykk Alt + F11.
  • Gå til Sett inn-menyen, klikk UserForm.
  • Dra listebokskontroll på brukerskjemaet fra verktøykassen.
  • Dobbeltklikk på UserForm, og velg hendelsen Userform som vist i skjermbildet nedenfor.
  • Legg nå til følgende kode i mellomprosedyren.

Privat underbrukerForm_Initialize ()

ListBox1.AddItem “MBA”

ListBox1.AddItem “MCA”

ListBox1.AddItem “MSC”

ListBox1.AddItem “MECS”

ListBox1.AddItem “CA”

Slutt Sub

  • Trykk nå 'F5' for å kjøre koden.

Eksempel 3 - Hvordan legge til en dynamisk listebokskontroll

Legg til en dynamisk listebokskontroll på brukerformen ved hjelp av VBA.

  • Legg til en kommandoknapp på brukerskjemaet fra verktøykassen.
  • Høyreklikk på kommandoknappen, klikk egenskaper.
  • Endre kommandoknappteksten til 'Create_Listbox'
  • Dobbeltklikk på kommandoknappen
  • Nå viser den følgende kode.

Privat underkommandoButton1_Click ()

Slutt Sub

  • Ring fremgangsmåten nedenfor som heter 'Add_Dynamic_Listbox' og finn fremgangsmåten nedenfor for å kjøre.

Sub Add_Dynamic_Listbox ()

'Legg til dynamisk listeboks og tilordne den til objektet' LstBx '

Sett LstBx = UserForm3.Controls.Add (“Forms.ListBox.1”)

'Listeboksposisjon

LstBx. Venstre = 20

LstBx.Top = 10

Slutt Sub

  • Klikk nå F5 for å kjøre makroen.
Hvordan legge til elementer i listebokskontroll i VBA?

Privat subinnsats _Items _To_LstBox ()

ListBox1.AddItem "Element 1"

ListBox1.AddItem “Item 2”

ListBox1.AddItem “Item 3”

ListBox1.AddItem “Item 4”

ListBox1.AddItem “Item 5”

Slutt Sub

Hvordan tømmer du elementer fra listebokskontroll ved hjelp av VBA?

Sub Clr_LstBx ()

UserForm3.ListBox1.Clear

Slutt Sub

Eksempel 4

Anta at vi har salgsdata, og at vi vil ha det grafiske salgsinformasjonen for brukergrensesnittet ved å velge valg av listeboks. Deretter må vi endre valgt indekscelle som cellekobling og bruke VLOOKUP-formelen for å hente salgsdetaljene som vist i skjermbildene nedenfor.

Ting å huske på listeboksen i Excel VBA

En listeboks i Excel kan brukes til å velge flere elementer fra den.

Interessante artikler...