Sut i ddidoli colofn yn ôl gwerth yn Excel?
Er enghraifft, mae gennych dabl prynu fel y dangosir y sgrinlun isod. Nawr rydych chi am i'r golofn Pris gael ei didoli'n awtomatig pan fyddwch chi'n nodi rhifau/prisiau newydd yn y golofn hon, sut allech chi ei datrys? Yma, rwy'n cyflwyno macro VBA i'ch helpu chi i ddidoli colofn benodol yn ôl gwerth yn Excel yn awtomatig.
Colofn didoli awto yn ôl gwerth gyda VBA
Colofn didoli awto yn ôl gwerth gyda VBA
Bydd y macro VBA hwn yn didoli'r holl ddata mewn colofn benodol yn awtomatig cyn gynted ag y byddwch yn mewnbynnu data newydd neu'n newid gwerth yn y golofn yn Excel.
1. De-gliciwch enw'r ddalen gyfredol yn y Bar Tab Dalen, ac yna cliciwch ar Gweld y Cod o'r ddewislen clicio ar y dde.
2. Yn y blwch deialog agoriadol Microsoft Visual Basic for Application, pastiwch y cod macro VBA canlynol i'r ffenestr agoriadol.
VBA: Colofn Trefnu Auto yn Excel
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Range("B1").Sort Key1:=Range("B2"), _
Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End If
End Sub
Nodyn:
1) Yn y cod vba uchod, B: B. yn golygu y bydd yn didoli Colofn B yn awtomatig, B1 yw'r gell gyntaf yng ngholofn B, B2 yw'r ail gell yng Ngholofn B, a gallwch eu newid yn seiliedig ar eich anghenion.
2) Y pyt Pennawd:=xlIe yn y 5ed rhes yn dweud wrth Excel bod gan yr ystod y byddwch chi'n ei ddidoli bennawd, fel na fydd rhes gyntaf yr ystod yn cael ei chynnwys wrth ddidoli. Os nad oes pennawd, newidiwch ef i Pennawd:=xlNa; a newid Allwedd 1:=Amrediad("B2") yn y 4edd rhes i Allwedd 1:=Amrediad("B1").
3. Yna ewch yn ôl i'r daflen waith, pan fyddwch chi'n nodi rhif newydd yn y golofn Brisiau neu'n addasu unrhyw brisiau sy'n bodoli, bydd y golofn Brisiau yn cael ei didoli'n awtomatig yn nhrefn esgynnol.
Nodyn: Pan fyddwch chi'n nodi rhif newydd yn y golofn Pris, rhaid i chi nodi'r rhif yn y gell wag gyntaf o dan y rhifau gwreiddiol. Os oes celloedd gwag rhwng y rhif newydd a gofnodwyd a'r rhifau gwreiddiol yn ogystal â chelloedd gwag rhwng y rhifau gwreiddiol, ni fydd y golofn hon yn cael ei didoli'n awtomatig.
Demo: Colofn didoli awto yn ôl gwerth gyda VBA yn Excel
Didoli'n hawdd yn ôl amlder y digwyddiadau yn Excel
Kutools ar gyfer Excel's Trefnu Uwch mae cyfleustodau yn cefnogi didoli data yn ôl hyd testun, enw olaf, gwerth absoliwt, amlder, ac ati yn Excel yn gyflym.
Offer Cynhyrchiant Swyddfa Gorau
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...
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!