วิธีใช้ ListView ด้วยกล่องกาเครื่องหมายใน VBA

ผู้เขียน: Peter Berry
วันที่สร้าง: 11 สิงหาคม 2021
วันที่อัปเดต: 17 พฤศจิกายน 2024
Anonim
Excel VBA - CheckBox
วิดีโอ: Excel VBA - CheckBox

เนื้อหา

การใช้ตัวควบคุม ListView พร้อมช่องทำเครื่องหมายบนแบบฟอร์ม VBA สามารถทำให้แอปพลิเคชันมีชีวิตชีวามากขึ้นโดยการให้ตัวเลือกแก่ผู้ใช้ ListView แสดงรายการโดยใช้หนึ่งในสี่มุมมองที่แตกต่างกันและจัดเรียงไว้ในคอลัมน์ที่มีหรือไม่มีส่วนหัว Microsoft Excel ใช้คุณสมบัติ "ListItems.Add" เพื่อเพิ่มรายการและ "ตรวจสอบ" เพื่อกำหนดรายการที่ผู้ใช้เลือก


คำสั่ง

กรอกข้อมูลลงในตัวควบคุม ListView ใน Excel โดยใช้ VBA (เทคโนโลยี Hemera / Photos.com / รูปภาพ Getty)
  1. เปิด Microsoft Excel คลิกที่แท็บ "นักพัฒนา" และจากนั้นใน "Visual Basic" เพื่อเปิดหน้าต่างตัวแก้ไข VBA คลิกเมนู "แทรก" จากนั้น "UserForm" (แบบฟอร์มผู้ใช้) เพื่อสร้างแบบฟอร์มใหม่ คลิก "เครื่องมือ" "การควบคุมเพิ่มเติม" และเลือกกล่องที่อยู่ถัดจาก "การควบคุม ListView ของ Microsoft" (ตัวควบคุม Microsoft ListView) เพื่อเพิ่มตัวควบคุม "ListView" ใหม่ลงในแบบฟอร์ม

  2. คลิกขวาที่ตัวควบคุม "ListView" แล้วคลิกที่ "Properties" เลื่อนลงมาที่หน้าต่างและเลือก "จริง" ถัดจากตัวเลือก "ช่องทำเครื่องหมาย" คลิก "CommandButton" ในบานหน้าต่าง "Toolbox" จากนั้นในแบบฟอร์มเพื่อเพิ่มปุ่มใหม่ เพิ่มปุ่มที่สองโดยใช้ขั้นตอนเดียวกัน


  3. ดับเบิลคลิกที่ "CommandButton1" เพื่อสร้างเหตุการณ์ใหม่สำหรับปุ่มนั้น เพิ่มรหัสต่อไปนี้เพื่อ "กล่องรายการ" ยอดนิยมที่มีสามรายการ:

    Me.ListView1.ListItems.Add (1) = "ตรวจสอบรายการที่ 1" Me.ListView1.ListItems.Add (2) = "ตรวจสอบรายการ 2" Me.ListView1.ListItems.Add (3) = "ตรวจสอบรายการ 3"

  4. กลับไปที่แบบฟอร์มและดับเบิลคลิกที่ "CommandButton2" เพื่อสร้างเหตุการณ์คลิกใหม่สำหรับปุ่มนั้น เพิ่มรหัสต่อไปนี้เพื่อผ่านรายการ "กล่องรายการ" และแสดงรายการที่เลือกในหน้าต่าง "ทันที":

    สำหรับตัวนับ = 1 ถึง Me.ListView1.ListItems.Count ถ้า Me.ListView1.ListItems.Item (ตัวนับ) ตรวจสอบแล้ว Debug.Print Me.ListView1.ListItems.Item (ตัวนับ) ท้ายข้อความถัดไป

  5. กลับไปที่แบบฟอร์มและคลิก "F5" เพื่อเรียกใช้โปรแกรม จากนั้นคลิก "CommandButton1" เพื่อเติมข้อมูลตัวควบคุม "ListView" แล้วคลิก "CommandButton2" เพื่อแสดงรายการที่เลือก

สิ่งที่คุณต้องการ

  • Microsoft Excel

ใช้งานง่ายและถูกสุขอนามัยมากขึ้นสบู่เหลวจะให้ความชุ่มชื้นและทำความสะอาดมือของคุณโดยไม่ต้องจับสบู่ก้อนปนเปื้อน การทำสบู่เหลวจากแท่งเดียวหรือของเหลือจากผู้อื่นจำนวนหนึ่งสามารถช่วยประหยัดเงินและยังให้โอก...

การเตรียมกระดูกสำหรับงานฝีมือต้องใช้ด้วง "dermetidae" เพื่อทำความสะอาดกระดูก ด้วงเหล่านี้อยู่รอดได้โดยการกินเนื้อเน่าและสามารถพบได้ในเว็บไซต์ taxidermy ออนไลน์ นี่เป็นวิธีการเตรียมกระดูกที่แ...

ปรากฏขึ้นในวันนี้