2013-01-20 3 views
6

범위 :VBA 필터 해제가이 코드를 사용하고

Sheets("Sheet1").AutofilterMode = False 

은 VBA를 사용하여 Excel 시트에서 데이터를 필터링하지 위해 (요점은 모든 필터를 취소하는 것입니다). 이것은 항상 작동하지 않는 것 같습니다. 더 좋은 방법이 있습니까?

감사합니다.

도움이 될 경우이 테이블은 SQL Server (데이터 -> 다른 원본 -> From Sql Server ...)와 연결되어 있으며 색이 지정된 디자인 레이아웃 (테이블 관련)이 있습니다.

+2

:

Sub ShowAllData() On Error Resume Next Worksheets("Sheet1").ShowAllData End Sub 

그런 다음 메인 서브에서 함수를 호출 : 나는 당신이 On Error Resume Next와이에서 함수를 만들 수 있으며 모든 경우에 작동한다는 것을 발견'ActiveSheet.ListObjects을 ("Table_Sam_table1"). Range.AutoFilter Field : = 2'하지만 모든 필드에서 일하고 일반 필드가 필요하며 두 번째 필드 필터 만 지우지 않아야합니다. 또한 초기 질문에 언급 된 솔루션은 격리 된 텍스트에서만 작동하고 개체 (속성에 테이블 이름이있는 테이블 등)에는 적용되지 않습니다. – Sam

답변

0

ShowAllData은 시트에 필터가있는 경우에만 작동합니다. 그렇지 않으면 시트가 손상됩니다. 나는이 작품을 발견

Sub Main() 

ShowAllData 

End Sub