Skip i'r prif gynnwys

Sut i arddangos / dangos meini prawf hidlo ceir yn Excel?

Mae Auto Filter yn nodwedd ddefnyddiol i ddefnyddwyr Excel, weithiau, rydyn ni'n defnyddio'r Auto Filter i hidlo'r data yn ôl maen prawf lluosog ac yn anfon y ffeil at eraill. Yn y sefyllfa hon, os yw'r defnyddwyr eraill eisiau gwybod eich maen prawf wedi'i hidlo, sut allen nhw wneud?

Arddangos / Dangos meini prawf hidlo auto yn y daflen waith gyda Swyddogaeth Diffiniedig y Defnyddiwr

Arddangos / Dangos meini prawf hidlo auto yn y daflen waith gyda chod VBA

Arddangos / Dangos meini prawf hidlo auto yn y daflen waith gyda Kutools ar gyfer Excel syniad da3


Arddangos / Dangos meini prawf hidlo auto yn y daflen waith gyda Swyddogaeth Diffiniedig y Defnyddiwr

Gan dybio bod gennych y data canlynol sydd wedi'i hidlo gan ryw faen prawf, gweler y screenshot:

meini prawf doc-show-filter -1

A nawr gallaf greu Swyddogaeth Diffiniedig Defnyddiwr i arddangos maen prawf yr hidlydd i'r celloedd, gwnewch y camau canlynol:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Ffenestr Microsoft Visual Basic for Applications.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Ffenestr Modiwl:

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. Yna arbedwch a chau'r cod hwn, mewn cell wag o res wag, er enghraifft cell A1, nodwch y fformiwla hon = AutoFilter_Criteria (A4) (A4 yw cell pennawd y data wedi'i hidlo), gweler y screenshot:

meini prawf doc-show-filter -1

4. Yna pwyswch Rhowch allwedd, ac yna dewiswch gell A1, llusgwch y handlen llenwi drosodd i'r celloedd cywir y mae angen i chi gynnwys y fformiwla hon, ac mae'r holl faen prawf wedi'i arddangos i'r celloedd, gweler y screenshot:

meini prawf doc-show-filter -1

Nodyn: Os oes mwy na dau faen prawf mewn colofn, ni fydd y Swyddogaeth Diffiniedig Defnyddiwr hon yn rhoi'r canlyniad cywir.


Arddangos / Dangos meini prawf hidlo auto yn y daflen waith gyda chod VBA

Yma, gallaf hefyd siarad am god VBA diddorol, gall eich helpu i arddangos y meini prawf hidlo mewn cell o'r llyfr gwaith.

1. Daliwch i lawr y ALT + F11 allweddi i agor y Ffenestr Microsoft Visual Basic for Applications.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Ffenestr Modiwl:

Cod VBA: Arddangos meini prawf hidlo auto yn y daflen waith

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. Yna pwyswch F5 yn allweddol i redeg y cod hwn, bydd blwch prydlon yn popio allan i adael i chi ddewis cell wag i roi'r maen prawf, gweler y screenshot:

meini prawf doc-show-filter -1

4. Ac yna cliciwch OK, dangoswyd yr holl faen prawf yn y gell a ddewiswyd fel a ganlyn:

meini prawf doc-show-filter -1

Nodyn:

Gyda'r cod VBA hwn, os yw'ch maen prawf yn fwy na dau mewn colofn, ni ddangosir y maen prawf hidlo manwl iddo ond fe'i dangosir fel a ganlyn:

meini prawf doc-show-filter -1


Arddangos / Dangos meini prawf hidlo auto yn y daflen waith gyda Kutools ar gyfer Excel

Os oes gennych Kutools ar gyfer Excel wedi'i osod, gallwch gymhwyso ei Hidlo Super swyddogaeth i hidlo data, ac ar yr un pryd gallwch weld y meini prawf hidlo unrhyw bryd.

Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. 

Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel isod:

1. Cliciwch Kutools Byd Gwaith > Hidlo Super i arddangos y Hidlo Super swyddogaeth. Gweler y screenshot:
hidlydd super doc 1

2. Yn y Hidlo Super pane, cliciwch botwm dewis doc i ddewis yr ystod ddata rydych chi am ei hidlo yna gwiriwch y blwch gwirio Penodedig i atgyweirio'r ystod hidlo. Gweler y screenshot:
hidlydd super doc 2

3. Yn y Hidlo Super cwarel, cliciwch linell mewn grŵp hidlo, yna nodwch y meini prawf hidlo yn y gwymplenni yn ôl yr angen, yna cliciwch Ok i orffen y gosodiad meini prawf. Gweler y screenshot:
hidlydd super doc 2

4. Cliciwch Hidlo, ac mae'r data a ddewiswyd wedi'i hidlo yn ôl y meini prawf, ac yn y cyfamser, gallwch weld bod y meini prawf hidlo yn cael eu gwaredu yn y Hidlo Super cwarel. Gweler y screenshot:
hidlydd super doc 3

Nodyn: Gallwch arbed y meini prawf hidlo fel senario ar gyfer eu defnyddio nesaf gyda'r cyfleustodau Super Filter.

1. cliciwch y Arbedwch y gosodiadau hidlo cyfredol botwm, yn y dialog popping, teipiwch enw hidlydd.
hidlydd super doc kutools 5

2. Pan fyddwch am ddefnyddio'r gosodiadau ffeiliwr hyn y tro nesaf, cliciwch y botwm dewislen, yna dewiswch y senario yn is-ddewislen Senario gosodiadau hidlydd wedi'i arbed.
hidlydd super doc kutools 6


Offer Cynhyrchiant Swyddfa Gorau

Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...

tab kte 201905


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
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