Excel VBA 필터 필터링 매크로

특정 통합 문서의 필터링을 해제하는 매크로를 디자인하려고합니다. 나는 코드를 작성하기 시작했는데, 어떤 이유로 주석의 첫 줄에 Application 또는 Object 정의 오류가 발생합니다. 나는 이것이 왜 일어나고 있는지 정말로 혼란 스럽다. 아래 코드를 게시했습니다. 어떤 도움이라도 대단히 감사하겠습니다.Excel VBA 필터 필터링 매크로

Sub crossUpdate() 

Dim rng1 As Range, rng2 As Range, rng1Row As Range, rng2Row As Range, Key As Range, match As Integer 

Workbooks("011 High Level Task List v2.xlsm").Activate 

'Unhide and Unfilter columns and rows on original sheet 
With Sheets("Development Priority List").Cells 
.EntireColumn.Hidden = False 
.EntireRow.Hidden = False 
.AutoFilter 
End With

출처

2014-09-26 Willis Zawisa

은 ActiveWorkbook 부분을 제거. 해당 통합 문서를 활성화 한 후에는 시트 참조 만 사용해도됩니다. ActiveWorkbook을 계속 사용하려면 시트 이름을 명시 적으로 명시해야합니다. LikeWorkbook.Sheets ("그 시트 이름이 뭐든간에"). EntireColumn.Hidden = False – sous2817

여전히 개체 정의 오류가 발생합니다. 위의 코드를 변경했습니다. –

이 코드는 나를 위해 작동하므로 다른 것일 수 있습니다. 통합 문서/시트/셀이 어떤 방식 으로든 보호됩니까? 또한 코드가 저장된 위치는 '시트'모듈이 아닌 '표준'모듈에 있어야합니다. 아마도 또한 저장/닫기/다시 통합 문서를보십시오? – barryleajo

유사하게 다음 코드 줄을이 시도하고 수정 :

ActiveWorkbook.Sheets("Sheet3").Cells.EntireColumn.Hidden = False

일부 당신은 또한 고려할 수 입력 자신을 저장하려면 :

With ActiveWorkbook.Sheets("Sheet3").Cells 
.EntireColumn.Hidden = False 
.EntireRow.Hidden = False 
.AutoFilter 
End With

출처

2014-09-26 20:12:43 barryleajo

여전히 같은 오류가 발생합니다. –

어떤 열과 행을 알아야합니까? – barryleajo

왜 그렇게해야합니까? 나는 그들 모두를 숨기고 제거하기를 원한다. –

With ActiveSheet 
    .AutoFilterMode = False 
    .Cells.EntireRow.Hidden = False 
    .Cells.EntireColumn.Hidden = False 
End With

출처

2014-09-26 20:39:27 mrbungle

Excel VBA 필터 필터링 매크로

답변

관련 문제