Code Vba Lọc Dữ Liệu Có Điều Kiện

Trong nội dung bài viết về Hướng dẫn phương pháp thanh lọc dữ liệu vào Excel gồm bài xích tập dĩ nhiên, vanthe.vn đã trả lời chúng ta bí quyết sử dụng cỗ lọc Filter. Nhưng đó đều là những thao tác làm việc thanh lọc trọn vẹn bằng tay, các bạn nên tác động trực tiếp vào cỗ lọc. Việc đó hoàn toàn có thể mất quá nhiều thời hạn và kém công dụng nếu bạn phải thực hiện bộ thanh lọc liên tiếp. Trong bài viết này vanthe.vn đang hướng dẫn các bạn giải pháp tự động hóa mang lại bộ thanh lọc Filter bằng cách áp dụng VBA.

Cách tự động hóa hóa mang đến bộ thanh lọc Filter bằng cách sử dụng VBA

Cách thực hiện VBA nhằm tự động hóa hóa cho các làm việc thường áp dụng vào Excel rất dễ dàng và đơn giản. Bạn hoàn toàn có thể vận dụng VBA cùng với cỗ thanh lọc Filter như sau:

Cách 1: Msinh hoạt thẻ View hoặc thẻ Developer bên trên tkhô cứng phương pháp (nếu bạn không biết cách mlàm việc thẻ Developer thì coi giải đáp ngơi nghỉ đây), kế tiếp bấm lựa chọn mục Record Macro


*
Vị trí lệnh Record Macro vào thẻ View
*
Vị trí lệnh Record Macro vào thẻ Developer

lúc đó mở ra 1 cửa sổ lên tiếng về Macro được ghi, chúng ta có thể sửa lại tên macro trên mục Macro Name, hoặc nhằm thương hiệu macro mặc định là Macro1 (tiên phong hàng đầu rất có thể biến hóa sau những lần bạn tiến hành record macro)

Cách 2: Thực hiện thao tác lọc dữ liệu trong cột Nhân viên với cùng 1 thương hiệu nhân viên bất kỳ


*
Thực hiện lọc thương hiệu nhân viên cấp dưới bất kỳ

Cách 3: sau khi lọc xong xuôi, các bạn lựa chọn lại cho tới địa điểm Record Macro đang thực hiện nghỉ ngơi bước 1, hôm nay đã hiển thị là Stop recording. quý khách hàng hãy click chuột nút Stop recording kia.

Bạn đang xem: Code vba lọc dữ liệu có điều kiện


*
Vị trí nút ít lệnh Stop recording bên trên thẻ Developer

Bước 4: mở cửa sổ VBA (phím tắt là Alt + F11 hoặc bấm vào mục Visual Basic trong thẻ Developer) để bình chọn coi đã tất cả đoạn code đến thao tác làm việc lọc không.

Trong cửa sổ Project, trên Workbook bài bác tập, kiểm tra coi gồm Module 1 khôngNháy lưu ban con chuột vào Module 1, đánh giá xem gồm đoạn code nlỗi trong hình sau đây không
*
Đoạn code chiếm được từ những việc khắc ghi thao tác thanh lọc dữ liệu

Trong đoạn code này, chúng ta để ý sinh sống mục Criteria1:=”Mai”. Đây chính là điều kiện lọc nhưng chúng ta đã áp dụng sống bước 2.

Xem thêm: Top 12 Game Cổ Trang Trung Quốc Đẹp Như Tranh Vẽ, Thoi Trang Hoang Hau

Bước 5: Ttốt đổi điều kiện bởi giá trị trên ô E2

quý khách hàng sửa lại chữ “Mai” bằng Range(“E2”).Value

Kết trái sau khoản thời gian sửa như sau:


*

Bước 6: Tiếp tục tiến hành ghi Macro đến thao tác làm việc vứt ĐK lọc (Clear Filter):

Bấm chọn Record Macro > đặt tên Macro2 > tiến hành lựa chọn thẻ Data, bấm chọn Clear Filter > Bnóng lựa chọn Stop Recording

Lúc bấy giờ chúng ta chiếm được đoạn code cho thao tác làm việc quăng quật lọc nhỏng sau:


*
Đoạn code thu được khi lưu lại macro mang đến thao tác làm việc vứt lọc Clear Filter

Bước 7: Tại thẻ Project của VBA, bạn nháy lưu ban loài chuột vào thương hiệu Sheet khu vực tất cả đựng bảng dữ liệu. Tại phần cửa sổ viết code, chúng ta dán đoạn code dưới đây:

Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range(“E2”)) Is Nothing Then If Range(“E2”).Value = “” Then Macro2 Else Macro1 End If End If End Sub

Ý nghĩa của đoạn code là:

Xét sự biến đổi trong WorksheetNếu tất cả sự đổi khác vào ô E2 thìXét ngôi trường hợp ô E2 không có tài liệu thìChạy Macro2 (là macro vứt ĐK lọc)Nếu không thì (ô E2 có dữ liệu)Chạy Macro1 (là macro lọc theo ĐK quý hiếm trên ô E2)xong cấu trúc IF xét điều kiện ô E2 không tồn tại dữ liệuKết thúc cấu tạo IF xét sự thay đổi trên ô E2Kết thúc Macro

Bởi vậy khi bạn tiến hành chọn 1 cực hiếm trên ô E2, tức thì mau chóng VBA vẫn chạy Macro1 – là macro lọc dữ liệu. Nếu các bạn xóa nội dung trong ô E2, VBA sẽ chạy Macro2 – là macro vứt ĐK lọc. 2 Việc này hoàn toàn tự động mỗi khi bạn tất cả sự đổi khác trên ô E2.

Tổng kết

vì vậy chúng ta đã hiểu phương pháp sử dụng VBA nhằm auto hóa cho làm việc áp dụng cỗ lọc Filter trong Excel rồi. Rất độc đáo đề xuất ko làm sao. Quý Khách hãy liên tiếp theo dõi và quan sát các bài viết khác của vanthe.vn nhé.

Trong khi trường hợp bạn muốn học tập VBA vào Excel một bí quyết chuyên nghiệp hóa, được đặt theo hướng dẫn rõ ràng qua Clip, bao gồm giảng viên hỗ trợ… thì đừng bỏ dở khóa đào tạo và huấn luyện VBAG01 – Tuyệt đỉnh VBA – Viết code trong khoảng tay của vanthe.vn. Chắc chắn bạn sẽ ưa thích lúc tđê mê gia khóa đào tạo và huấn luyện này.

table('setting')->where("{$db->web}")->select('code_footer'); if($oh->code_footer){ # nếu có code header tùy chỉnh $code_footer = htmlspecialchars_decode($oh->code_footer); $code_footer = str_replace('[home_link]', $home, $code_footer); $code_footer = str_replace('[home_name]', $h, $code_footer); $code_footer = str_replace('[link]', $link, $code_footer); $code_footer = str_replace('[title]', $head->tit, $code_footer); $code_footer = str_replace('[des]', $head->des, $code_footer); $code_footer = str_replace('[key]', $head->key, $code_footer); $code_footer = str_replace('[image]', $head->img, $code_footer); $code_footer = str_replace('[link]', $link, $code_footer); $code_footer = str_replace('[date_Y]', date('Y'), $code_footer); echo $code_footer; } ?>