/ / Excel VBA saraksta lodziņš

Excel VBA saraksta lodziņš

Saraksta lodziņš ir saraksts, kurā lietotājs var izvēlēties vienumu. Lai izveidotu saraksta lodziņš in Excel VBA, izpildiet sekojošus soļus.

1. Cilnē Izstrādātājs noklikšķiniet uz Ievietot.

2. ActiveX Controls grupā noklikšķiniet uz List Box.

Izveidojiet saraksta lodziņu programmā Excel VBA

3. Velciet saraksta lodziņu savā darblapā.

Velciet saraksta lodziņu

Piezīme: jūs varat mainīt kontroles nosaukumu, ar peles labo pogu noklikšķinot uz vadības paneļa (pārliecinieties, vai ir atlasīts Dizaina režīms) un pēc tam noklikšķinot uz Properties (Rekvizīti). Tagad mēs atstāsim ListBox1 kā saraksta lodziņa nosaukumu.

Izveidojiet grāmatas atvērto notikumu. Kods, kas pievienots darbgrāmatā Atvērtā notikuma izpildi veic Excel VBA, kad atverat darbgrāmatu.

4. Atveriet Visual Basic Editor.

5. Divreiz uzklikšķiniet uz šī darbgrāmata Project Explorer.

6. Izvēlieties darbgrāmatu no kreisā nolaižamā saraksta un labajā nolaižamajā sarakstā izvēlieties opciju Atvērt.

Darblapas atklātais notikums programmā Excel VBA

7. Lai saraksta lodziņā pievienotu vienumus, pievienojiet šādus koda rindas darbgrāmatas atvērtam notikumam:

With Sheet1.ListBox1
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

Piezīme: izmantojiet Sheet2, ja jūsu saraksta lodziņš atrodas otrajā darblapā, Sheet3, ja jūsu saraksta lodziņš atrodas trešajā darblapā utt. Ja jūs izmantojat šīs koda līnijas ārpus darba grāmatas Atvērt notikumu, iespējams, vēlēsities pievienot šo koda rindiņu pirms šiem kodu līnijas. Šī koda līnija izdzēš saraksta lodziņu. Tādā veidā jūsu vienumus netiks pievienoti vairākas reizes, ja jūs izpildīsiet kodu vairāk nekā vienu reizi.

ListBox1.Clear

8. Lai izveidotu saiti ar šo saraksta lodziņu šūnā, ar peles labo pogu noklikšķiniet uz saraksta lodziņa (pārliecinieties, vai ir atlasīts dizaina režīms) un noklikšķiniet uz Properties (Rekvizīti). Aizpildiet D3 LinkedCell.

LinkedCell

Piezīme. Skatīt arī īpašumu ListFillRange, lai aizpildītu saraksta lodziņu ar šūnu diapazonu.

9. Saglabājiet, aizveriet un atveriet Excel failu.

Rezultāts:

Saraksta lodziņš

Lai gan dažās situācijās var būt noderīgi tieši ievietot saraksta lodziņu savā darblapā, saraksta lodziņš ir īpaši noderīgs, ja tas tiek ievietots lietotāja formā.

Lasīt arī: