當我嘗試清除所有過濾器時，仍然出現錯誤

我在Excel工作表中有以下宏，有時它會在其他時間出現錯誤。當我嘗試清除所有過濾器時，仍然出現錯誤

我不能工作了，因爲我認爲我已經覆蓋了所有的汽車濾清器可能的選項，如果有人增加了一個手動過濾器（它是一個共享的電子表格）

請幫助。

Sub Clear_All_Filters() 
' 
' Clear_All_Filters Macro 
' Clear Filters 
' 
    Worksheets("Weekly Review Meeting").Activate 
    If (ActiveSheet.AutoFilterMode And ActiveSheet.FilterMode) Or ActiveSheet.FilterMode Or ActiveSheet.AutoFilterMode Then 
     ActiveSheet.ShowAllData 
    End If 
    Range("A1").Select 
End Sub

來源

2016-10-03 mhaverk

什麼錯誤？你收到什麼信息？給我們看一看。 – nicomp

請參見[ShowAllData方法失敗]（http://stackoverflow.com/questions/18226045/showalldata-method-of-worksheet-class-failed） – trincot

請注意，「Or」條件使「And」部分無用。 – trincot

我得到這個使用下面的工作：

子Clear_All_Filters（） ' ' Clear_All_Filters宏 '清除過濾器 ' 工作表（「每週審查會議」）激活

End Sub

來源

2016-10-03 14:03:29 mhaverk

這可能是一個圓的方式，但它的工作，所以我很高興暫時。我會盡力在其他時間更好地理解它。謝謝您的幫助。 – mhaverk

當我嘗試清除所有過濾器時，仍然出現錯誤

回答

相關問題