Excel VBA kuunda Jedwali kutoka kwa safu (Mifano 6)

Hugh West

16-10-2023 Macros & Excel VBA
  • Shiriki Hii
Hugh West

Huku tunafanya kazi na Microsoft Excel , tunaweza kutumia kuchunguza kiasi kikubwa cha data. Na, kubadilisha safu hizo za data kuwa jedwali ni moja wapo ya chaguo bora zaidi. Majedwali ya Excel huturuhusu kupanga na kuchuja data kwa haraka, kuongeza rekodi mpya na kusasisha chati na PivotTables papo hapo. Na Excel VBA husaidia mtumiaji kubinafsisha programu kwa kutumia misimbo kadhaa rahisi. Katika makala haya, tutaona baadhi ya mifano ya Excel VBA kuunda jedwali kutoka anuwai.

Pakua Kitabu cha Mazoezi cha Mazoezi

Unaweza kupakua kitabu cha kazi na ujizoeze nao.

Unda Jedwali kutoka kwa Range.xlsm

Mifano 6 ya Excel VBA ya Kuunda Jedwali kutoka Masafa 5>

Majedwali yalianza kama orodha katika toleo la menyu ya Excel, lakini hizo zilikua katika utendakazi katika vibadala vya utepe. Kubadilisha masafa ya data kuwa jedwali huongeza uwezo, hivyo kukuwezesha kufanya kazi kwa haraka na kwa urahisi zaidi. Ili kubadilisha masafa kuwa jedwali kwa kutumia VBA ndiyo njia rahisi kuliko kutumia utepe.

Tuseme, tuna mkusanyiko wa data rahisi ambao una baadhi ya vipengee kwenye safuwima

1>B

, kiasi cha bidhaa hizo kwenye safuwima C , na jumla ya mauzo kwa kila bidhaa kwenye safuwima D . Sasa, tunataka kubadilisha masafa ya data kuwa jedwali. Hebu tuonyeshe mifano tofauti na maagizo ya hatua kwa hatua ili kuunda jedwali kutoka masafa B4:D9 na Excel VBA.

Tumia ListObjects .Ongeza kugeuza ambalimbali kwenye jedwali la Excel. Kipengee cha Lahajedwali kina sifa ListObjects . ListObjects ina mbinu inayoitwa Ongeza . Vigezo vya .Ongeza ni kama ifuatavyo.

expression .Add(SourceType, Source, LinkSource, HasHeaders,Destination)

Na, tumia SourceType xlSrcRange .

1. Excel VBA ya Kuzalisha Jedwali kutoka Masafa

Kwa Excel VBA , watumiaji wanaweza kutumia kwa urahisi msimbo unaofanya kazi kama menyu bora kutoka kwenye utepe. Ili kutumia msimbo wa VBA kutengeneza jedwali kutoka kwa safu, hebu tufuate utaratibu chini.

STEPS:

  • Kwanza, nenda kwa kichupo cha Msanidi kutoka kwenye utepe.
  • Pili, kutoka kitengo cha Msimbo , bofya Visual Basic ili kufungua Visual Basic Editor . Au bonyeza Alt + F11 kufungua Kihariri cha Msingi cha Visual .
  • Badala ya kufanya hivi, unaweza kubofya kulia kwenye laha yako ya kazi na uende kwa Tazama Msimbo . Hii pia itakupeleka kwenye Kihariri cha Msingi cha Visual .

  • Hii itaonekana katika Kihariri cha Msingi cha Visual ambapo tunaandika misimbo yetu ili kuunda jedwali kutoka masafa.
  • Tatu, bofya Moduli kutoka Ingiza upau wa menyu kunjuzi.

  • Hii itaunda Moduli katika kitabu chako cha kazi.
  • Na, nakili na ubandike VBA msimbo umeonyeshwa hapa chini.

Msimbo wa VBA: 

9770
  • Baada ya hapo, endesha msimbo kwa kubofya kitufe cha RubSub au kubonyeza kibodinjia ya mkato F5 .

Huhitaji kubadilisha msimbo. Unachoweza kufanya ni kubadilisha tu masafa kulingana na mahitaji yako.

  • Na, hatimaye, kufuata hatua kutaunda jedwali kutoka masafa B4:D9 .

Ufafanuzi wa Msimbo wa VBA 

2266

Sub ni sehemu ya msimbo ambayo ni inatumika kushughulikia kazi katika msimbo lakini haitarudisha thamani yoyote. Pia inajulikana kama subprocedure. Kwa hivyo tunaupa utaratibu wetu jina Create_Table() .

4436

Hii ndiyo safu kuu ya msimbo ambayo safu hubadilishwa kuwa jedwali. Kama tunavyojua tayari kuwa ListObjects.Ongeza ili kugeuza masafa kuwa jedwali la Excel. Na tunatumia xlSrcRange kama aina ya chanzo. Pia, tunatangaza masafa yetu Masafa(“B4:D9”) . Na hatimaye, taja jedwali letu kama Jedwali1 .

3453

Hii itamaliza utaratibu.

Soma Zaidi: Jinsi ya Kusasisha Pivot. Aina ya Jedwali (Njia 5 Zinazofaa)

2. Tengeneza Jedwali kutoka Masafa Ukitumia Excel VBA

Hebu tuone mfano mwingine wa kuunda jedwali kutoka masafa kwa kutumia Excel VBA.

STEPS:

  • Kwanza, nenda kwenye kichupo cha Tengeneza r kutoka kwenye utepe.
  • Pili, bofya Visual Basic ili kufungua Kihariri cha Msingi cha Visual .
  • Njia nyingine ya kufungua Visual Basic Editor ni kubonyeza Alt + F11 .
  • Au, bofya kulia kwenye laha , kisha uchague Tazama Msimbo .
  • Ifuatayo, nenda kwa Ingiza nachagua Moduli kutoka kwenye menyu kunjuzi.
  • Na, hii itafungua dirisha msingi la kuona.
  • Baada ya hapo, nakili na ubandike msimbo wa VBA hapa chini.

Msimbo wa VBA: 

5340
  • Zaidi, bonyeza kitufe cha F5 au ubofye 1>Kibonye cha Endesha Kidogo ili kuendesha msimbo.

  • Na, utapata matokeo kama inavyoonyeshwa katika Njia ya 1 .

Ufafanuzi wa Msimbo wa VBA 

9626

Taarifa ya DIM katika VBA inarejelea “ tangaza, ” na lazima itumike kutangaza kigezo. Kwa hivyo, tunatangaza fungu letu la visanduku kuwa tb2 na lahakazi kwa ws .

5671

VBA Set huturuhusu tu kuepuka kuchapa masafa tunayohitaji kuchagua. na tena wakati wa kuendesha nambari. Kwa hivyo, tunaweka safu yetu kwa eneo la sasa na laha ya kazi kwenye karatasi inayotumika.

1762

Kwa mstari huu wa msimbo, tunaunda jedwali kutoka kwa safu na kutaja jedwali letu Jedwali2 .

Soma Zaidi: Jinsi ya Kutumia Jedwali la Excel lenye VBA (Njia 9 Zinazowezekana)

3. Unda Jedwali kutoka Masafa yenye VBA katika Excel

Hebu tuangalie mfano mwingine wa kutumia Excel VBA kuunda jedwali kutoka masafa.

HATUA:

  • Ili kuanza, chagua safu nzima unayotaka kubadilisha kuwa jedwali.
  • Pili, bofya kichupo cha Msanidi kwenye utepe.
  • Tatu, zindua Visual Basic Editor kwa kubofya VisualMsingi .
  • Vinginevyo, unaweza kufikia Kihariri cha Msingi cha Visual kwa kubofya Alt + F11 .
  • Au, kulia -bofya kwenye laha na uchague Angalia Msimbo kutoka kwenye menyu.
  • Ifuatayo, chagua Moduli kutoka kwa kisanduku kunjuzi chini ya Ingiza .
  • Na dirisha la msingi la kuona litaonekana.
  • Andika msimbo hapo.

Msimbo wa VBA: 

9835
  • Mwishowe, bonyeza kitufe cha F5 ili kuendesha msimbo.

  • Na, hii itaunda jedwali kutoka kwa safu ya data kama tulivyopata katika Njia ya 1 .

Soma Zaidi: Jinsi ya Kutengeneza Jedwali katika Excel (Kwa Kubinafsisha )

Visomo Sawa

  • Jumla ya Sehemu Iliyokokotolewa Imegawanywa kwa Hesabu katika Jedwali la Pivot
  • Jinsi ya Kuonyesha Usambazaji Husika wa Masafa katika Excel
  • Kikundi cha Jedwali la Egemeo la Excel kwa Wiki (Mifano 3 Inayofaa)
  • [Fix] Haiwezi Tarehe za Kikundi katika Jedwali la Egemeo: Suluhu 4 Zinazowezekana
  • Jinsi ya Kutengeneza Jedwali la Mapato katika Excel (Njia 4) <1 3>

4. Tumia VBA ili Unda Jedwali Linalobadilika kutoka Masafa

Hebu tuangalie njia nyingine ya kutengeneza jedwali kutoka masafa kwa kutumia Excel VBA.

STEPS: 3>

  • Ili kuanza, fungua utepe na uchague chaguo la Msanidi .
  • Kisha, ili kufikia Kihariri cha Msingi cha Visual , bofya
1>Visual Basic .
  • Kubonyeza Alt + F11 pia kutaleta Visual BasicMhariri .
  • Aidha, bofya-kulia laha na uchague Tazama Msimbo kutoka kwenye menyu inayoonekana.
  • Sasa, kutoka kwa Ingiza chaguo kunjuzi, chagua Moduli .
  • Kisha nakili na ubandike VBA msimbo unaofuata.

    • Msimbo wa VBA: 

    2075
    • Tekeleza msimbo kwa kubofya kitufe cha F5 .

    • Kama inavyoonyeshwa katika Mbinu ya 1 kielelezo, jedwali litajengwa kutoka safu.

    VBA Ufafanuzi wa Kanuni statement hukuruhusu kufanya mlolongo wa taarifa kwenye kitu kimoja bila kuhitaji kustahiki jina la kitu hicho. Kwa hivyo, tunaambatanisha Na taarifa na jina la laha. 

    4589

    Hizo ni kwa mtawalia kutafuta safu mlalo ya mwisho na safu wima ya mwisho. 

    4553

    Masafa ili kuunda jedwali. 

    5408

    Unda jedwali katika safu iliyobainishwa hapo juu. 

    9784

    Inabainisha jina la jedwali 

    3244

    Bainisha mtindo wa jedwali.

    Soma Zaidi: Unda Jedwali katika Excel Ukitumia Njia ya Mkato (Njia 8)

    5. Tengeneza Jedwali Linalobadilika kutoka Masafa

    Sasa, angalia mbinu nyingine ya Excel VBA ya kuunda jedwali kutoka masafa.

    HATUA:

    • Kuanza, fungua utepe na uchague Msanidi kutoka kwenye menyu kunjuzi.
    • Kisha uchague Visual Basic ili kufungua Kihariri cha Msingi cha Visual .
    • Kihariri cha Msingi kinachoonekana kinaweza pia kufikiwa kwa kubofya Alt + F11 .
    • Vinginevyo, unaweza kubofya kulia laha na uchague Tazama Msimbo kutoka kwenye menyu ibukizi.
    • Baada ya hapo, chagua Moduli kutoka
      • 1>Ingiza menyu kunjuzi.
    • Kisha nakili na ubandike msimbo ufuatao wa VBA.

    Msimbo wa VBA: 

    5519
    • Mwishowe, endesha msimbo kwa kubofya F5 kwenye kibodi yako na utaona matokeo katika laha yako ya kazi.

    • Na, kama inavyoonyeshwa katika Mbinu 1 kielelezo, jedwali litajengwa kutoka masafa.

    Soma Zaidi: Jinsi ya kufanya Fanya Jedwali la Excel Ionekane Nzuri (Vidokezo 8 Muhimu)

    6. Tumia Excel VBA Kuunda Jedwali Linalobadilika

    Hebu tuchunguze njia nyingine ya Excel VBA ya kuunda jedwali kutoka masafa.

    STEPS:

    • Mwanzoni, nenda kwenye kichupo cha Msanidi > Visual Basic > Ingiza > Moduli .
    • Au, kubofya kulia kwenye laha kazi kutafungua dirisha. Kutoka hapo nenda kwenye Msimbo wa Kutazama .
    • Na, hii itakupeleka kwenye Kihariri cha Visual Basic uga, ambapo tunaweza kuandika VBA Macros.
    • 12>Kwa upande mwingine, kubonyeza Alt + F11 pia kutafungua Visual Basic Editor .
    • Baada ya hapo, chapa VBA code .

    Msimbo wa VBA: 

    4776
    • Na, endesha msimbo ili kuona matokeo kwakubonyeza kitufe cha F5 .

    • Na, jedwali litaundwa kutoka kwa safu kama inavyoonyeshwa kwenye picha ya Njia ya 1 .

    Soma Zaidi: Jinsi ya Kuunda Jedwali katika Excel yenye Data (Njia 5)

    Hitimisho

    Njia zilizo hapo juu zitakusaidia kuunda jedwali kutoka anuwai katika Excel. Natumai hii itakusaidia! Ikiwa una maswali yoyote, mapendekezo, au maoni tafadhali tujulishe katika sehemu ya maoni. Au unaweza kutazama makala zetu nyingine katika blogu ya ExcelWIKI.com !

    Chapisho lililotangulia Jinsi ya Kuchapisha kwa PDF katika Excel VBA : Kwa Mifano na Vielelezo
    Chapisho linalofuata Jinsi ya kutumia Anwani isiyo ya moja kwa moja katika Excel (Mifano 4)

    Hugh West ni mkufunzi na mchambuzi mwenye uzoefu wa juu wa Excel na uzoefu wa zaidi ya miaka 10 katika tasnia. Ana Shahada ya Kwanza katika Uhasibu na Fedha na Shahada ya Uzamili katika Utawala wa Biashara. Hugh ana shauku ya kufundisha na ameanzisha mbinu ya kipekee ya kufundisha ambayo ni rahisi kufuata na kuelewa. Ujuzi wake wa kitaalam wa Excel umesaidia maelfu ya wanafunzi na wataalamu ulimwenguni kote kuboresha ujuzi wao na kufaulu katika taaluma zao. Kupitia blogu yake, Hugh hushiriki ujuzi wake na ulimwengu, akitoa mafunzo ya bila malipo ya Excel na mafunzo ya mtandaoni ili kuwasaidia watu binafsi na biashara kufikia uwezo wao kamili.