활성시트 고급필터 해제 VBA 관련

VBA
작성자
박효준
작성일
2023-05-02 17:16
조회
68
엑셀버전 : 엑셀2016

운영체제 : 윈도우10

질문 요약 : 숨김시트를 제외한 모든 활성시트에 적용가능한 고급필터해제 VBA

안녕하세요 최근 매크로 및 VBA를 배우면서 업무효율을 추구하고 있는 회원입니다.

최근에 고급필터 매크로 및 해제 매크로를 배워서 업무에 적극활용하는 중입니다.

Sub 고급필터해제()
' 고급필터해제 매크로
' 바로 가기 키: Ctrl+q
If ActiveSheet.FilterMode = True Then
ActiveSheet.ShowAllData
End If
End Sub

-> 위 vba문이 고급필터 해제부분인데, 이게 현재는 현재시트만 적용이 되는구문이더라구요

-> 혹시 요구문을 숨김시트외 활성화된 모든시트에 적용되도록 구문을 배워볼 수 있을까요?

-> ActiveSheet부분을 바꾸면 될거같긴한데 지식이 전무해서 한번 자문을 여쭈어봅니당

스크랩
공유
전체 1

  • 2023-05-27 00:23

    @박효준 님 Sub 고급필터해제()
    ' 고급필터해제 매크로
    ' 바로 가기 키: Ctrl+q

    Dim ws As Worksheet
    For Each ws In ThisWorkbook.Worksheets
    If ws.FilterMode = True Then
    ws.ShowAllData
    End If
    Next ws
    End Sub


전체 11,029
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[📚교재 출간 안내] 「진짜쓰는 실무엑셀」 , 드디어 출간되었습니다! (177)
오빠두엑셀 | 2022.02.03 | 추천 469 | 조회 182470
오빠두엑셀 2022.02.03 469 182470
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (165)
오빠두엑셀 | 2021.10.28 | 추천 218 | 조회 11824
오빠두엑셀 2021.10.28 218 11824
56786 함수/공식
New 모의고사 등급 산출과 관련하여 빛 같은 도움을 얻고자 합니다. 첨부파일 (2)
열혈선생 | 00:53 | 추천 0 | 조회 22
열혈선생 00:53 - 22
56784 차트/그래프
New 오빠두 간트차트 강의 자료에서 궁금한점이 있습니다. (차트 선택시 원본데이터 표시안됨) 엑셀파일첨부파일
월마리아 | 2023.05.28 | 추천 0 | 조회 21
월마리아 2023.05.28 - 21
56778 파워쿼리/피벗
New 쿼리의 원본표 제목열이 바뀔 떄마다 쿼리가 오류나요.. (2) 답변완료
yaho**** | 2023.05.28 | 추천 0 | 조회 28
yaho**** 2023.05.28 - 28
56776 구글시트
New importrange 업데이트 속도가 느립니다.
양갱 | 2023.05.28 | 추천 0 | 조회 34
양갱 2023.05.28 - 34
56761 파워쿼리/피벗
New 쿼리 내에서 빼기 수식으로 열추가를 할 수 있나요? 첨부파일 (4) 답변완료
yaho**** | 2023.05.28 | 추천 0 | 조회 43
yaho**** 2023.05.28 - 43
56754 함수/공식
New 많은표 vs 많은수식 .. 둘중에 뭐가 동작속도를 느리게 하나요? (2)
yaho**** | 2023.05.27 | 추천 0 | 조회 44
yaho**** 2023.05.27 - 44
56750 구글시트
New 필터, 중괄호, 쿼리로 불러온 데이터의 합을 구하고 싶습니다 외 첨부파일 (2)
조성원 | 2023.05.27 | 추천 0 | 조회 33
조성원 2023.05.27 - 33
56749 문서서식
New 데이터를 가져올 수 없습니다. 첨부파일
김원명 | 2023.05.27 | 추천 0 | 조회 30
김원명 2023.05.27 - 30
56747 함수/공식
New 일별 출근시간 기록 엑셀파일첨부파일 (1)
야라 | 2023.05.27 | 추천 0 | 조회 41
야라 2023.05.27 - 41
56743 차트/그래프
New 필터 단추크기 조절 (2)
abbado | 2023.05.27 | 추천 0 | 조회 41
abbado 2023.05.27 - 41
56740 함수/공식
New 문자 + 함수 +문자 ... 형식으로 입력 시 문제가 있어 문의 드립니다. (1)
바람의 영혼 | 2023.05.27 | 추천 0 | 조회 34
바람의 영혼 2023.05.27 - 34
56739 함수/공식
New 중복값의 합계와 평균을 낼 수 있나요?? 첨부파일 (1)
218 K | 2023.05.27 | 추천 0 | 조회 39
218 K 2023.05.27 - 39
56735 함수/공식
New 목록상자 다중조건 엑셀파일 (3)
nanjose**** | 2023.05.26 | 추천 0 | 조회 41
nanjose**** 2023.05.26 - 41
56726 함수/공식
New 영어와 번역본 기호 차이 엑셀파일 (6)
욕심없는성공v | 2023.05.26 | 추천 0 | 조회 45
욕심없는성공v 2023.05.26 - 45
56725 피벗테이블
New 시트마다 값 자동기입 가능여부 및 적용할 수 있는 방법 문의 엑셀파일 (1)
신혜 | 2023.05.26 | 추천 0 | 조회 43
신혜 2023.05.26 - 43
56724 함수/공식
New 엑셀로 데이터 집계하기 엑셀파일첨부파일 (2)
Dexter | 2023.05.26 | 추천 0 | 조회 49
Dexter 2023.05.26 - 49
56722 피벗테이블
New 피벗테이블과 관련된 여러 질문입니다. 엑셀 파일도 첨부합니다. 엑셀파일첨부파일
수평선마음 | 2023.05.26 | 추천 0 | 조회 50
수평선마음 2023.05.26 - 50
56721 기능/도구
New 전월 대상자 복사해서 불러오기 기능이 있나요? 첨부파일
yaho**** | 2023.05.26 | 추천 0 | 조회 40
yaho**** 2023.05.26 - 40
56717 함수/공식
New 건설일용직노무비 중복일수 합치기 문의입니다. 엑셀파일첨부파일 (2) 답변완료
로이초이 | 2023.05.26 | 추천 0 | 조회 46
로이초이 2023.05.26 - 46
56716 문서서식
New 복사-값붙여넣기 표시오류 첨부파일 (7) 답변완료
신혜 | 2023.05.26 | 추천 0 | 조회 45
신혜 2023.05.26 - 45
56713 문서서식
New 표로 만들어버린 서식은 수정이 불가능한가요? 첨부파일 (1)
yaho**** | 2023.05.26 | 추천 0 | 조회 40
yaho**** 2023.05.26 - 40
56711 문서서식
New 컨트롤+방향키를 누를때 행또는 열의 끝부분으로 이동하는 경우
showtime**** | 2023.05.26 | 추천 0 | 조회 36
showtime**** 2023.05.26 - 36
56710 파워쿼리/피벗
New 쿼리속성에서 자동업데이트 메뉴가 보이지 않아요 첨부파일
naver_6108f50e48d3e | 2023.05.26 | 추천 0 | 조회 22
naver_6108f50e48d3e 2023.05.26 - 22
56703 기능/도구
New 엑셀 공부간 고급 필터, MEDIAN 함수 문제입니다! 풀이 도움 부탁드려요..!! 첨부파일
이오리 | 2023.05.26 | 추천 0 | 조회 44
이오리 2023.05.26 - 44
56701 VBA
New 어제 라이브 강의에서 해시태그생성 템플릿 수정 방법 문의 드립니다. 첨부파일
플라워 | 2023.05.25 | 추천 0 | 조회 32
플라워 2023.05.25 - 32
56695 함수/공식
New 파렛트 적치수량 오버시 계산식를 구하고싶습니다 (2)
N천N | 2023.05.25 | 추천 0 | 조회 39
N천N 2023.05.25 - 39
56691 문서서식
New 조건부석식 3색채우기로 채워진 셀 색상을 같은 행에 적용하기 (1)
윤수 | 2023.05.25 | 추천 0 | 조회 39
윤수 2023.05.25 - 39
56689 함수/공식
New 년도를 입력하면 시트마다 년도에 대한 달이 나오게 하는 자동화는 어떻게 하면 될까요~? (1)
𝑺𝑺𝑵𝑨 ♥ | 2023.05.25 | 추천 0 | 조회 39
𝑺𝑺𝑵𝑨 ♥ 2023.05.25 - 39
56685 함수/공식
New 조건에 따라 행 개수를 달리하는 방법이 있나요? (2) 답변완료
조성원 | 2023.05.25 | 추천 0 | 조회 54
조성원 2023.05.25 - 54
56682 함수/공식
New hlookup 반환 열을 항상 마지막열로 고정시킬 수 있을까요? (2) 답변완료
양갱 | 2023.05.25 | 추천 0 | 조회 38
양갱 2023.05.25 - 38