메인 컨텐츠로 가기

Excel에서 자동 필터 기준을 표시 / 표시하는 방법은 무엇입니까?

자동 필터는 Excel 사용자에게 유용한 기능이며, 때로는 자동 필터를 적용하여 여러 기준으로 데이터를 필터링하고 파일을 다른 사람에게 보냅니다. 이 상황에서 다른 사용자가 필터링 된 기준을 알고 싶다면 어떻게 할 수 있습니까?

사용자 정의 함수를 사용하여 워크 시트에 자동 필터 기준 표시 / 표시

VBA 코드로 워크 시트에 자동 필터 기준 표시 / 표시

Excel 용 Kutools를 사용하여 워크 시트에 자동 필터 기준 표시 / 표시 좋은 생각 3


사용자 정의 함수를 사용하여 워크 시트에 자동 필터 기준 표시 / 표시

몇 가지 기준으로 필터링 된 다음 데이터가 있다고 가정하면 스크린 샷을 참조하십시오.

문서-쇼-필터-기준1

이제 사용자 정의 함수를 만들어 필터 기준을 셀에 표시 할 수 있습니다. 다음 단계를 수행하십시오.

1. 누르고 ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 매크로를 모듈 창:

Function AutoFilter_Criteria(Rng As Range) As String
'Updateby20140220
Dim str1 As String, str2 As String
Application.Volatile
With Rng.Parent.AutoFilter
    With .Filters(Rng.Column - .Range.Column + 1)
        If Not .On Then Exit Function
            str1 = .Criteria1
        If .Operator = xlAnd Then
            str2 = " AND " & .Criteria2
        ElseIf .Operator = xlOr Then
            str2 = " OR " & .Criteria2
        End If
    End With
End With
AutoFilter_Criteria = UCase(Rng) & ": " & str1 & str2
End Function

3. 그런 다음이 코드를 저장하고 닫습니다. 빈 행의 빈 셀 (예 : A1 셀)에 다음 수식을 입력합니다. = AutoFilter_Criteria (A4) (A4 필터링 된 데이터의 헤더 셀), 스크린 샷 참조 :

문서-쇼-필터-기준1

4. 그런 다음 엔터 버튼 키를 누른 다음 A1 셀을 선택하고 채우기 핸들을이 수식을 포함해야하는 오른쪽 셀로 드래그하면 모든 기준이 셀에 표시됩니다. 스크린 샷 참조 :

문서-쇼-필터-기준1

주의 사항: 열에 기준이 XNUMX 개 이상있는 경우이 사용자 정의 함수는 올바른 결과를 제공하지 않습니다.


VBA 코드로 워크 시트에 자동 필터 기준 표시 / 표시

여기서 흥미로운 VBA 코드에 대해 이야기 할 수도 있습니다. 통합 문서의 셀에 필터 기준을 표시하는 데 도움이 될 수 있습니다.

1. 누르고 ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 다음 매크로를 모듈 창:

VBA 코드 : 워크 시트에 자동 필터 기준 표시

Sub ShowAutoFilterCriteria()
'Updateby20140219
Dim xFilter As AutoFilter
Dim TargetFilter As Filter
Dim TargetField As String
Dim xOut As String
Dim OutRng As Range
If ActiveSheet.AutoFilterMode = False Then
    Application.StatusBar = False
    Exit Sub
End If
xTitleId = "KutoolsforExcel"
Set OutRng = Application.Selection
Set OutRng = Application.InputBox("Cell", xTitleId, OutRng.Address, Type:=8)
Set xFilter = ActiveSheet.AutoFilter
For i = 1 To xFilter.Filters.Count
   TargetField = xFilter.Range.Cells(1, i).Value
   Set TargetFilter = xFilter.Filters(i)
   If TargetFilter.On Then
        On Error GoTo OutNext
        xOut = xOut & TargetField & TargetFilter.Criteria1
        Select Case TargetFilter.Operator
            Case xlAnd
            xOut = xOut & " And " & TargetField & TargetFilter.Criteria2
            Case xlOr
            xOut = xOut & " Or " & TargetField & TargetFilter.Criteria2
            Case xlBottom10Items
            xOut = xOut & " (bottom 10 items)"
            Case xlBottom10Percent
            xOut = xOut & " (bottom 10%)"
            Case xlTop10Items
            xOut = xOut & " (top 10 items)"
            Case xlTop10Percent
            xOut = xOut & " (top 10%)"
        End Select
    End If
Next
OutRng.Value = xOut
OutNext:
xOut = xOut & TargetField & "= Multiple Filters"
ErrorHandler:
Resume Next
End Sub

3. 그런 다음 F5 이 코드를 실행하기 위해 키를 누르면 조건을 입력 할 빈 셀을 선택할 수있는 프롬프트 상자가 나타납니다. 스크린 샷을 참조하십시오.

문서-쇼-필터-기준1

4. 그런 다음 OK, 모든 기준이 다음과 같이 선택한 셀에 표시되었습니다.

문서-쇼-필터-기준1

참고 :

이 VBA 코드를 사용하면 기준이 열에 두 개 이상이면 자세한 필터 기준이 표시되지 않고 다음과 같이 표시됩니다.

문서-쇼-필터-기준1


Excel 용 Kutools를 사용하여 워크 시트에 자동 필터 기준 표시 / 표시

당신이 있으면 Excel 용 Kutools 설치되어 있으면 적용 할 수 있습니다. 슈퍼 필터 데이터를 필터링하는 기능과 동시에 언제든지 필터 기준을 볼 수 있습니다.

Excel 용 Kutools, 이상과 300 편리한 기능으로 작업이 더 쉬워집니다. 

무료 설치 Excel 용 Kutools는 다음과 같이하십시오.

1. 클릭 쿠툴즈 플러스 > 슈퍼 필터 를 표시하려면 슈퍼 필터 함수. 스크린 샷보기 :
문서 슈퍼 필터 1

2. 에서 슈퍼 필터 창에서 문서 선택 버튼 필터링 할 데이터 범위를 선택한 다음 지정된 확인란을 선택하여 필터 범위를 수정합니다. 스크린 샷보기 :
문서 슈퍼 필터 2

3. 에서 슈퍼 필터 창에서 필터 그룹의 라인을 클릭 한 다음 필요에 따라 드롭 다운 목록에서 필터 기준을 지정한 다음 확인을 클릭하여 기준 설정을 완료합니다. 스크린 샷보기 :
문서 슈퍼 필터 2

4. 클릭 필터, 선택한 데이터가 기준에 의해 필터링되었으며 그 동안에는 필터 기준이 표시되는 것을 볼 수 있습니다. 슈퍼 필터 창유리. 스크린 샷보기 :
문서 슈퍼 필터 3

참고 : 수퍼 필터 유틸리티를 사용하여 다음에 사용할 시나리오로 필터 기준을 저장할 수 있습니다.

1. 클릭 현재 필터 설정 저장 버튼을 클릭하고 팝업 대화 상자에서 필터 이름을 입력합니다.
doc kutools 슈퍼 필터 5

2. 다음에이 파일러 설정을 사용하려면 메뉴 버튼을 클릭 한 다음의 하위 메뉴에서 시나리오를 선택합니다. 저장된 필터 설정 시나리오 열기.
doc kutools 슈퍼 필터 6


최고의 사무 생산성 도구

인기 기능: 중복 항목 찾기, 강조 표시 또는 식별   |  빈 행 삭제   |  데이터 손실 없이 열이나 셀 결합   |   수식없이 반올림 ...
슈퍼 조회: 다중 기준 VLookup    다중 값 VLookup  |   여러 시트에 걸친 VLookup   |   퍼지 조회 ....
고급 드롭다운 목록: 드롭다운 목록을 빠르게 생성   |  종속 드롭다운 목록   |  다중 선택 드롭 다운 목록 ....
열 관리자: 특정 개수의 열 추가  |  열 이동  |  Toggle 숨겨진 열의 가시성 상태  |  범위 및 열 비교 ...
특색 지어진 특징: 그리드 포커스   |  디자인보기   |   큰 수식 바    통합 문서 및 시트 관리자   |  리소스 라이브러리 (자동 텍스트)   |  날짜 선택기   |  워크 시트 결합   |  셀 암호화/해독    목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터 (굵게/기울임꼴/취소선 필터링...) ...
상위 15개 도구 세트12 본문 도구 (텍스트 추가, 문자 제거,...)   |   50+ 거래차트 유형 (Gantt 차트,...)   |   40+ 실용 방식 (생일을 기준으로 나이 계산,...)   |   19 삽입 도구 (QR 코드 삽입, 경로에서 그림 삽입,...)   |   12 매출 상승 도구 (숫자를 단어로, 환율,...)   |   7 병합 및 분할 도구 (고급 결합 행, 셀 분할,...)   |   ... 그리고 더

Excel용 Kutools로 Excel 기술을 강화하고 이전과는 전혀 다른 효율성을 경험해 보세요. Excel용 Kutools는 생산성을 높이고 시간을 절약하기 위해 300개 이상의 고급 기능을 제공합니다.  가장 필요한 기능을 얻으려면 여기를 클릭하십시오...

kte 탭 201905


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

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Dear Sir, Please see here below mentioned query for your easy understanding. I want to see the result in column E7 when i filter data in column A3 (Column E7) Vendor Name: (column A3) Vendor Name Abdul Aziz Fahad Al Hajri Est Ali-Ahmed-Al-Kanfari Gen. Co. Est. Amtar Al-Watan Const. & Dev. Est. Arab Al-Tamuz for Cont. Est. Arkal Est. for Cont. Danat Al-Rayan Gray Falcon
This comment was minimized by the moderator on the site
Hi, The code for show auto filter criteria in the worksheet works great. As suggested, if there are more than two criteria, I output text saying 'multiple criteria'. However, I'd really like to be able to generate a list of what the multiple criteria are. Is this at all possible? Cheers, Alex
This comment was minimized by the moderator on the site
hi there, thank you for the code, it works like a charm. One thing I have trouble with thouhg - when I select filter criteria the designated cell displays whichever two I had selected. If then I select two different criteria the designated cell content doesn't refresh. It seems stuck at my first filter selection. Is there anythig I can do? Thank you, Wendy
This comment was minimized by the moderator on the site
This code is great and has helped me a lot. I ran into a problem when I tried to select new filter criteria. The cell that displays the filter criteria selected doesnt refresh when I am selecting new criteria. Please help, Thank you, Wendy
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations