Trang web hiển thị tốt nhất trên các trình duyệt mới và được bật Javascript.

hi all, hi all, mn ch mình hoi: Sub filter_data()

TrinhXuanTuyen

hi all,
mn ch mình hoi:

Sub filter_data()
Range(" $a$ 4: $c$ 72").AutoFilter Field:=1, Criteria1:="" & Range("a2") & ""
End Sub

Chổ Field:=1, mình có thể viết bằng: Field:=range("c2").value, giá trị C2=data validation of list: 1,2,3

mục đích là để tìm flexible hơn, nhưng làm k được, mọi người có cách nào không z?

Thanks

NguyenNgocThuHien

gửi file lên đi.

TrinhXuanTuyen

đã inbox nha, chứ giờ làm lại cái topic khác admin la chết @@

NguyenNgocThuHien

Sub filter_data()
Range(" $a$ 4: $c$ 72").AutoFilter
Range(" $a$ 4: $c$ 72").AutoFilter Field:=Range("d2").Value, Criteria1:="" & Range("a2") & ""
End Sub

DucThanhNguyen

Xoá bài cũ đi post file hỏi lại thì mới không bị la.

m.n giupp e voiii m.n giupp e voiii FREE - Hạ Long (thành phố) M.n giúp e -FULL BỘ TÀI LIỆU SINH TRẮC VÂN TAY CỰC HIẾM- ***Tặng phần mềm kế toán UNESCO Fee sử dụng vĩnh viễn các Version 6.0 - 5.1- ĐỊNH MỨC XĂNG XE /DẦU XE CHO DOANH NGHIỆP VẬN TẢI FILE QUẢN LÝ QUỸ TIỀN MẶT BẰNG EXCEL Xin chào mọi người, Hôm này Đỉnh muốn chia sẻ cho các bạn 2 cuốn sách cực kỳ Cả nhà có mẹo gì để tẩy mực máy in trên giấy A4 không ạ? Chỉ tẩy con số ở Hỗ trợ hàm tìm kiếm, xuất dữ liệu Lỗi #N/A trong hàm IMPORTXML Mong các cao nhân giúp đỡ Xem thêm