Tạo list box từ dữ liệu có filter được không ạ

Liên hệ QC

vn.danhmay

Thành viên mới
Tham gia
8/11/18
Bài viết
41
Được thích
3
Dạ như tiêu đề. Em có nhu cầu sử dụng list box đọc và ghi dữ liệu trực tiếp trên dữ liệu. Nhưng khi em mở list box sau khi filter thì vẫn hiện toàn bộ dữ liệu. Có cách nào để list box lấy được dữ liệu của chỉ các dòng filter không ạ.
 
Dạ như tiêu đề. Em có nhu cầu sử dụng list box đọc và ghi dữ liệu trực tiếp trên dữ liệu. Nhưng khi em mở list box sau khi filter thì vẫn hiện toàn bộ dữ liệu. Có cách nào để list box lấy được dữ liệu của chỉ các dòng filter không ạ.
Tốt nhất là đã dùng VBA thì không nên Fiter.Bạn có thể viết code tìm kiếm theo chức năng Fiter.
 
Upvote 0
Dạ như tiêu đề. Em có nhu cầu sử dụng list box đọc và ghi dữ liệu trực tiếp trên dữ liệu. Nhưng khi em mở list box sau khi filter thì vẫn hiện toàn bộ dữ liệu. Có cách nào để list box lấy được dữ liệu của chỉ các dòng filter không ạ.
Bạn có thể dùng một combobox để lọc để show in listbox hoặc textbox gõ vào để lọc.
 
Upvote 0
Có gì đâu, thì bạn nạp những dòng hiện vào listbox
 
Upvote 0
Bạn có thể dùng một combobox để lọc để show in listbox hoặc textbox gõ vào để lọc.
Làm sao để ghi dữ liệu chính xác vào cái dòng mình đã lọc ạ. Do kiến thức mình còn ít nên hông rõ lắm. bạn có thể giúp mình được không.

Dữ liệu của mình là một list danh sách. List box của mình sẽ hiện thông tin trên data. Click vào nó sẽ hiện giá trị ở các ô nhỏ ở dưới. Ví dụ như mình chọn phần tử nào trong danh sách thì mình sẽ note lại vào một ô trong cái dòng đó. Mà mình tìm hiểu trên mạng mãi vẫn không ra hoặc mình không biết từ khóa.
Bài đã được tự động gộp:

Có gì đâu, thì bạn nạp những dòng hiện vào listbox
Nạp dòng hiện vào list box thì viết code như thế nào ạ.
 
Upvote 0
Bạn tìm trên diễn đàn hình như có code mẫu àh, mình không có ngồi trên máy tính nên không nhớ
 
Upvote 0
Làm sao để ghi dữ liệu chính xác vào cái dòng mình đã lọc ạ. Do kiến thức mình còn ít nên hông rõ lắm. bạn có thể giúp mình được không.

Dữ liệu của mình là một list danh sách. List box của mình sẽ hiện thông tin trên data. Click vào nó sẽ hiện giá trị ở các ô nhỏ ở dưới. Ví dụ như mình chọn phần tử nào trong danh sách thì mình sẽ note lại vào một ô trong cái dòng đó. Mà mình tìm hiểu trên mạng mãi vẫn không ra hoặc mình không biết từ khóa.
Bài đã được tự động gộp:


Nạp dòng hiện vào list box thì viết code như thế nào ạ.
Bạn đưa code đã làm lên chỉnh sửa cho nhanh
 
Upvote 0
@vn.danhmay
Nạp dòng đang hiển thị đại khái thế này
Mã:
Dim a As Integer
Dim j, k
Dim Rng As Range
a = Cells(Rows.Count, 1).End(xlUp).Row
Me.Box.RowSource = ""
Set Rng = Sheet1.Range("A2:A" & a).SpecialCells(xlCellTypeVisible)
For Each j In Rng
    Me.Box.AddItem j
Next j
Me.Box.SetFocus
 
Upvote 0
Upvote 0
@vn.danhmay
Nạp dòng đang hiển thị đại khái thế này
Mã:
Dim a As Integer
Dim j, k
Dim Rng As Range
a = Cells(Rows.Count, 1).End(xlUp).Row
Me.Box.RowSource = ""
Set Rng = Sheet1.Range("A2:A" & a).SpecialCells(xlCellTypeVisible)
For Each j In Rng
    Me.Box.AddItem j
Next j
Me.Box.SetFocus
Bạn ơi, làm cách này thì làm sao mình xác định giá trị dòng cần nhập là bao nhiêu được bạn nhỉ. Tại list của mình mình muốn note thẳng lên trên đó á bạn.
 
Upvote 0
Bạn ơi, làm cách này thì làm sao mình xác định giá trị dòng cần nhập là bao nhiêu được bạn nhỉ. Tại list của mình mình muốn note thẳng lên trên đó á bạn.
Có lẽ bạn khai báo thêm 1 mảng dùng chung, khi khởi tạo, nạp các chỉ số dòng vào mảng này. Biến i lấy các giá trị của mảng này.
 
Upvote 0
Bạn đến đây tham khảo thử, xem có giúp ích được chút nào cho bạn không: https://www.giaiphapexcel.com/diend...ó-lưu-lên-trang-tính-Đưa-bài-giúp-bạn.148762/
Dữ liệu giả lập của bạn hời hợt quá & như vậy làm khó . . . .



IDTitle 01Title 02Title 03Title 04Title 05Title 06Title 07Title 08Title 09SelectTitleTitleTitleTitle% 2018
1Cont 01Cont11Cont 30Cont40Cont 50Cont60Cont 70Cont 80Cont90GPE 01Cont100Cont200Cont300
4.017%​
2Cont 02Cont12Cont 31Cont41Cont 51Cont61Cont 71Cont 81Cont91GPE 02Cont101Cont201Cont301
3.585%​
3Cont 03Cont13Cont 32Cont42Cont 52Cont62Cont 72Cont 82Cont92GPE 03Cont102Cont202Cont302
-0.532%​
4Cont 04Cont14Cont 33Cont43Cont 53Cont63Cont 73Cont 83Cont93Cont103Cont203Cont303
4.580%​
5Cont 05Cont15Cont 34Cont44Cont 54Cont64Cont 74Cont 84Cont94GPE 05Cont104Cont204Cont304
12.799%​
6Cont 06Cont16Cont 35Cont45Cont 55Cont65Cont 75Cont 85Cont95Cont105Cont205Cont305
8.445%​
7Cont 07Cont17Cont 36Cont46Cont 56Cont66Cont 76Cont 86Cont96Cont106Cont206Cont306
14.133%​
8Cont 08Cont18Cont 37Cont47Cont 57Cont67Cont 77Cont 87Cont97Cont107Cont207Cont307
-12.516%​
9Cont 09Cont19Cont 38Cont48Cont 58Cont68Cont 78Cont 88Cont98SelectCont108Cont208Cont308
5.592%​
10Cont 10Cont20Cont 39Cont49Cont 59Cont69Cont 79Cont 89Cont99GPE 10Cont109Cont209Cont309
2.099%​
 
Lần chỉnh sửa cuối:
Upvote 0
Bạn ơi, làm cách này thì làm sao mình xác định giá trị dòng cần nhập là bao nhiêu được bạn nhỉ. Tại list của mình mình muốn note thẳng lên trên đó á bạn.
Nếu tôi hiểu được ý thì làm thế này. Khi thêm dữ liệu vào combobox thì thêm chỉ số dòng trên sheet của nó vào cột ẩn của combobox:
- cần thêm 1 cột dữ liệu vào combobox: columncount = 1, thêm chỉ số vào cột 2 (cột 1 do chỉ số cột tính từ 0)
- cần thêm 2 cột dữ liệu vào combobox: columncount = 2, thêm chỉ số vào cột 3 (cột 2 do chỉ số cột tính từ 0)
...

Khi cần thì đọc chỉ số dòng trên sheet của dữ liệu từ cột ẩn.
 
Upvote 0
Web KT
Back
Top Bottom