Note: The other languages of the website are Google-translated. Back to English
로그인 회원가입

 Excel에서 여러 시트에 동일한 필터를 적용하는 방법은 무엇입니까?

필터 기능을 적용하여 워크 시트의 데이터를 필터링하는 것은 쉬울 수 있지만 때로는 동일한 필터 기준을 사용하는 공통 데이터 형식이있는 여러 워크 시트를 필터링해야 할 수도 있습니다. 하나씩 필터링하려면 많은 시간이 낭비됩니다. 여기서는 한 번에 쉽게 해결할 수있는 방법을 소개 할 수 있습니다.

VBA 코드를 사용하여 여러 워크 시트에 동일한 필터 적용

화살표 블루 오른쪽 거품 VBA 코드를 사용하여 여러 워크 시트에 동일한 필터 적용

예를 들어 다음 스크린 샷을 Product = KTE와 동일한 기준으로 한 번에 필터링해야하는 XNUMX 개의 워크 시트가 있습니다.

문서 필터 여러 시트 1

Excel에서 여러 시트의 데이터를 직접 필터링하는 방법은 없지만 다음 VBA 코드가이 작업을 완료하는 데 도움이 될 수 있습니다. 다음과 같이하십시오.

1. 누르고 ALT + F11 키를 누른 다음 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 코드를 모듈 창문.

VBA 코드 : 여러 워크 시트에 동일한 필터 적용 :

Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice
    Dim xWs As Worksheet
    On Error Resume Next
    For Each xWs In Worksheets
        xWs.Range("A1").AutoFilter 1, "=KTE"
    Next
End Sub

3. 그런 다음 F5 이 코드를 실행하려면 KTE의 모든 제품이 모든 워크 시트에서 한 번에 필터링되었습니다. 스크린 샷을 참조하십시오.

문서 필터 여러 시트 2

주의 사항: 위의 코드 내에서 xWs.Range ( "A1"). AutoFilter 1, "= KTE" 스크립트, A1 및 = KTE 필터링 할 기준이되는 열과 기준을 나타내며 숫자 1은 필터링 한 기준이되는 열 번호이며 필요에 따라 변경할 수 있습니다. 예를 들어 50보다 큰 주문을 필터링하려면이 스크립트를 다음과 같이 수정하면됩니다. xWs.Range ( "B1"). AutoFilter 2, "> 50".

여러 기준 또는 기타 특정 조건 (예 : 텍스트 길이, 대소 문자 구분 등)으로 데이터를 필터링합니다.

Excel 용 Kutools의 슈퍼 필터 기능은 강력한 유틸리티이므로이 기능을 적용하여 다음 작업을 완료 할 수 있습니다.

  • 여러 기준으로 데이터를 필터링합니다. 텍스트 길이로 데이터 필터링;
  • 대문자 / 소문자로 데이터 필터링; 년 / 월 / 일 / 주 / 분기별로 날짜 필터링

문서 슈퍼 필터1

Excel 용 Kutools: 300 개 이상의 편리한 Excel 추가 기능으로 30 일 동안 제한없이 무료로 사용해 볼 수 있습니다. 지금 다운로드 및 무료 평가판!

최고의 사무 생산성 도구

Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.

  • 재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
  • 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
  • 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
  • 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
  • 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
  • 300개 이상의 강력한 기능. Office / Excel 2007-2021 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에서 쉽게 배포할 수 있습니다. 전체 기능은 30일 무료 평가판입니다. 60일 환불 보장.
kte 탭 201905

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (41)
아직 평가가 없습니다. 가장 먼저 평가하세요!
사람
사람
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이 필터 공식을 시트 범위에 어떻게 적용합니까? 처음 5개 시트에 대한 데이터가 있는 통합 문서가 있고 통합 문서에 200개의 시트가 있습니다. 시트 6-200에만 필터를 적용하면 됩니다. Sub apply_autofilter_across_worksheets() '업데이트 기준 Extendoffice 20160623 Dim xWs As Worksheet As Error Resume Next for each xWs in Worksheets xWs.Range("A1").AutoFilter 1, "=KTE" Next End Sub
댓글
0
0
코스믹부가부
코스믹부가부     사람
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Sub apply_autofilter_across_worksheets() Dim J As integer On Error Resume Next For J = 6 to Worksheets(worksheets.count) Thisworkbook.Sheets(J).Range("A1").Autofilter 1, "=KTE" Next End Sub
댓글
0
0
아흐마드 칼부네
아흐마드 칼부네
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
친애하는, 저는 둘 이상의 값을 필터링하고 싶습니다. 이 xWs.Range("B1").AutoFilter 2, "=223AM", xlOr, "=113IR", xlOr, "=003IR"을 사용했지만 작동했지만 내가 원하는 값을 >2로 늘리면 오류가 발생합니다. 이 명령은 xWs.Range("B1").AutoFilter 2, "=223AM", xlOr, "=113IR", xlOr, "=003IR", xlOr, "=019IR", xlOr, "=311IR", xlOr를 사용합니다. , "=518ZA", xlOr, "=223AM", xlOr, "=592IR" 감사합니다.
댓글
0
0
카빌란
카빌란
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
여러 시트에서 단일 단어를 필터링하는 동안 필터링된 데이터가 표시되지 않습니다....모든 데이터가 숨겨집니다. 이 문제를 해결하십시오.
댓글
0
0
은혜
은혜
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕,


내 데이터는 열 E에 있으며 Range("E1")와 함께 이 필터를 적용하면 여전히 열 A를 필터링합니다.


어떻게 문제를 해결할 수 있습니까?
감사
댓글
0
0
VBA
VBA     은혜
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
AutoFilter에 열 번호를 쓰기만 하면 됩니다. 이 경우 xWs.Range("E1").AutoFilter 5,
댓글
0
0
티아마리
티아마리     VBA
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
고맙습니다!!!!
댓글
0
0
GG
GG     은혜
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
열 삭제 LOL
댓글
0
0
도노반 허바트
도노반 허바트
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
필터가 각 시트의 다른 열에 있는 경우 어떻게 실행합니까?
댓글
0
0
도노반
도노반
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
=(특정 이름)을 사용하는 대신 자동 필터의 결과를 사용하여 서로 시트에 대한 필터를 설정하는 방법
댓글
0
0
Justin
Justin
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
모든 피벗 테이블이 동일한 데이터 소스에서 제공되고 동일한 기준을 사용하여 설정된 경우 이를 사용하여 여러 시트의 피벗 테이블을 필터링할 수 있습니까?
댓글
0
0
마헤
마헤
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
색상별로 필터링하는 옵션이 있습니까?
댓글
0
0
스카이양
스카이양     마헤
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕, 마헤쉬,
색상별로 데이터를 필터링하려면 다음 두 문서가 도움이 될 수 있습니다! 그것들을 보시고 도움이 되길 바랍니다!

https://www.extendoffice.com/documents/excel/912-excel-filter-by-cell-color.html
https://www.extendoffice.com/documents/excel/3383-excel-filter-by-multiple-colors.html
댓글
보고서
0
0
모니카
모니카
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕,


제품 열이 다른 시트의 다른 위치에 표시되는 경우 이것이 어떻게 작동합니까?


sheet1에서 sheet1에서 A2이고 B1에서 그리고 sheet3에서 다시 A1인가요?

감사합니다,
모니카
댓글
0
0
마태 복음
마태 복음
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
시트 이름을 기반으로 하는 포함 필터를 사용하여 각 시트의 "=KTE" 부분을 변경하는 방법이 있습니까?
댓글
0
0
세바스티안
세바스티안
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
코드 감사합니다!! 목록 또는 드롭다운 목록의 값을 사용하도록 "=KTE"를 변경하는 방법이 있습니까?
댓글
0
0
병에 걸린
병에 걸린
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 전체 통합 문서에 대한 슈퍼 필터는 파일 업데이트가 있을 때마다 자동으로 다시 적용됩니까?
댓글
0
0
수야시
수야시
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
xWs.Range("A1").AutoFilter 1, "=KTE"에서 A1 대신 Product와 같은 셀 이름을 사용할 수 있습니까?
다른 열이 있고 일부 이름은 다른 열에 있습니다.
댓글
보고서
0
0
수야시
수야시     수야시
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
나는 모든 시트에 필터를 사용했습니다. 그리고 필터 이후의 모든 시트에서 s.no를 1 2 3에서 직렬로 변경하고 싶습니다.


vba 코드가 있으면 알려주세요.
댓글
보고서
0
0
시비
시비
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
동일한 여러 시트에 대해 "사이 필터링" 기능을 사용하는 방법은 무엇입니까?

(예: 시간 범위)
댓글
0
0
꽃이 만발한
꽃이 만발한
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
필터링된 행을 제거하는 방법은 무엇입니까?
댓글
0
0
페자
페자
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
소중한,

여러 조건으로 필터링하는 방법은 무엇입니까?
예를 들어 50개 이상이지만 KTE 제품만 필터링하고 싶습니다.

사전에 감사합니다.
댓글
0
0
스카이양
스카이양     페자
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, Pedjaa 님,
두 가지 조건에 따라 여러 시트를 필터링하려면 다음 코드를 적용하세요.
하위 apply_autofilter_across_worksheets()

'업데이트바이 Extendoffice

Dim xW를 워크시트로

오류에 대한 다음 재개

워크시트의 각 xW에 대해

xWs.Range("A1") 사용

.AutoFilter 필드:=1, Criteria1:="KTE" '열 A는 "KTE"와 같음

.AutoFilter Field:=2, Criteria1:=">500" 'B열이 500보다 큼

끝

다음

최종 하위

시도해보십시오. 도움이 되길 바랍니다!
댓글
보고서
0
0
탄
탄
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
A1을 G1으로 교체하더라도 A1 열에 필터를 끼워 넣습니다.
댓글
0
0
스카이양
스카이양     탄
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕, 탄
A1을 G1으로 바꾸면 동시에 아래 코드와 같이 열 번호 1을 열 번호 7로 변경해야 합니다.
xWs.Range("G1").AutoFilter 7, "=KTE"
시도하십시오, 감사합니다!
댓글
보고서
0
0
마뉴 엘라
마뉴 엘라
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요
숫자가 아닌 열 이름을 기준으로 필터링할 수 있습니까(내 데이터가 다른 워크시트의 다른 열에 있기 때문에)?
감사합니다마누엘라
댓글
0
0
앤서니 나비아
앤서니 나비아
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
동일한 조건 "KTE"로 필터링하고 싶지만 시트에 표시되지 않으면 데이터가 표시되지 않습니다.
댓글
0
0
헴라즈 젤리
헴라즈 젤리
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요,
"KTE"대신 셀 값을 기반으로 필터 기준을 원합니다. 가능한가요 ???
댓글
0
0
스카이양
스카이양     헴라즈 젤리
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, Hemraj, 고정된 텍스트 대신 특정 셀 값을 기반으로 데이터를 필터링하려면 아래 코드를 적용하십시오. 하위 apply_autofilter_across_worksheets()
'업데이트바이 Extendoffice
Dim xW를 워크시트로
오류에 대한 다음 재개
워크시트의 각 xW에 대해
xWs.Range("A1").AutoFilter 1, Sheet1.Range("E2")
다음
최종 하위주의 사항: 바꿔주세요 Sheet1 및 E2 이 안에 Sheet1.Range("E2") 자신의 시트와 셀 값으로 스크립트를 작성하십시오. 시도해보십시오. 도움이 되길 바랍니다!
댓글
보고서
0
0
헴라즈 젤리
헴라즈 젤리     스카이양
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 스카이양입니다.
귀하의 귀중하고 멋진 지원에 감사드립니다. 동일한 공식을 사용하려고 시도했지만 이유가 무엇인지에 대해 작동하지 않았습니다. 다음은 내 Excel 시트에 사용하는 코드입니다.
하위 apply_autofilter_across_worksheets()
'업데이트바이 Extendoffice
Dim xW를 워크시트로
오류에 대한 다음 재개
워크시트의 각 xW에 대해
xWs.Range("A1").AutoFilter 1, Sheet2.Range("C4")
다음
최종 하위
댓글
0
0
아직 코멘트가 없습니다
더보기
여러분의 의견을 남겨
손님
게스트로 게시
로그인
×
이 게시물 평가 :
다시 쓰기
0   등장 인물
추천 위치

Follow Us

저작권 © 2009 - WWW.extendoffice.com. | 판권 소유. 에 의해 구동 ExtendOffice. | | 사이트 맵
Microsoft 및 Office 로고는 미국 및 / 또는 기타 국가에서 Microsoft Corporation의 상표 또는 등록 상표입니다.
Sectigo SSL로 보호