Microsoft Excel бағдарламасымен жұмыс істегенде, біз деректердің үлкен көлемін тексеруді пайдалана аламыз. Және сол деректер ауқымын кестеге түрлендіру ең үлкен опциялардың бірі болып табылады. Excel кестелері деректерді жылдам сұрыптауға және сүзуге, жаңа жазбаларды қосуға және диаграммалар мен жиынтық кестелерді лезде жаңартуға мүмкіндік береді. Және Excel VBA пайдаланушыға қолданбаны бірнеше қарапайым кодтармен теңшеуге көмектеседі. Бұл мақалада біз диапазоннан кесте жасау үшін Excel VBA бірнеше мысалдарын көреміз.

Тәжірибе жұмыс кітабын жүктеп алу

Сіз жұмыс кітабы және олармен тәжірибе жасаңыз.

6 Ауқымнан кесте жасау үшін Excel VBA мысалдары

Кестелер Excel мәзір басылымында тізімдер ретінде басталды, бірақ таспа нұсқаларында олардың функционалдығы өсті. Деректер ауқымын кестеге түрлендіру жылдам әрі оңай жұмыс істеуге мүмкіндік беретін мүмкіндікті кеңейтеді. VBA қолдану арқылы ауқымды кестеге түрлендіру таспаны пайдаланудан гөрі ең оңай әдіс болып табылады.

<бағанында кейбір элементтерді қамтитын қарапайым деректер жинағы бар делік. 1>B , C бағанындағы сол элементтердің саны және D бағанындағы әрбір элемент бойынша жалпы сатылымдар. Енді біз деректер ауқымын кестеге түрлендіруді қалаймыз. Excel VBA бағдарламасымен B4:D9 диапазонынан кесте құру үшін әртүрлі мысалдар мен қадамдық нұсқауларды көрсетейік.

ListObjects пайдаланыңыз. .А бұру үшін қосыңызауқымын Excel кестесіне айналдырады. Электрондық кесте нысанында ListObjects сипаты бар. ListObjects Қосу деп аталатын әдістемесі бар. .Add критерийлері төмендегідей.

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

Және SourceType xlSrcRange<пайдаланыңыз. 2>.

1. Excel VBA диапазонынан кестені жасау үшін

Excel VBA көмегімен пайдаланушылар таспадағы Excel мәзірлері ретінде әрекет ететін кодты оңай пайдалана алады. Ауқымнан кесте құру үшін VBA кодын пайдалану үшін процедураны төмендетейік.

ҚАДАМДАР:

• Біріншіден, таспадан Әзірлеуші ​​ қойындысына өтіңіз.
• Екіншіден, Код санатынан Visual Basic басыңыз ашу үшін Visual Basic редакторы . Немесе Visual Basic өңдегішін ашу үшін Alt + F11 пернелер тіркесімін басыңыз.
• Мұны орындаудың орнына, жұмыс парағын тінтуірдің оң жақ түймешігімен басып, бөліміне өтуіңізге болады. Кодты қарау . Бұл сонымен қатар сізді Visual Basic өңдегішіне апарады.

• Бұл Visual Basic өңдегішінде <2 пайда болады>ауқымнан кесте құру үшін кодтарымызды жазатын жерде.
• Үшіншіден, Кірістіру ашылмалы мәзір жолағынан Модуль түймесін басыңыз.

• Бұл жұмыс кітабыңызда Модуль жасайды.
• Және VBA көшіріп, қойыңыз. төменде көрсетілген код.

VBA коды:

6154

• Одан кейін RubSub түймесін басу арқылы кодты іске қосыңыз немесе пернетақтаны басу F5 таңбашасы.

Кодты өзгертудің қажеті жоқ. Сіз тек қана ауқымды талаптарыңызға сай өзгерте аласыз.

• Соңында, қадамдарды орындау B4:D9 ауқымынан кестені жасайды.

VBA кодының түсіндірмесі

5725

Қосымша кодтың бөлігі болып табылады. кодтағы жұмысты өңдеу үшін пайдаланылады, бірақ ешқандай мәнді қайтармайды. Ол қосалқы процедура ретінде де белгілі. Сондықтан біз процедурамызды Create_Table() деп атаймыз.

3657

Бұл диапазон кесте ретінде түрлендірілетін негізгі код жолы. Біз білетініміздей, ауқымды Excel кестесіне айналдыру үшін ListObjects.Add . Ал біз бастапқы түрі ретінде xlSrcRange қолданамыз. Сондай-ақ, біз диапазонымызды Ауқым («B4:D9») жариялаймыз. Соңында кестемізді Кесте1 деп атаңыз.

6985

Бұл процедураны аяқтайды.

Толығырақ: Жиынтықты жаңарту әдісі Кесте диапазоны (5 қолайлы әдіс)

2. Excel VBA көмегімен ауқымнан кесте құру

Excel VBA көмегімен ауқымнан кесте құрудың басқа мысалын қарастырайық.

ҚАДАМДАР:

• Біріншіден, таспадан Әзірлеу r қойындысына өтіңіз.
• Екіншіден, Visual Basic өңдегішін<2 ашу үшін Visual Basic түймесін басыңыз>.
• Visual Basic редакторын ашудың тағы бір жолы - жай ғана Alt + F11 пернелерін басу.
• Немесе парақты тінтуірдің оң жақ түймешігімен басыңыз. , содан кейін Кодты қарау тармағын таңдаңыз.
• Кейін, Кірістіру жәнеашылмалы мәзірден Модуль тармағын таңдаңыз.
• Және бұл негізгі визуалды терезені ашады.
• Одан кейін VBA кодын көшіріп, қойыңыз. төменде.

VBA коды:

4265

• Одан әрі F5 пернесін басыңыз немесе <түймесін басыңыз. 1>Кодты іске қосу үшін Sub іске қосу түймешігін басыңыз.

• Және 1-әдіс<көрсетілгендей нәтиже аласыз. 2>.

VBA кодының түсіндірмесі

8045

VBA<2 ішіндегі DIM мәлімдемесі> « жариялау, » дегенді білдіреді және ол айнымалыны жариялау үшін қолданылуы керек. Сонымен, біз диапазонымызды tb2 және жұмыс парағын ws деп жариялаймыз.

9795

VBA жинағы бізге таңдау керек ауқымда терудің қажетін болдырмауға мүмкіндік береді. және кодты іске қосқан кезде қайталаңыз. Сонымен, біз диапазонымызды ағымдағы аймаққа, ал жұмыс парағын белсенді жұмыс парағына орнатамыз.

4954

Осы код жолы арқылы біз диапазоннан кесте жасаймыз және кестемізді Кесте2 деп атаймыз.

Толығырақ оқу: Excel кестесін VBA көмегімен қалай пайдалану керек (9 мүмкін жол)

3. Excel бағдарламасында VBA көмегімен ауқымнан кесте жасау

Ауқымнан кесте жасау үшін Excel VBA қолданбасын пайдаланудың тағы бір мысалын қарастырайық.

ҚАДАМДАР:

• Бастау үшін кестеге түрлендіргіңіз келетін бүкіл ауқымды таңдаңыз.
• Екіншіден, таспадағы Әзірлеуші қойындысын басыңыз.
• Үшіншіден, Visual түймешігін басу арқылы Visual Basic редакторын іске қосыңыз.Basic .
• Балама ретінде Alt + F11 пернелерін басу арқылы Visual Basic өңдегішіне қол жеткізуге болады.
• Немесе, оңға -парақта басыңыз және мәзірден Кодты қарау тармағын таңдаңыз.
• Кейін, Кірістіру астындағы ашылмалы терезеден Модуль таңдаңыз. .
• Және визуалды базалық терезе пайда болады.
• Онда кодты жазыңыз.

VBA коды:

1713

• Соңында кодты іске қосу үшін F5 пернесін басыңыз.

• Және бұл жасалады 1-әдіс -де алынған деректер ауқымындағы кесте.

Толығырақ оқу: Excel бағдарламасында кестені қалай жасауға болады (теңшеу арқылы). )

Ұқсас көрсеткіштер

• Жиынтық кестедегі есеп санына бөлінген өріс сомасы
• Excel бағдарламасында салыстырмалы жиіліктердің таралуын қалай суреттеуге болады
• Excel жиынтық кестесінің апта бойынша тобы (3 қолайлы мысал)
• [Түзету] Күндерді топтастыру мүмкін емес Жиынтық кестеде: 4 мүмкін шешім
• Excel бағдарламасында амортизация кестесін құру (4 әдіс) <1 3>

4. Ауқымнан динамикалық кесте жасау үшін VBA қолдану

Excel VBA көмегімен ауқымнан кестені жасаудың басқа жолын қарастырайық.

ҚАДАМДАР:

• Бастау үшін таспаны ашып, Әзірлеуші опциясын таңдаңыз.
• Содан кейін Visual Basic өңдегішіне кіру үшін <түймесін басыңыз. 1>Visual Basic .
• Alt + F11 пернелерін басу, сонымен қатар Visual Basic бағдарламасын шығарадыРедактор .
• Балама, парақты тінтуірдің оң жақ түймешігімен басыңыз және пайда болатын мәзірден Кодты қарау тармағын таңдаңыз.
• Енді, Кірістіру ашылмалы опциясын таңдап, Модуль таңдаңыз.
• Содан кейін келесі VBA кодын көшіріп, қойыңыз.

VBA коды:

4764

• F5 пернесін басу арқылы кодты іске қосыңыз.

• 1-әдіс суретінде көрсетілгендей кесте диапазоннан құрастырылады.

VBA Код түсіндірмесі

7818

Бұл жол ішкі процедураның атын көрсетеді.

6144

Бұл екі жол айнымалыларды жариялау үшін пайдаланылады.

1501

оператор объект атауын қайта квалификацияламай-ақ, бір нысан бойынша мәлімдемелер тізбегін жасауға мүмкіндік береді. Сонымен, біз W мәлімдемесін парақ атауымен қосамыз.

5237

Олар сәйкесінше соңғы жолды және соңғы бағанды ​​табуға арналған.

6877

Кестені құру ауқымы.

1913

Жоғарыда көрсетілген ауқымда кесте жасаңыз.

2877

Кесте атауын көрсету

6743

Кесте стилін көрсетіңіз.

Толығырақ: Excel бағдарламасында таңбашаны пайдаланып кесте құру (8 әдіс)

5. Динамикалық кестені диапазоннан жасаңыз

Енді ауқымнан кесте құрудың басқа Excel VBA әдісін қараңыз.

ҚАДАМДАР:

• Бастау үшін таспаны ашыңыз және ашылмалы мәзірден Әзірлеуші тармағын таңдаңыз.
• Содан кейін файлды ашу үшін Visual Basic таңдаңыз. Visual Basic өңдегіші .
• Visual Basic өңдегішіне Alt + F11 пернелерін басу арқылы да қол жеткізуге болады.
• Балама түрде, парақты тінтуірдің оң жақ түймешігімен басыңыз және қалқымалы мәзірден View Code тармағын таңдай аласыз.
• Одан кейін <ішінен Модуль таңдаңыз. 1> ашылмалы мәзірді енгізіңіз.
• Одан кейін келесі VBA кодын көшіріп, қойыңыз.

VBA коды:

5370

• Соңында, пернетақтадағы F5 пернесін басу арқылы кодты іске қосыңыз және нәтижені жұмыс парағында көресіз.

• Және 1-әдіс суретінде көрсетілгендей, кесте ауқымнан құрастырылады.

Толығырақ оқу: Қалай Excel кестелерін әдемі етіп жасаңыз (8 тиімді кеңес)

6. Динамикалық кестені құру үшін Excel VBA пайдаланыңыз

Ауқымнан кесте құрудың басқа Excel VBA әдісін қарастырайық.

ҚАДАМДАР:

• Басында Әзірлеуші қойындысына өтіңіз > Visual Basic > Кірістіру > Модуль .
• Немесе, жұмыс парағында тінтуірдің оң жақ түймешігін басу терезені ашады. Ол жерден Көру коды бөліміне өтіңіз.
• Және бұл сізді Visual Basic редакторы өрісіне апарады, онда біз VBA макростарын жаза аламыз.
• Екінші жағынан, Alt + F11 пернелерін басу сонымен қатар Visual Basic редакторын ашады.
• Одан кейін VBA кодын теріңіз. .

VBA коды:

8805

• Және нәтижені көру үшін кодты іске қосыңыз F5 пернесін басу.

• Және кесте <1 суретінде көрсетілгендей ауқымнан жасалады>1-әдіс .

Толығырақ: Деректермен Excel бағдарламасында кесте құру жолы (5 әдіс)

Қорытынды

Жоғарыда көрсетілген әдістер Excel бағдарламасында ауқымнан кесте құруға көмектеседі. Бұл сізге көмектеседі деп үміттенеміз! Егер сізде сұрақтар, ұсыныстар немесе пікірлер болса, бізге түсініктеме бөлімінде хабарлаңыз. Немесе ExcelWIKI.com блогындағы басқа мақалаларымызға көз жүгірте аласыз!