VBA i Ddidoli Colofn yn Excel (4 Dull)

  • Rhannu Hwn
Hugh West

I ddidoli Excel gyda VBA , mae angen i chi gymhwyso'r dull Range.Sort . Yn yr erthygl hon, byddwn yn dangos i chi sut i ddidoli'r golofn yn Excel gyda'r dull Range.Sort o VBA .

>Lawrlwythwch y Llyfr Gwaith

Gallwch lwytho i lawr y gweithlyfr ymarfer Excel rhad ac am ddim yma.

Trefnu Colofn gyda VBA.xlsm

Dull Range.Sort yn Excel VBA

Mae'r dull Range.Sort yn VBA yn trefnu ystod o werthoedd yn Excel. Yma mae Ystod yn newidyn gwrthrych sy'n pennu'r ystod o gelloedd rydym am eu didoli mewn trefn esgynnol neu ddisgynnol.

Isod mae'r paramedrau y mae angen i chi eu gwybod am tra'n gweithio gyda'r dull hwn.

Paramedr Angenrheidiol/ Dewisol Math o Ddata Disgrifiad
Allwedd Dewisol Amrywiad Yn pennu'r amrediad neu'r golofn y mae ei werthoedd i'w didoli.
Gorchymyn Dewisol Orchymyn XlSort Yn nodi'r drefn y bydd y didoli yn cael ei wneud.
  • xlEscending = I ddidoli mewn trefn esgynnol.
  • xlDescending = I ddidoli mewn trefn ddisgynnol.
Pennawd Dewisol XlYesNoGuess Yn pennu a yw'r rhes gyntaf yn cynnwys penawdau ai peidio .
  • xlNo = Pan nad oes gan y golofn unrhyw benawdau; Gwerth rhagosodedig.
  • xlYes = Prydmae gan y colofnau benawdau.
  • xlGuess = I adael i Excel bennu'r penawdau.

4 Dulliau o Weithredu VBA i Ddidoli Colofn yn Excel

Yn yr adran hon, byddwch yn gwybod sut i ddidoli colofn sengl gyda a heb bennawd , colofnau lluosog gyda a heb benawdau a sut i ddidoli dim ond drwy glicio ddwywaith ar y pennyn mewn colofn yn Excel.

1. Mewnosod VBA i Ddidoli Colofn Sengl heb Bennawd yn Excel

Os ydych chi am ddidoli colofn sengl yn eich taflen waith Excel gyda chod VBA yna dilynwch y camau isod.

Dyma ein colofn y byddwn yn ei didoli gyda chod VBA .

Camau:

  • Pwyswch Alt + F11 ar eich bysellfwrdd neu ewch i'r tab Datblygwr -> Visual Basic i agor Golygydd Sylfaenol Gweledol .

  • Yn y ffenestr cod pop-up, o'r bar dewislen , cliciwch Mewnosod -> Modiwl .

    Copïwch y cod canlynol a'i gludo i mewn i'r ffenestr cod.
5807

Eich cod nawr yn barod i redeg.

Yma,

  • Allwedd 1:=Ystod("B5") → Wedi'i nodi B5 i roi gwybod i'r cod pa golofn i'w didoli.
  • Gorchymyn1:=xlEsgynnol → Wedi pennu'r drefn fel xlEsgynnol i ddidoli'r golofn mewn trefn esgynnol. Os ydych am ddidoli'r golofn mewn trefn ddisgynnol yna ysgrifennwch xlDescending yn lle hynny.
  • Pennawd:= xlNa →Gan nad oes gan ein colofn unrhyw bennawd felly fe wnaethom ei nodi gyda'r opsiwn xlNo .

    Pwyso F5 ar eich bysellfwrdd neu o'r bar dewislen dewiswch Rhedeg -> Rhedeg Is-Ffurflen Ddefnyddiwr . Gallwch hefyd glicio ar yr eicon chwarae bach yn yr is-ddewislen i redeg y macro.

Fe welwch fod eich colofn bellach wedi'i didoli yn nhrefn esgynnol .

Sylwch ein bod yma wedi diffinio'r amrediad data â llaw fel Ystod("B5:B15" ) .

Os ydych am newid data drwy ychwanegu neu ddileu gwerthoedd, gallwch weithredu'r cod canlynol sy'n diweddaru'n awtomatig yn seiliedig ar y celloedd yn y set ddata.

2676

Sylwch yn lle hynny o ddiffinio amrediad â llaw gan Ystod ("B5:B15") , rydym wedi ysgrifennu, Ystod( "B5", Ystod ("B5"). Diwedd(xlDown)) .

Bydd hyn yn didoli'r golofn yn seiliedig ar y gell olaf sydd wedi'i llenwi ynddi. Os oes celloedd gwag, dim ond hyd at y gell wag gyntaf y caiff y data ei ystyried.

Darllen Mwy: VBA i Drefnu Tabl yn Excel (4 Dull)

2. Mewnosod Macro VBA i Ddidoli Colofn Sengl gyda Phennawd

Yn yr adran flaenorol, roedd gennym set ddata o golofn sengl heb unrhyw bennawd, ond nawr mae gennym a colofn gyda phennawd .

Y tro hwn byddwn yn dysgu sut i'w ddidoli gyda VBA macro .

Camau:

  • Yr un ffordd ag o'r blaen, agorwch Golygydd Sylfaenol Gweledol o'r tab Datblygwr a Mewnosod a Modiwl yn y ffenestr cod.
  • Yn y ffenestr cod, copïwch y cod canlynol a'i gludo.
7824

Mae'ch cod nawr yn barod i'w redeg.

Yma,

  • Allwedd1:=Ystod(" B5”) → Penodedig B5 i roi gwybod i'r cod pa golofn i'w didoli.
  • Gorchymyn1:=xlI lawr → Y tro hwn byddwn yn didoli'r golofn i mewn gorchymyn disgynnol felly pennodd y gorchymyn fel xlDescending .
  • Pennawd:= xlIe → Gan fod gan ein colofn bennawd y tro hwn, fe wnaethom ei nodi gyda'r xlYes opsiwn.

>
  • Rhedwch y cod hwn a byddwch yn cael y golofn gyda'r pennyn wedi'i didoli mewn trefn ddisgynnol .

Darllen Mwy: Sut i Ddidoli ListBox gyda VBA yn Excel (Canllaw Cyflawn)

Darlleniadau Tebyg:

  • Sut i Ddidoli Cyfeiriad IP yn Excel (6 Dull)
  • [Datrys!] Excel Didoli Ddim yn Gweithio (2 Ateb)
  • Sut i Ychwanegu Botwm Didoli yn Excel (7 Dull)
  • Sort Rang e Defnyddio VBA yn Excel (6 Enghraifft)
  • Sut i Drefnu yn ôl Enw yn Excel (3 Enghraifft)
  • 3. Macro VBA i Ddidoli Colofnau Lluosog gyda neu heb Bennawd

    Gallwch hefyd drefnu sawl colofn yn eich set ddata gyda chod VBA.

    Camau:

    • Fel y dangoswyd yn flaenorol, agorwch Golygydd Sylfaenol Gweledol o'r tab Datblygwr a Mewnosod a Modiwl yn y ffenestr cod.
    • Yn y ffenestr cod, copïwch y cod canlynol a'i gludo.
    2525

    Mae'ch cod nawr yn barod i'w redeg.

    Yma,

    .SortFields.Add Key:=Ystod("B4"), Gorchymyn:=xlAscending

    .SortFields.Add Key:=Ystod("C4 ”), Gorchymyn:=xlEsgynnol

    Yn ôl y ddwy linell hyn, rydym yn diffinio Cell B4 a C4 i ddidoli'r ddwy golofn sy'n gysylltiedig â nhw mewn trefn esgynnol .

    Gan fod gennym benawdau yn ein set ddata felly fe wnaethom nodi Pennawd = xlYes , fel arall byddem wedi ysgrifennu Pennawd = xlNo y tu mewn i'r cod.

    • Rhedwch y cod hwn a byddwch yn cael y colofnau gyda'r pennyn wedi'u didoli mewn trefn esgynnol .
    4. Macro i Drefnu Data trwy Dwbl-glicio ar Bennawd yn Excel

    Os ydych am ddidoli'r data yn rhwydd dim ond trwy glicio ddwywaith ar y pennyn , gallwch wneud hynny gyda Cod VBA .

    Camau:

    • De-gliciwch ar y tab dalen .
    • O'r rhestr opsiynau sy'n ymddangos, cliciwch Gweld y Cod .
    • Bydd ffenestr y cod yn ymddangos, copïwch y cod canlynol a gludwch ef i mewn yno.
    >
    3740
    • Cadw y cod.

    • Nawr ewch yn ôl i'r daflen waith o ddiddordeb ac os ydych clic dwbl ar y penawdau fe welwch fod y colofnau'n ad-drefnu.

    Darllen Mwy: Sut i Ddidoli a Hidlo Data yn Excel (Canllaw Cyflawn)

    Pethau i'w Cofio

    • Gallwch greu ystod a enwir a'i defnyddio yn lle hynny pan fyddwch yn pasio ystod o gyfeirnodau cell o fewn y Dull didoli. Er enghraifft, os ydych chi am ddidoli ystod A1:A10 , yn lle ei phasio bob tro y tu mewn i'r cod, gallwch greu ystod a enwir ohono, megis “ SortRange<40 ” a'i ddefnyddio gyda'r dull Range.Sort fel Range("SortRange") .
    • Os nad ydych yn siŵr a oes gan eich set ddata benawdau neu beidio, gallwch adael i'r system ei bennu drwy ddefnyddio'r paramedr xlGuess .

    Casgliad

    Dangosodd yr erthygl hon i chi sut i trefnwch y golofn yn Excel VBA . Rwy'n gobeithio bod yr erthygl hon wedi bod yn fuddiol iawn i chi. Mae croeso i chi ofyn a oes gennych unrhyw gwestiynau am y pwnc.

    Mae Hugh West yn hyfforddwr a dadansoddwr Excel hynod brofiadol gyda dros 10 mlynedd o brofiad yn y diwydiant. Mae ganddo radd Baglor mewn Cyfrifeg a Chyllid a gradd Meistr mewn Gweinyddu Busnes. Mae gan Hugh angerdd am addysgu ac mae wedi datblygu dull addysgu unigryw sy’n hawdd ei ddilyn a’i ddeall. Mae ei wybodaeth arbenigol o Excel wedi helpu miloedd o fyfyrwyr a gweithwyr proffesiynol ledled y byd i wella eu sgiliau a rhagori yn eu gyrfaoedd. Trwy ei flog, mae Hugh yn rhannu ei wybodaeth gyda’r byd, gan gynnig tiwtorialau Excel am ddim a hyfforddiant ar-lein i helpu unigolion a busnesau i gyrraedd eu llawn botensial.