Note: The other languages of the website are Google-translated. Back to English

Sut i ailymgeisio awto-hidlydd yn awtomatig pan fydd data'n newid yn Excel?

Yn Excel, pan fyddwch chi'n cymhwyso'r Hidlo swyddogaeth i hidlo data, ni fydd canlyniad yr hidlydd yn cael ei newid yn awtomatig gyda'r newidiadau data yn eich data wedi'i hidlo. Er enghraifft, pan fyddaf yn hidlo'r holl Afalau o'r data, nawr, rwy'n newid un o'r data wedi'i hidlo i BBBBBB, ond ni fydd y canlyniad yn cael ei newid yn ogystal â dilyn y screenshot a ddangosir. Yr erthygl hon, byddaf yn siarad am sut i ailymgeisio awto-hidlo yn awtomatig pan fydd data'n newid yn Excel.

hidlydd adnewyddu doc ​​auot 1

Ail-gymhwyso awto-hidlydd yn awtomatig pan fydd data'n newid gyda chod VBA


swigen dde glas saeth Ail-gymhwyso awto-hidlydd yn awtomatig pan fydd data'n newid gyda chod VBA

Fel rheol, gallwch chi adnewyddu'r data hidlo trwy glicio ar y nodwedd Ail-gymhwyso â llaw, ond, yma, byddaf yn cyflwyno cod VBA i chi adnewyddu'r data hidlo yn awtomatig pan fydd data'n newid, gwnewch fel a ganlyn:

1. Ewch i'r daflen waith rydych chi am ei hadnewyddu yn awtomatig pan fydd data'n newid.

2. De-gliciwch y tab dalen, a dewis Gweld y Cod o'r ddewislen cyd-destun, yn y popped allan Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch a gludwch y cod canlynol i mewn i ffenestr y Modiwl gwag, gweler y screenshot:

Cod VBA: Hidlo ail-gymhwyso'n awtomatig pan fydd data'n newid:

Private Sub Worksheet_Change(ByVal Target As Range)
   Sheets("Sheet3").AutoFilter.ApplyFilter
End Sub

hidlydd adnewyddu doc ​​auot 2

Nodyn: Yn y cod uchod, Taflen 3 yw enw'r ddalen gyda'r hidlydd awtomatig rydych chi'n ei ddefnyddio, newidiwch hi i'ch angen.

3. Ac yna arbed a chau'r ffenestr god hon, nawr, pan fyddwch chi'n newid y data wedi'i hidlo, mae'r Hidlo bydd y swyddogaeth yn cael ei hadnewyddu'n awtomatig ar unwaith, gweler y screenshot:

hidlydd adnewyddu doc ​​auot 3


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Office / Excel 2007-2021 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a 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!
gwaelod officetab
sylwadau (36)
Wedi graddio 5 allan o 5 · Graddfeydd 1
Lleihawyd y sylw hwn gan y safonwr ar y wefan
helo, sut alla i ddefnyddio hyn i gyd mewn cyllid google? Tks
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Neis.. wir dwi ei angen
Lleihawyd y sylw hwn gan y safonwr ar y wefan
II eisiau newid ar un ddalen i achosi tudalenau lluosog eraill i awto-hidlo, sut mae newid y cod hwn? Ex: Mae SheetA yn cael ei newid, sy'n achosi Sheet1, Sheet2, a Sheet3 i gymhwyso ei hidlydd awtomatig. Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Rwy'n gwneud hyn ar gyfer blaen yn y ddalen pe bai'r gell wedi'i gosod i =sheet1!E6. Ni fydd yn berthnasol hidlydd pan fydd yn newid. Os byddaf yn newid y rhif yn y ddalen gefn mae'n addasu blaen ond nid yw'n hidlo. Os addaswch y fformiwla i'w hidlo meini prawf mae'n ail-gymhwyso. Beth alla i ei wneud?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Defnyddiwch hwn
Is-waith preifat_Newid(Targed ByVal Fel Ystod)
Activesheet.AutoFilter.ApplyFilter
Is-End
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ni allaf gael hwn i weithio i mi o gwbl. Rwy'n ceisio cymryd o brif daflen a chael dim ond y swyddi sy'n berthnasol i reolwyr prosiect penodol ar bob tab sydd â'u henwau arnynt. Rwyf hefyd am iddo adnewyddu'n awtomatig pan fyddaf yn gwneud newidiadau.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
y gorchymyn hwn pob ffug yn gwneud dim. ceisiwch yn llwyr ond dim defnydd o.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn gweithio'n wych ac yn arbed llawer o amser a llanast i mi.. Awgrym gwych.. Diolch yn fawr am eich cymorth
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'r ateb hwn yn gweithio'n berffaith. Diolch am ei ysgrifennu! Os oes unrhyw un yn cael trafferth, mae yna ychydig o bethau i'w hystyried.

Yn gyntaf, gelwir y digwyddiad Worksheet_Change fesul taflen. Mae hyn yn golygu os oes gennych chi dudalennau lluosog sydd â hidlwyr y mae angen eu diweddaru, bydd angen i chi ymateb i'r holl ddigwyddiadau hynny. Un is-reolwaith Taflen Waith_Change ar gyfer pob taflen waith, nid un is-reolwaith ar gyfer y llyfr gwaith cyfan (un eithriad - gweler y nodyn isod).

Yn ail, ac yn ddilyniant i'r cyntaf, rhaid gosod y cod yn y modiwl cod sy'n benodol i'r daflen waith i'w fonitro. Mae'n hawdd (yn anfwriadol) newid modiwlau cod ar ôl i chi fynd i mewn i'r golygydd VB, felly mae'n rhaid bod yn ofalus i'w osod yn benodol ar y ddalen rydych chi am ei monitro ar gyfer newidiadau data.

Yn drydydd, mae hyn heb ei gadarnhau, ond o bosibl yn bwynt o gamgymeriad. Mae'r enghraifft yn defnyddio enwau dalen o "Daflen 1", "Taflen 2", ac ati. Os ydych chi wedi ailenwi'r dalennau, efallai y bydd angen i chi ddiweddaru'r cod. Sylwch yn yr enghraifft, mae Sheet7 wedi cael yr enw "dfdf". Os oeddech chi eisiau diweddaru'r hidlydd yno, byddai angen i chi ddefnyddio;
Taflenni("dfdf").AutoFilter.ApplyFilter
nid;
Taflenni("Taflen7").AutoFilter.ApplyFilter

Efallai y byddai'n dda diweddaru'r erthygl gan gynnwys enghraifft gyda thaflen wedi'i hail-enwi.


Yn olaf, os ydych chi am fonitro un ddalen ar gyfer newidiadau data, ond diweddaru hidlwyr ar daflenni lluosog, yna dim ond un is-reolwaith sydd ei angen arnoch chi, wedi'i osod ym modiwl cod y daflen waith rydych chi'n ei fonitro. Bydd y cod yn edrych rhywbeth fel hyn;

# (rhaid gosod y cod yn y daflen waith i'w fonitro am newidiadau data)
Is-daflen Waith Breifat_Newid(Targed ByVal Fel Ystod)
Taflenni("Taflen1").AutoFilter.ApplyFilter
Taflenni("Taflen2").AutoFilter.ApplyFilter
Taflenni("Taflen3").AutoFilter.ApplyFilter
Taflenni("Taflen4").AutoFilter.ApplyFilter
Is-End
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Mike,
Diolch am eich esboniad manwl.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Esboniad gwych, diolch.

Ond sut ydw i'n sbarduno Sheets("Taflen3").AutoFilter.ApplyFilter pan fydd dalen newydd yn cael ei chreu?
Gan na allaf ysgrifennu'r cod a grybwyllwyd gennych ar ddalen nad yw'n bodoli eto
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Great, diolch i chi!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
yn gweithio fel champ, ac mor syml. Diolch yn fawr iawn!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn ymddangos yn wych. A allwch ddweud wrthyf sut i wneud yr un peth ar gyfer Sort, yn hytrach na Filter, os gwelwch yn dda?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Chris,
Efallai, gall yr erthygl ganlynol ddatrys eich problem, edrychwch os gwelwch yn dda:

https://www.extendoffice.com/documents/excel/2592-excel-auto-sort-by-value.html

Rhowch gynnig arni!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, mae hynny'n gweithio'n wych, fodd bynnag dim ond wrth newid data yn y tabl â llaw.

Mae gen i dabl wedi'i hidlo arddull 'deg uchaf/bwrdd arweinydd' sy'n cael ei lenwi o fewnbynnu data ar daflen waith ar wahân (mewn gwirionedd mae'r data'n mynd trwy 3 taflen waith cyn cyrraedd y bwrdd). Pan fydd y data'n cael ei newid yn y daflen waith mewnbynnu data mae'r tabl arweinwyr yn ffigurau'n diweddaru ond nid yw'r hidlydd yn adnewyddu'n awtomatig.
Unrhyw syniadau ar sut i wneud hynny?
Llawer Ymrwymedig.
Alex
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae gen i'r un broblem. A all rhywun ein helpu ni?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yr un mater sydd gennyf. Rwy'n ceisio awto-hidlo dalen 2 sy'n cynnwys data sy'n dod o ddalen 1. Dim ond os byddaf yn newid y data ar ddalen 2 y mae'n gweithio, nid ar ddalen 1.
Unrhyw syniadau pam nad yw hyn yn gweithio a sut i'w drwsio?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, mae'n ymddangos bod hyn yn gweithio'n wych ond rwy'n cael problemau pan fo mwy nag un hidlydd ar yr un daflen waith (tab). Trosais yr ystod o gelloedd i dabl i ganiatáu hidlwyr ar wahân a lluosog o fewn yr un daflen waith. Mae'n ymddangos bod yr enghraifft hon ond yn diweddaru un o'r tablau/hidlwyr. Unrhyw awgrymiadau ar sut i ddiweddaru POB tabl/hidlen o fewn taflen waith?

Diolch yn fawr,

Tom
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Tom,
Mae'r cod yn yr erthygl hon yn gweithio'n dda ar gyfer tablau lluosog o fewn taflen waith, does ond angen i chi wasgu Enter key ar ôl newid y data yn lle clicio i gell arall.
Rhowch gynnig arni.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
term Kasih

sangat membantu
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Nid yw hyn yn gweithio gyda hidlydd yn seiliedig ar ddewis rhestr https://www.extendoffice.com/documents/excel/4113-excel-filter-based-on-list-selection.html
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gwych a syml i'w wneud. Diolch yn fawr iawn!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,

Mae'r cod hwn yn gweithio'n wych, diolch yn fawr.

Fodd bynnag, mae gennyf un mater bach ag ef - os byddaf yn newid gwerthoedd mewn unrhyw gell nad yw'n rhan o'r tabl, cyflwynir gwall Runtime i mi gan ddweud:

msgstr "Gwall amser rhedeg '91':

Newidyn gwrthrych neu Gyda newidyn bloc heb ei osod"


Mae gen i opsiynau i Dadfygio neu Derfynu, mae'r opsiwn i Barhau wedi'i llwydo. Gallaf glicio ar "Diwedd" ac mae'r cod yn dal i weithio, fodd bynnag mae'n annifyr iawn gorfod delio â'r ffenestr naid hon ar ôl pob newid.

Oes gan unrhyw un brofiad tebyg neu awgrym sut i ddatrys hyn?

Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, David,
I ddatrys eich problem, gallwch ddefnyddio'r cod canlynol:

Is-daflen Waith Breifat_Newid(Targed ByVal Fel Ystod)
Ar Ail-ddechrau Gwall Nesaf
Taflenni("Taflen3").AutoFilter.ApplyFilter
Is-End

Rhowch gynnig arni, gobeithio y gall eich helpu!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Skyyang,


Rwyf wedi rhoi eich ateb ar waith ac mae'n sefydlog yn wir.

Diolch yn fawr!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, rwyf wedi cael yr un mater, wedi gludo'r cod newydd a newid enw'r ddalen ond yna dim byd yn digwydd, nid yw'r hidlydd yn diweddaru
Lleihawyd y sylw hwn gan y safonwr ar y wefan
un broblem yma hefyd, unrhyw ateb wedi'i ddiweddaru?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Methu cael hwn i weithio o gwbl ar swyddfa 365
unrhyw awgrymiadau
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, diolch yn fawr am yr help. Nid yw rhywbeth yn gweithio'n iawn i mi. Dyma'r stori.

Mae gan Ddalen 1 ddata amrywiol. Mae gan Daflen 3 ddata sefydlog a hidlydd. Daw'r meini prawf hidlo ar "Daflen 3" o Daflen 1. Mae gan Daflen 1 ddata sy'n dod o ganlyniadau wedi'u hidlo ar Daflen3.

Mae gan Ddalen 3 god:

Is-daflen Waith Breifat_SelectionChange(FalVal Target As Range)
Ystod ("A1: U14").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Ystod ("A22:U23"), CopyToRange:=Ystod ("A25:U26"), Unigryw:=Anghywir
Is-End

Mae'n gweithio'n wych os byddaf yn gwneud unrhyw beth ar Daflen 3. Dim problemau. Diolch!

Ar y dechrau roedd gen i god ar Daflen 1:

Is-daflen Waith Breifat_Newid(Targed ByVal Fel Ystod)
Taflenni("Taflen3").AutoFilter.ApplyFilter
Is-End

A arweiniodd at y gwall "Runtime error 91, Object Variable neu Gyda Bloc heb ei Osod".

Newidiais y cod yn seiliedig ar sylwadau i fod yn:

Is-daflen Waith Breifat_Newid(Targed ByVal Fel Ystod)
Ar Ail-ddechrau Gwall Nesaf
Taflenni("Taflen3").AutoFilter.ApplyFilter
Is-End

Nawr nid wyf yn cael gwall, ond nid yw'r data ar Sheet3 ac felly Sheet1 yn newid. Mewn geiriau eraill, nid yw'r digwyddiad o gymhwyso'r hidlydd i Daflen3 yn digwydd pan fyddaf yn gwneud newid ar Daflen1. Nid oes ots os byddaf yn taro neu cliciwch ar gell arall ar ôl newid y gell meini prawf hidlo Sheet3 sydd wedi'i gosod ar Daflen1.

I'r neilltu, rwy'n disgwyl pe bawn i eisiau cael celloedd lluosog ar Daflen 1 a achosodd hidlwyr ar Daflenni 4 a 5 yn ogystal â Sheet3, byddai angen y cod ar Daflen 1 arnaf i ddarllen:

Is-daflen Waith Breifat_Newid(Targed ByVal Fel Ystod)
Ar Ail-ddechrau Gwall Nesaf
Taflenni("Taflen3").AutoFilter.ApplyFilter
Taflenni("Taflen4").AutoFilter.ApplyFilter
Taflenni("Taflen5").AutoFilter.ApplyFilter
Is-End

Diolch unwaith eto!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,

Mae hwn yn dipyn gwych o god diolch. Yr unig broblem yr wyf yn ei chael yw fy mod yn defnyddio cwymplen ar ddalen siart ar wahân. Os byddaf yn newid y gwerth yn y gell sy'n gysylltiedig â'r cwymplen â llaw, mae'n gweithio. Ond pan geisiaf ddefnyddio'r gwymplen yn unig, ni fydd yn diweddaru. Unrhyw feddyliau?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mewn gwirionedd mae gen i ddata o ffeil Excel arall a fewnforiwyd mewn Excelsheet gyda'r enw "Cronfa Ddata". Yna rwy'n mewnforio'r data hwn yn yr un ffeil Excel ond mewn "Trosolwg" ExcelSheet arall. Rwyf am pan fydd y data'n newid yn y ffynhonnell wreiddiol, bod yr hidlydd yn berthnasol yn y daflen "Trosolwg". Diolch ymlaen llaw am yr un all fy helpu :). Ni all PS ddefnyddio VBA yn yr excelsheet gyntaf
Nid oes unrhyw sylwadau wedi'u postio yma eto
Llwytho mwy o
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir

Dilynwch ni

Hawlfraint © 2009 - www.extendoffice.com. | Cedwir pob hawl. Wedi ei bweru gan ExtendOffice. | Map o'r safle
Mae Microsoft a logo'r Swyddfa yn nodau masnach neu'n nodau masnach cofrestredig Microsoft Corporation yn yr Unol Daleithiau a / neu wledydd eraill.
Wedi'i warchod gan Sectigo SSL