Cum se utilizează ListView cu un CheckBox în VBA

Autor: Peter Berry
Data Creației: 11 August 2021
Data Actualizării: 14 Noiembrie 2024
Anonim
Cum se utilizează ListView cu un CheckBox în VBA - Articole
Cum se utilizează ListView cu un CheckBox în VBA - Articole

Conţinut

Folosirea unui control ListView cu casete de selectare pe un formular VBA poate face o aplicație mai dinamică oferind utilizatorilor opțiuni. Un ListView afișează articole folosind una din patru vizualizări diferite și le aranjează în coloane cu sau fără anteturi Microsoft Excel. Utilizați proprietatea "ListItems.Add" pentru a adăuga elemente și "Verificat" pentru a determina ce elemente au fost selectate de utilizator.


instrucțiuni de ghidare

Completați controlul ListView în Excel folosind VBA (Hemera Technologies / Photos.com / Getty Images)
  1. Deschideți Microsoft Excel, faceți clic pe fila "Developer" și apoi pe "Visual Basic" pentru a deschide fereastra editorului VBA. Faceți clic pe meniul "Insert" și apoi pe "UserForm" (formularul utilizatorului) pentru a crea un nou formular. Dați clic pe "Instrumente", "Controale suplimentare" și selectați caseta de lângă "Controlul Microsoft ListView" (controlul Microsoft ListView) pentru a adăuga un nou control "ListView" la formular.

  2. Faceți clic dreapta pe butonul "ListView" și apoi pe "Proprietăți". Derulați în jos fereastra și alegeți "Adevărat" de lângă opțiunea "Căsuțe de verificare". Faceți clic pe "CommandButton" în panoul "Toolbox" și apoi pe formular pentru a adăuga un nou buton. Adăugați un al doilea buton utilizând aceiași pași.


  3. Faceți dublu clic pe "CommandButton1" pentru a crea un eveniment nou pentru acel buton. Adăugați următorul cod în lista populară "ListBox" cu trei elemente:

    Me.ListView1.ListItems.Add (1) = "Verificați elementul 1" Me.ListView1.ListItems.Add (2) = "Verificați elementul 2" Me.ListView1.ListItems.Add (3)

  4. Reveniți la formular și faceți dublu clic pe "CommandButton2" pentru a crea un nou eveniment de clic pentru respectivul buton. Adăugați următorul cod pentru a trece prin elementele "ListBox" și afișați elementele selectate în fereastra "Imediat":

    Pentru counter = 1 Pentru a Me.ListView1.ListItems.Count Dacă Me.ListView1.ListItems.Item (contra). Verificat apoi Debug.Print Me.ListView1.ListItems.Item (contra) .Text Sfârșit Dacă Next

  5. Reveniți la formular și faceți clic pe "F5" pentru a rula programul. Apoi, faceți clic pe "CommandButton1" pentru a popula controlul "ListView" și apoi "CommandButton2" pentru a afișa elementele selectate.


Ce ai nevoie

  • Microsoft Excel

Ce este cercetarea transversală?

Randy Alexander

Noiembrie 2024

Unul dintre primele lucruri pe care ar trebui ă le faceți înainte de a efectua o cercetare ete de a determina tipul de proiect de tudiu pe care îl veți foloi. Numeroși factori influențează a...

Vânzarea de bijuterii de la ușă la ușă poate fi dificilă, mai ale dacă lucrați cu o mare varietate de produe. Trebuie ă găiți o vitrină care ete atât ușor de tranportat, aamblat și demontabi...

Sovietic