Бұл мақала Excel VBA бағдарламасында аты бар парақты қалай қосу керектігі туралы сұрақтарыңызға жауап береді. Егер сіз осындай ерекше трюктерді іздесеңіз, сіз дұрыс жерге келдіңіз. Мұнда біз 6 оңай & Excel VBA бағдарламасында аты бар парақты қосудың дәлелденген жолдары.

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

Өзіңізді жақсырақ түсіну және тәжірибе алу үшін келесі Excel жұмыс кітабын жүктеп алуға болады.

VBA кодын қосу

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

Бұрын: Бұл міндетті емес. Ол белгілі бір парақтың алдында жаңа парақты қосады.

Кейін: Бұл да міндетті емес. Ол белгілі бір парақтан кейін жаңа парақты қосады.

Санау: Бұл да қосымша параметр. Ол қосылатын парақтардың санын көрсетеді.

Түрі: Бұл да міндетті емес. Ол парақтың түрін анықтайды. Мұнда әдепкі мән xlWorksheet болып табылады.

Excel бағдарламасында аты бар парақты қосудың 6 түрлі жолы VBA

Excelде біз <қосу арқылы жаңа парақты қоса аламыз. Парақ атауының жанындағы 1>⊕ белгішесі. Сіз Excel бағдарламасында бірдей тапсырманы автоматтандыруды ойладыңыз ба? Енді ойланбаңыз, себебі VBA сізді қамтыды.

Мұнда бізде Сату есебі атты жұмыс парағы бар. Онда Күнделікті сатылымдар барБелгілі бір асхана туралы есеп . B , C және D бағандарында Сату өкілдері , Элементтер және <1 атаулары бар>Саны сәйкесінше.

Мұнда біз VBA макрос көмегімен осы жұмыс кітабына басқа парақтарды қосамыз.

Бұл жерде біз Microsoft Excel 365 нұсқасын қолдандық, сіз өзіңізге ыңғайлы кез келген басқа нұсқаны пайдалана аласыз.

1. Excel VBA бағдарламасында аты бар парақты қосу

Бірінші әдісімізде пайдаланушы енгізуі атауы бар парақты қосамыз. Егер сіз үйренгіңіз келсе, мына қарапайым қадамдарды орындаңыз.

📌 Қадамдар:

• Ең басында, Әзірлеуші қойындысы.
• Екіншіден, Код тобындағы Visual Basic таңдаңыз.
• Балама ALT пернесін басыңыз. + F11 сол тапсырманы орындау үшін.

Ескертпе: Басуды ұмытпаңыз. АЛТ пернесі БОС ОРЫН сол жағында. Басқа ALT пернелерін пайдалансаңыз, операция орындалмайды.

• Бірден Microsoft Visual Basic for Applications терезесі ашылады.
• Кейінірек Кірістіру қойындысына өтіңіз.
• Содан кейін опциялардан Модуль тармағын таңдаңыз.

• Қазір ол Модуль кодын ашады.
• Содан кейін Модуль ішіне келесі кодты жазыңыз.

9886

Кодтың бөлінуі

• Біріншіден, біз Sub процедураны былай деп атаймыз. Аты_бар_парақ_қосу .
• Содан кейін біз айнымалы типтерді анықтаймыз.
• Кейін біз Қатені жалғастыру туралы мәлімдемесін қостық. Бұл кез келген қателерді елемейді.
• Одан кейін пайдаланушыдан парақтың атын алу үшін InputBox қолдандық. Сондай-ақ, біз InputBox мәтін жолын sheet_name айнымалысына сақтадық.
• Кейін, егер парақ_аты бос болса, онда код жалғастырмайды.
• Соңында, біз жаңадан жасалған параққа атау беру үшін Add.Name әдісін қолданамыз. Мұнда атау sheet_name айнымалысымен бірдей болады.

• Осы сәтте Орындау түймесін басыңыз. (⏵) белгішесі. Керісінше, пернетақтада F5 пернесін басуға болады.

• Кенеттен ол енгізу өрісін ашады.
• Мұнда жаңа парақтың атын енгізіңіз. Бұл жағдайда біз өріске Пайдасы деп жаздык.
• Кейінірек Жарайды түймесін басыңыз.

• Сонымен, біздің код орындалады және ол Пайдасы атты парақты қосады.

Ескерту: Біз парақ үшін ешбір орынды айтқан жоқпыз. Әдепкі бойынша ол белсенді парақтың алдына қойылады.

Толығырақ оқу: Excel VBA парағын басқа жұмыс кітабына қосу үшін (3 ыңғайлы мысал)

2. Арнайы парақтың алдында аты бар парақты қосу үшін Excel VBA қолданбасын қолдану

Екінші әдісімізде біз белгілі бір парақтың алдына аты бар парақты қосамыз. Процесті кезең-кезеңімен қарастырайыққадам.

📌 Қадамдар:

• Біріншіден, Модуль терезесін <көрсетілгендей ашыңыз. 1>1-әдіс .
• Екіншіден, оған келесі кодты жазыңыз.

9601

Кодтың бөлінуі

• Біріншіден, біз Ішкі процедураны Арнайы_парақ_бұрын_қосу деп атаймыз.
• Содан кейін Сату есебі парағын белсендіреміз. Бұл басқа парақта болған жағдайда кодтың іске қосылатынына көз жеткізеді.
• Кейін, біз жаңадан жасалған парақты атау үшін Add.Name әдісін қолданамыз. Бұл парақ жұмыс кітабындағы Пайдасы деп аталатын парақтың алдында жасалады. Сонымен қатар, біз парақты Бухгалтерлік баланс деп атадық.

• Содан кейін Әдісте көрсетілгендей кодты іске қосыңыз. 1 .
• Осылайша, ол Пайда деп аталатын парақтың алдына жаңа Бухгалтерлік баланс парағын қосады.

Толығырақ оқу: Айнымалы атауы бар парақты қосу үшін Excel VBA (5 тамаша мысал)

3. Парақ қосу үшін Excel VBA пайдалану Арнайы парақтан кейін аты бар

Бұл әдісте біз парақтан кейін Пайдасы деп аталатын парақты қосамыз. Процесті егжей-тегжейлі қарастырайық.

📌 Қадамдар:

• Алғашында Модуль<2 кодын шығарыңыз> терезесі 1-әдіс -де көрсетілгендей.
• Одан кейін оған келесі кодты жазыңыз.

8756

Бұл код <кодына дерлік ұқсайды. 1>2-әдіс . Бұл жерде біз орнына Кейін параметрін қолдандыққарағанда Бұрын . Өйткені біз жаңа парақты белгілі бір парақтан кейін қосқымыз келеді.

• Одан кейін кодты 1-әдіс -де көрсетілгендей іске қосыңыз.
• Осылайша, ол Пайдасы деп аталатын парақтан кейін Қойма жаңа парақты қосады.

Толығырақ оқу: Егер ол жоқ болса, парақты қосу үшін Excel VBA (жылдам қадамдар арқылы)

4. Жұмыс кітабының басында аты бар парақты кірістіру

Бұл бөлімде біз VBA көмегімен Excel бағдарламасындағы жұмыс кітабының басына жаңа парақты кірістіреміз. Ендеше, бұдан әрі кешіктірмей, мұны қалай жасайтынымызды көрейік.

📌 Қадамдар:

• Бастапқыда кодты келтіріңіз Модуль терезесі 1-әдіс -де көрсетілгендей.
• Содан кейін оған келесі кодты жазыңыз.

3338

Осы жерде біз қосып жатырмыз. жұмыс кітабының бірінші парағының алдындағы жаңа жұмыс парағы. Бұл жұмыс кітабының басында дегенді білдіреді. Нәтижесінде, бұл қазір бірінші парақ. Сондай-ақ парақты Компания профилі деп атадық.

• Содан кейін 1-әдіс -де көрсетілгендей кодты іске қосыңыз.
• Осылайша, ол жұмыс кітабының басында Компания профилі жаңа парақты қосады.

Толығырақ оқу: Excel макросы: Жаңа парақ жасау және атын өзгерту (3 тамаша мысал)

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

Бұл бөлімде біз жұмыс кітабының соңғы парағынан кейін парақты қосамыз . Процесті көрсетуге рұқсат етіңізтөменде.

📌 Қадамдар:

• Ең алдымен Модуль код терезесін <1-де көрсетілгендей ашыңыз>1-әдіс .
• Екіншіден, оған келесі кодты қойыңыз.

3169

Кодтың бөлінуі

• Біріншіден, біз Sub процедурасын Sheet_End_Workbook деп атаймыз.
• Кейін, жаңадан жасалған парақты атау үшін Add.Name әдісін қолданамыз. Бұл парақты жұмыс кітабының соңғы парағынан кейін жасаймыз. Соңғы парақ нөмірін Sheets.Count қасиетінен ала аламыз. Сонымен қатар, біз парақты Кірістер туралы есеп деп атадық.

• Одан кейін Әдісте көрсетілгендей кодты іске қосыңыз. 1 .
• Осылайша, ол жұмыс кітабының соңына жаңа Кірістер туралы есеп парағын қосады.

Толығырақ оқу: Жаңа жұмыс кітабын жасау және Excel бағдарламасында VBA көмегімен сақтау

6. Excel VBA арқылы ұяшық мәнін пайдалану арқылы бірнеше парақтарды енгізу

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

📌 Қадамдар:

• Алғашында кодын ашыңыз. Модуль терезесі 1-әдіс -де көрсетілгендей.
• Содан кейін келесі кодты көшіріп, оған қойыңыз.

4323

Кодтың бөлінуі

• Біріншіден, біз ішкі бөлімді шақырамызПроцедураны Add_Multiple_sheets_Using_Cell_Value деп атаймыз.
• Содан кейін айнымалы типтерді анықтаймыз.
• Содан кейін пайдаланушыдан деректер ауқымын алу үшін InputBox қолданамыз.
• Төртіншіден, біз Сату есебі парағын белсендіреміз.
• Кейін таңдалған ұяшықтар ауқымын бір-бірден өту үшін Әр келесі үшін циклін қолданамыз.
• Содан кейін біз жаңадан жасалған параққа ат қою үшін Add.Name әдісін қолданамыз. Біз бұл парақтарды жұмыс кітабының Сату есебі белсенді парағынан кейін жасаймыз.

• Енді кодты мына жерде көрсетілгендей іске қосыңыз. 1-әдіс .
• Бірден Exceldemy енгізу өрісі ашылады.
• Содан кейін B5:B9<2 ұяшықтарын беріңіз> жолақтағы диапазон.
• Соңында Жарайды түймесін басыңыз.

• Соңында ол <кірістіреді. 1>бес парақ B5:B9 ауқымындағы ұяшық мәндерінің атымен аталады. Олардың барлығы Сату есебі парағынан кейін.

Қорытынды

Бұл мақалада парақтарды қосудың оңай және қысқа шешімдері берілген. Excel VBA атауларымен. Практика файлын жүктеп алуды ұмытпаңыз. Осы мақаланы оқығаныңыз үшін рахмет, бұл пайдалы болды деп үміттенеміз. Егер сізде қандай да бір сұрақтарыңыз немесе ұсыныстарыңыз болса, түсініктеме бөлімінде бізге хабарлаңыз. Толығырақ білу үшін Exceldemy веб-сайтымызға кіріңіз.