[Khắc phục]:Phương pháp tự động lọc của lớp phạm vi không thành công (5 giải pháp)

Nếu bạn đang đấu tranh để tìm ra nguyên nhân và giải pháp có thể có của thông báo lỗi Phương pháp tự động lọc của lớp phạm vi không thành công Sau đó bài viết này là dành cho bạn. Vì vậy, hãy đi sâu vào bài viết chính.

Tải xuống Workbook

5 Bản sửa lỗi cho Phương pháp Lọc Tự động của Sự cố Lớp Phạm vi Không thành công

Ở đây, chúng tôi sẽ hiển thị 5 các giải pháp khả thi bằng cách sử dụng tập dữ liệu sau làm phạm vi mà chúng tôi sẽ áp dụng tính năng Tự động lọc của mình để lọc phạm vi dựa trên tiêu chí.

Chúng tôi đã sử dụng Microsoft Excel 365 phiên bản ở đây, bạn có thể sử dụng bất kỳ phiên bản nào khác tùy theo sự thuận tiện của bạn.

Fix-1 :Sửa Số trường để Giải quyết Sự cố Không thể Lọc Phương pháp Tự động Lọc của Lớp Phạm vi

Tại đây, chúng tôi sẽ cố gắng lọc phạm vi sau dựa trên các giá trị bán hàng lớn hơn 2500 với sự trợ giúp của VBA mã.

Để lọc phạm vi, chúng tôi đã sử dụng mã sau

Sub fixing_autofilter_issue_1()

Dim sht As Worksheet
Set sht = Worksheets("Field Number")
sht.Range("B3:D3").AutoFilter field:=100, Criteria1:=">=2500"

End Sub

Đây, trường: là để chỉ ra số cột của phạm vi mà chúng tôi đã chỉ định cho 100 nhưng không có nhiều hơn 3 các cột trong phạm vi này.

Vì vậy, sau khi nhấn F5 chúng tôi nhận được thông báo lỗi Phương pháp tự động lọc của lớp phạm vi không thành công .

➤ Để giải quyết vấn đề này, hãy sử dụng số trường chính xác tương ứng với số cột của phạm vi (chúng tôi đang sử dụng 3 vì đó là số sê-ri của Bán hàng cột của phạm vi).

Sub fixing_autofilter_issue_1()

Dim sht As Worksheet
Set sht = Worksheets("Field Number")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

➤ Nhấn F5 .
Bây giờ, bạn sẽ có thể lọc phạm vi của mình theo tiêu chí mà không gặp thông báo lỗi.

Đọc thêm: Excel VBA để kiểm tra xem Tự động lọc có được bật hay không (4 cách dễ dàng)

Fix-2 :Sử dụng một phạm vi đúng để giải quyết vấn đề phương pháp tự động lọc của phạm vi lớp không thành công

Chúng tôi sẽ cố gắng áp dụng bộ lọc trong tập dữ liệu sau dựa trên Doanh số cột cho các giá trị lớn hơn $ 2.500,00 .

Chúng tôi đã sử dụng mã sau để lọc phạm vi của Phạm vi trang tính.

Sub fixing_autofilter_issue_2()

Dim sht As Worksheet
Set sht = Worksheets("Range")
sht.Range("D3:D100").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

Ở đây, có thể thấy chúng tôi đã sử dụng phạm vi D3:D100 và số trường 3 và các giá trị này không được đối sánh với nhau vì phạm vi này chỉ chứa một cột.

Vì vậy, sau khi nhấn F5 chúng tôi lại nhận được thông báo lỗi.

➤ Chỉnh sửa mã thành mã sau

Sub fixing_autofilter_issue_2()

Dim sht As Worksheet
Set sht = Worksheets("Range")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

Chúng tôi đã thay đổi phạm vi thành B3:D3 ngay bây giờ.

➤ Nhấn F5 .
Sau đó, bạn sẽ có thể lọc phạm vi của mình theo tiêu chí mà không gặp thông báo lỗi.

Fix-3 :Phương pháp Tự động Lọc của Lớp Phạm vi Không thành công do Lọc Bảng

Tại đây, chúng tôi có Bảng sau nơi chúng tôi sẽ cố gắng áp dụng tùy chọn bộ lọc với sự trợ giúp của mã để lọc bảng này dựa trên Bán hàng cột.

Vì mục đích này, chúng tôi đã sử dụng mã sau

Sub fixing_autofilter_issue_3()

Dim sht As Worksheet
Set sht = Worksheets("Table")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

Có vẻ như mọi thứ đều ổn trong mã này. Hãy kiểm tra nó.

Nhưng sau khi nhấn F5 , chúng tôi nhận được thông báo lỗi.

Để giải quyết vấn đề này, chúng ta phải chuyển đổi bảng này thành một dải ô.
➤ Chọn bảng và sau đó đi tới Thiết kế bảng Tab>> Công cụ Nhóm>> Chuyển đổi thành Phạm vi tùy chọn.

Sau đó, một hộp thông báo sẽ xuất hiện để đảm bảo về việc chuyển đổi.
➤ Nhấn Có tại đây.

Sau đó, bạn sẽ nhận được phạm vi từ bảng đã tạo.

➤ Bây giờ, hãy áp dụng lại mã trước đó.

Sub fixing_autofilter_issue_3()

Dim sht As Worksheet
Set sht = Worksheets("Table")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

➤ Nhấn F5 .
Như bạn có thể thấy, lần này là Phương pháp tự động lọc hoạt động bình thường.

Fix-4 :Phương pháp Tự động Lọc của Lớp Phạm vi Không thành công Do Lọc Bảng Pivot

Ở đây, chúng tôi có Bảng tổng hợp sau nơi chúng tôi có các giá trị bán hàng trong cột thứ hai trên cơ sở đó chúng tôi sẽ áp dụng phương pháp Tự động lọc .

Vì vậy, chúng tôi đã áp dụng mã sau.

Sub fixing_autofilter_issue_4()

Dim sht As Worksheet
Set sht = Worksheets("Pivot")
sht.Range("A3:B3").AutoFilter field:=2, Criteria1:=">=2500"

End Sub

Đây, trường số 2 dành cho cột thứ hai của phạm vi A3:B3 .

Sau khi nhấn F5 , bạn sẽ nhận được thông báo lỗi Phương pháp tự động lọc của lớp phạm vi không thành công .

Để giải quyết vấn đề này, bạn có thể áp dụng phương pháp Tự động lọc này vào phạm vi nguồn của Bảng tổng hợp.
Như bạn có thể thấy, phạm vi nguồn mà chúng tôi có cho bảng này nằm trong Nguồn và ở đây chúng tôi sẽ áp dụng mã của mình.

➤ Áp dụng mã sau cho dải nguồn này.

Sub fixing_autofilter_issue_4_1()

Dim sht As Worksheet
Set sht = Worksheets("Source")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

➤ Nhấn F5 .
Cuối cùng, bạn sẽ có thể lọc ra phạm vi dựa trên các tiêu chí nhất định cho Bán hàng cột.

Fix-5 :Sự cố do sử dụng toàn bộ phạm vi thay vì tiêu đề

Trong phần này, chúng ta sẽ thảo luận về một vấn đề nhỏ hầu như không dẫn đến thông báo lỗi Phương pháp tự động lọc của lớp phạm vi không thành công . Nhưng bạn có thể nhận thức được một thực tế có thể là nguyên nhân của lỗi này.
Giống như các ví dụ trước, chúng tôi sẽ áp dụng phương pháp Tự động lọc đến phạm vi sau.

Chúng tôi đã sử dụng mã sau để áp dụng bộ lọc.

Sub fixing_autofilter_issue_5()

Dim sht As Worksheet
Set sht = Worksheets("Header")
sht.Range("B3:D11").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

Ở đây, chúng tôi đã sử dụng phạm vi B3:D11 cho toàn bộ tập dữ liệu là không cần thiết và đôi khi nó có thể là nguyên nhân gây ra thông báo lỗi đó cho một phạm vi lớn.

Vì vậy, chúng ta có thể thay đổi mã đó thành mã sau đây bằng cách chỉ sử dụng tiêu đề dưới dạng một dải ô.

Sub fixing_autofilter_issue_5()

Dim sht As Worksheet
Set sht = Worksheets("Header")
sht.Range("B3:D3").AutoFilter field:=3, Criteria1:=">=2500"

End Sub

Sau khi nhấn F5 , bạn sẽ nhận được kết quả mong muốn mà không phải đối mặt với bất kỳ vấn đề nào.

Kết luận

Trong bài viết này, chúng tôi đã cố gắng đề cập đến các bản sửa lỗi có thể có đối với Phương pháp tự động lọc của lớp phạm vi không thành công vấn đề trong Excel. Hy vọng bạn sẽ thấy nó hữu ích. Nếu bạn có bất kỳ đề xuất hoặc câu hỏi nào, hãy chia sẻ chúng trong phần bình luận.

Các bài viết có liên quan

• Cách tự động lọc và sao chép hàng hiển thị bằng Excel VBA
• Bộ lọc tự động VBA:Sắp xếp Nhỏ nhất đến Lớn nhất (3 Phương pháp)
• Cách tự động lọc các giá trị không bằng một giá trị nhất định với VBA trong Excel
• Excel VBA:Loại bỏ Bộ lọc Tự động Nếu Nó Tồn tại (7 Ví dụ)