Hỏi về cách sử dụng Listview trong VBA

[dautay2601]

Chào các Bác

Em đang sử dụng Listview trên UserForm để hiển thị 1 bảng nằm trong Sheet1 của Excel. Khi người dùng bật UserForm lên sẽ lựa chọn 1 vài dòng trong Listview, sau đó mong muốn là ấn 1 nút thì toàn bộ các dòng đã được lựa chọn trên ListView sẽ được hiển thị tại sheet2.

Em đang bí Code xác định dòng nào trong Listview đã được lựa chọn, vậy nhờ các Bác chỉ giáo giúp em với ạ.

 

[batman1]

Các item có trong tập ListItems. Vậy thì duyệt tập này và kiểm tra từng item, xem nó có được chọn hay không.

Dim item As ListItem
    For Each item In ListView1.ListItems
        If item.Selected Then Debug.Print item.text
    Next item

Nếu ListView1.MultiSelect = FALSE thì khi tìm thấy item được chọn thì nên ra khỏi vòng lặp - Exit For.

 

[dautay2601]

Chào Bác batman1 ạ
Em đã chạy thử của Bác và OK rồi ạ. Cảm ơn Bác nhiều nhé!