Bạn dùng code sau thử nhéCác bạn cho mình hỏi có đoạn code nào kiểm tra được sheet đó Autofilter đã được chọn chưa
(Data/Filter/Autofilter)
Sub KiemTra()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
If Not sh.AutoFilter Is Nothing Then
MsgBox sh.Name & " Da chon AutoFilter"
End If
Next sh
End Sub