Cần giúp đỡ về file sort & filter tiềm kiếm data ( dùng VBA ạ) (1 người xem)

vovanthanh2602 · 26/6/20

Em chào mọi người.
có thể giúp em được không ạ.

Em có 1 bảng data khoảng 100000 dòng ,ví dụ như hình bên dưới.

Mong muốn của em là tạo 1 nút nhấn , khi nhấn vô nó hiện lên 1 khung để mình paste 1 lúc nhiều số SU vào, (cột màu đỏ ạ), ví dụ em cần tìm số SU :
ab1
ab7
ab14
sau khi paste 3 số này vô và nhấn nút sort thì bảng data tự sort & filter ra những dòng liên quan như bên dưới ạ. ( khung nhập số SU sẽ tắt)
và 1 nút để khi nhấn vào thì file sẽ không còn sort & filter nữa ạ.trở lại trạng thái đan đầu.
với diều kiện là trên cùng 1 sheet lun ạ.

mong mọi người giúp ạ. nếu được sẽ hậu tạ ạ. cảm ơn ạ.

giaiphap · 27/6/20

vovanthanh2602 đã viết:
Em chào mọi người.
có thể giúp em được không ạ.

Em có 1 bảng data khoảng 100000 dòng ,ví dụ như hình bên dưới.
View attachment 240094

Mong muốn của em là tạo 1 nút nhấn , khi nhấn vô nó hiện lên 1 khung để mình paste 1 lúc nhiều số SU vào, (cột màu đỏ ạ), ví dụ em cần tìm số SU :
ab1
ab7
ab14
sau khi paste 3 số này vô và nhấn nút sort thì bảng data tự sort & filter ra những dòng liên quan như bên dưới ạ. ( khung nhập số SU sẽ tắt)
và 1 nút để khi nhấn vào thì file sẽ không còn sort & filter nữa ạ.trở lại trạng thái đan đầu.
với diều kiện là trên cùng 1 sheet lun ạ.
View attachment 240095

mong mọi người giúp ạ. nếu được sẽ hậu tạ ạ. cảm ơn ạ.

Bạn xem file.

vovanthanh2602 · 27/6/20

giaiphap đã viết:
Bạn xem file.

Bạn xem hình nha. mình muốn như trong hình ạ

giaiphap · 27/6/20

vovanthanh2602 đã viết:
Bạn xem hình nha. mình muốn như trong hình ạView attachment 240098

Muốn như hình thì có như hình.

vovanthanh2602 · 27/6/20

giaiphap đã viết:
Muốn như hình thì có như hình.
View attachment 240100

A cho em file đính kèm với ạ.

vovanthanh2602 · 27/6/20

giaiphap đã viết:
Muốn như hình thì có như hình.
View attachment 240100

A ơi bị lỗi không dùng được ạ . a giúp em với nha

giaiphap · 28/6/20

vovanthanh2602 đã viết:
A ơi bị lỗi không dùng được ạ . a giúp em với nha
View attachment 240114

Bỏ dòng code này đi.

Mã:

If ActiveSheet.AutoFilterMode Then ActiveSheet.ShowAllData

vovanthanh2602 · 28/6/20

giaiphap đã viết:
Bỏ dòng code này đi.

Mã:

If ActiveSheet.AutoFilterMode Then ActiveSheet.ShowAllData

Nhưng a ơi. Có 1 vấn đề là khi mình lọc xong á. Nếu mình bỏ loc bằng sort&filter của excel thì nó bị đơ lun.ko thao tác được ạ. A giúp e vs ạ.

giaiphap · 28/6/20

vovanthanh2602 đã viết:
Nhưng a ơi. Có 1 vấn đề là khi mình lọc xong á. Nếu mình bỏ loc bằng sort&filter của excel thì nó bị đơ lun.ko thao tác được ạ. A giúp e vs ạ.

Đó là do máy tính của bạn thôi, chứ máy tính của tui không hề bị.

vovanthanh2602 · 28/6/20

giaiphap đã viết:
Đó là do máy tính của bạn thôi, chứ máy tính của tui không hề bị.

Có nghĩa là sau khi lọc xong. Mình bấm vào nút clear filter trên thanh công cụ ak. Để bỏ lọc tất cả ak. Là mình không thao tác ghi chép j được ạ.

giaiphap · 28/6/20

vovanthanh2602 đã viết:
Có nghĩa là sau khi lọc xong. Mình bấm vào nút clear filter trên thanh công cụ ak. Để bỏ lọc tất cả ak. Là mình không thao tác ghi chép j được ạ.

Trả lời lần cuối bạn tin hay không tùy bạn. Máy tính tôi vẫn hoạt động bình thường, nhập liệu và chỉnh sửa đều OK sau khi Clear Filter.

SA_DQ · 29/6/20

Nếu là mình thì cột 'SU' sẽ phải có độ dài như nhau; (Điều này quan trọng trong Excel tài lanh bỡi kí tự đại diện)

SU

ab1_

ab10

ab11

ab12

ab13

ab14

ab15

ab16

ab17

ab18

ab19

ab2_

ab20

ab3_

ab4_

ab5_

ab6_

ab7_

ab8_

ab9_

Vấn đề nữa mình chỉ là muốn khuyên tác giả bài đăng: Chớ nên thao tác trực tiếp trên CSDL, dù là AutoFilter
Ta nên chọn cách AdvancedFilter, ngõ hầu tránh triệt để chuyện CSDL 1 lúc nào đó thành đống rác! (Ví dụ như mất điện nguồn tức thới,. . . )

Phuocam · 29/6/20

vovanthanh2602 đã viết:
nếu được sẽ hậu tạ ạ. cảm ơn ạ.

Kèo thơm, hậu tạ cái gì công khai đê ..., hahaha ....

Quang_Hải · 29/6/20

vovanthanh2602 đã viết:
Em chào mọi người.
có thể giúp em được không ạ.

Em có 1 bảng data khoảng 100000 dòng ,ví dụ như hình bên dưới.
View attachment 240094

Mong muốn của em là tạo 1 nút nhấn , khi nhấn vô nó hiện lên 1 khung để mình paste 1 lúc nhiều số SU vào, (cột màu đỏ ạ), ví dụ em cần tìm số SU :
ab1
ab7
ab14
sau khi paste 3 số này vô và nhấn nút sort thì bảng data tự sort & filter ra những dòng liên quan như bên dưới ạ. ( khung nhập số SU sẽ tắt)
và 1 nút để khi nhấn vào thì file sẽ không còn sort & filter nữa ạ.trở lại trạng thái đan đầu.
với diều kiện là trên cùng 1 sheet lun ạ.
View attachment 240095

mong mọi người giúp ạ. nếu được sẽ hậu tạ ạ. cảm ơn ạ.

Bài toán của bạn dễ như là lấy đồ trong túi ra thôi, không cần phải hậu tạ cũng có nhiều thành viên giúp mà. Vì chắc rằng cái mà bạn hậu tạ sẽ không tương xứng 1 phần nhỏ so với kiến thức mà mọi người giúp cho bạn. Mình có góp ý thế này:

1. Nguồn của bạn không nên kẻ khung định dạng vì điều này sẽ làm file nặng và chạy chậm rất rất là chậm
2. Không cần cái form kia chi cho phức tạp, hãy thêm 1 sheet và tạo 1 form để bạn dán dữ liệu cần tìm là được rồi
3. Tạo thêm 1 sheet để gán kết quả sau khi tìm được theo yêu cầu.

Mình nghĩ chỉ đơn giản vậy là được rồi, không nên đao to búa lớn chỉ làm phức tạp vấn đề

Vài lời chia sẻ cùng bạn

vovanthanh2602 · 29/6/20

giaiphap đã viết:
Trả lời lần cuối bạn tin hay không tùy bạn. Máy tính tôi vẫn hoạt động bình thường, nhập liệu và chỉnh sửa đều OK sau khi Clear Filter.

Dạ. Vậy chắc máy e bị lỗi j rồi ạ. E cám ơn ạ

Bài đã được tự động gộp: 29/6/20

SA_DQ đã viết:
Nếu là mình thì cột 'SU' sẽ phải có độ dài như nhau; (Điều này quan trọng trong Excel tài lanh bỡi kí tự đại diện)

SU
ab1_
ab10
ab11
ab12
ab13
ab14
ab15
ab16
ab17
ab18
ab19
ab2_
ab20
ab3_
ab4_
ab5_
ab6_
ab7_
ab8_
ab9_

Vấn đề nữa mình chỉ là muốn khuyên tác giả bài đăng: Chớ nên thao tác trực tiếp trên CSDL, dù là AutoFilter
Ta nên chọn cách AdvancedFilter, ngõ hầu tránh triệt để chuyện CSDL 1 lúc nào đó thành đống rác! (Ví dụ như mất điện nguồn tức thới,. . . )

Cám ơn ạ. Nhưng mình tìm data là để chỉnh sửa thông tin trên dòng đó ạ. Sau đó save lại.
Số SU kí tự bằng nhau ạ. 100000 SU nên độ dài như nhau ạ. Trên là ví dụ thôi ạ. Mất điện là ngoài lệ thôi ạ.

Bài đã được tự động gộp: 29/6/20

quanghai1969 đã viết:
Bài toán của bạn dễ như là lấy đồ trong túi ra thôi, không cần phải hậu tạ cũng có nhiều thành viên giúp mà. Vì chắc rằng cái mà bạn hậu tạ sẽ không tương xứng 1 phần nhỏ so với kiến thức mà mọi người giúp cho bạn. Mình có góp ý thế này:

1. Nguồn của bạn không nên kẻ khung định dạng vì điều này sẽ làm file nặng và chạy chậm rất rất là chậm
2. Không cần cái form kia chi cho phức tạp, hãy thêm 1 sheet và tạo 1 form để bạn dán dữ liệu cần tìm là được rồi
3. Tạo thêm 1 sheet để gán kết quả sau khi tìm được theo yêu cầu.

Mình nghĩ chỉ đơn giản vậy là được rồi, không nên đao to búa lớn chỉ làm phức tạp vấn đề

Vài lời chia sẻ cùng bạn

Dạ. Cám ơn ạ.Nhưng đây là file của chu.mặt định nv rồi ạ. Nên ko chỉnh sửa đc ạ. E cần lọc ra để chỉnh sửa trực tiếp trên dòng data đó ý ạ.

vovanthanh2602 · 2/7/20

giaiphap đã viết:
Muốn như hình thì có như hình.
View attachment 240100

A ơi giúp em 1 chút nữa được không ạ.

Nếu em nhập giá trị cần tìm mà nó tìm không có thì cho nó hiện 1 thông báo là không có data ạ .
Em cảm ơn anh nhiều ạ.

SA_DQ · 2/7/20

vovanthanh2602 đã viết:
. . . . .. Nhưng mình tìm data là để chỉnh sửa thông tin trên dòng đó ạ. Sau đó save lại.
Số SU kí tự bằng nhau ạ. 100000 SU nên độ dài như nhau ạ. Trên là ví dụ thôi ạ. Mất điện là ngoài lệ thôi ạ.

Bạn có số SU có độ dài như nhau (trong file thực tế) Nhưng đưa file giả lập thì tùy tiện về độ dài thì đấy là bạn chưa tôn trọng những người có nhã ý giúp mình.
Tạm biệt!

Maika8008 · 2/7/20

vovanthanh2602 đã viết:
Dạ. Vậy chắc máy e bị lỗi j rồi ạ. E cám ơn ạ

Bài đã được tự động gộp: 29/6/20

Cám ơn ạ. Nhưng mình tìm data là để chỉnh sửa thông tin trên dòng đó ạ. Sau đó save lại.
Số SU kí tự bằng nhau ạ. 100000 SU nên độ dài như nhau ạ. Trên là ví dụ thôi ạ. Mất điện là ngoài lệ thôi ạ.

Nếu chưa biết cách tạo 1 tập hợp SU có độ dài bằng nhau để thay cho SU thực thì phải học thêm để làm trước khi nhờ giúp vụ này. 1 data giả lập cũng phải đúng với kiểu của data thực chứ ai lại đi làm như kiểu của bạn?

vovanthanh2602 · 2/7/20

SA_DQ đã viết:
Bạn có số SU có độ dài như nhau (trong file thực tế) Nhưng đưa file giả lập thì tùy tiện về độ dài thì đấy là bạn chưa tôn trọng những người có nhã ý giúp mình.
Tạm biệt!

Số SU ngẫu nhiên lun bạn ạ. Ko quy định độ dài và kí tự ạ.
File thực tế là của cty. Nên e ko dám đưa hết lên ạ. Bạn thông cảm ạ

Bài đã được tự động gộp: 2/7/20

Maika8008 đã viết:
Nếu chưa biết cách tạo 1 tập hợp SU có độ dài bằng nhau để thay cho SU thực thì phải học thêm để làm trước khi nhờ giúp vụ này. 1 data giả lập cũng phải đúng với kiểu của data thực chứ ai lại đi làm như kiểu của bạn?

Số SU ngẫu nhiên lun bạn ạ. Ko quy định độ dài và kí tự ạ.

Maika8008 · 2/7/20

vovanthanh2602 đã viết:
Số SU ngẫu nhiên lun bạn ạ. Ko quy định độ dài và kí tự ạ.
File thực tế là của cty. Nên e ko dám đưa hết lên ạ. Bạn thông cảm ạ

Bài đã được tự động gộp: 2/7/20

Số SU ngẫu nhiên lun bạn ạ. Ko quy định độ dài và kí tự ạ.

Ở trên bạn nói SU thực có số ký tự bằng nhau. Giờ bạn muốn nói khác đi à?

Cần giúp đỡ về file sort & filter tiềm kiếm data ( dùng VBA ạ) (1 người xem)

Người dùng đang xem chủ đề này

Thành viên chính thức

File đính kèm

==(^o^)==

File đính kèm

Thành viên chính thức

==(^o^)==

Thành viên chính thức

Thành viên chính thức

==(^o^)==

Thành viên chính thức

==(^o^)==

Thành viên chính thức

==(^o^)==

/(hông là gì!

Thành viên mới

Thành viên gạo cội

Thành viên chính thức

Thành viên chính thức

/(hông là gì!

Thành viên gạo cội

Thành viên chính thức

Thành viên gạo cội

Đếm ngược thời gian