Змест
Гэты артыкул дае адказы на вашы пытанні аб як дадаць аркуш з імем у Excel VBA . Калі вы шукаеце такія унікальныя трукі, вы прыйшлі ў патрэбнае месца. Тут мы абмяркуем 6 easy & правераныя спосабы дадання аркуша з назвай у Excel VBA .
Спампаваць практычны сшытак
Вы можаце загрузіць наступны сшытак Excel для лепшага разумення і практыкі.
Даданне аркуша з назвай.xlsmКод VBA для дадання аркуша з назвай
Мы будзем выкарыстоўваць аб'ект Sheets для дадання ліст у Excel. Фундаментальны код VBA для дадання аркуша з назвай выглядае так, як паказана ніжэй.
Sheets.Add ([Before], [After], [Count], [Type])
Перад: Гэта неабавязкова. Ён дадае новы аркуш перад пэўным аркушам.
Пасля: Гэта таксама неабавязкова. Ён дадае новы аркуш пасля пэўнага аркуша.
Колькасць: Гэта таксама неабавязковы параметр. Ён паказвае колькасць аркушаў, якія трэба дадаць.
Тып: Гэта таксама неабавязкова. Ён вызначае тып ліста. Тут значэнне па змаўчанні - xlWorksheet .
6 розных спосабаў дадаць аркуш з імем у Excel VBA
У Excel мы можам дадаць новы аркуш з надпісам <Значок 1>⊕ побач з назвай аркуша. Вы калі-небудзь думалі аўтаматызаваць тую ж задачу ў Excel? Не думайце больш, таму што VBA забяспечвае вас.
Тут у нас ёсць працоўны аркуш пад назвай Справаздача аб продажах . Ён змяшчае штодзённыя продажуСправаздача аб пэўнай сталоўцы. У слупках B , C і D ёсць назвы гандлёвых прадстаўнікоў , тавараў і Колькасць адпаведна.
Тут мы дадамо іншыя аркушы ў гэтую кнігу з дапамогай макраса VBA .
Тут мы выкарысталі версію Microsoft Excel 365 , вы можаце выкарыстоўваць любую іншую версію ў залежнасці ад вашага зручнасці.
1. Даданне аркуша з назвай у Excel VBA
У нашым першым метадзе мы дадамо аркуш з назвай з карыстальніцкага ўводу . Калі вам цікава даведацца, выканайце гэтыя простыя крокі.
📌 Крокі:
- У самым пачатку перайдзіце да Укладка Распрацоўшчык .
- Па-другое, абярыце Visual Basic у групе Код .
- Або націсніце ALT + F11 , каб выканаць тую ж задачу.
Заўвага: Не забудзьцеся націснуць клавішу ALT злева ад ПРАБЕЛ . Аперацыя не будзе выканана, калі вы выкарыстоўваеце іншыя клавішы ALT .
- Імгненна адкрыецца акно Microsoft Visual Basic для прыкладанняў .
- Пазней перайдзіце на ўкладку Уставіць .
- Затым выберыце Модуль з параметраў.
- У цяперашні час ён адкрывае код Module .
- Пасля гэтага напішыце наступны код у Module .
6509
Разбіўка кода
- Па-першае, мы называем працэдуру Sub як Add_Sheet_with_Name .
- Затым мы вызначаем тыпы зменных.
- Пазней мы дадалі аператар Пры памылцы, аднавіць далей . Гэта дазволіць ігнараваць любыя памылкі.
- Пасля мы выкарыстоўвалі InputBox , каб атрымаць назву аркуша ад карыстальніка. Акрамя таго, мы захавалі тэкставы радок з InputBox у зменную sheet_name .
- Далей, калі sheet_name пусты, то код не будзе працягвацца.
- Нарэшце, мы выкарыстоўваем метад Add.Name , каб назваць толькі што створаны ліст. Тут назва будзе такой жа, як у зменнай sheet_name .
- У гэты момант націсніце Выканаць Значок (⏵) . Замест гэтага вы можаце націснуць F5 на клавіятуры.
- Раптам адкрываецца поле ўводу.
- Тут увядзіце назву новага аркуша. У гэтым выпадку мы напісалі Прыбытак у полі.
- Пазней націсніце ОК .
- Такім чынам, наш код будзе выкананы, і ён дадасць ліст з назвай Прыбытак .
Заўвага: Мы не згадалі месца для нашага аркуша. Па змаўчанні ён размяшчаецца перад актыўным аркушам.
Больш падрабязна: Excel VBA для дадання аркуша ў іншую працоўную кнігу (3 зручныя прыклады)
2. Прымяненне Excel VBA для дадання аркуша з імем перад пэўным аркушам
У нашым другім метадзе мы дадамо аркуш з імем перад пэўным аркушам. Давайце вывучым працэс паэтапнакрок.
📌 Крокі:
- Спачатку адкрыйце акно кода Модуль , як паказана ў Спосаб 1 .
- Па-другое, упішыце ў яго наступны код.
5455
Разбіўка кода
- Па-першае, мы выклікаем працэдуру Sub як Add_Sheet_Before_Specific_Sheet .
- Затым мы актывуем аркуш Справаздача аб продажах . Гэта пераканаецца, што код будзе выкананы, калі мы знаходзімся на іншым аркушы.
- Далей мы выкарыстоўваем метад Add.Name , каб назваць толькі што створаны аркуш. Гэты аркуш будзе створаны перад аркушам пад назвай Прыбытак з працоўнай кнігі. Акрамя таго, мы назвалі ліст як Бухгалтарскі баланс .
- Пасля гэтага запусціце код, як паказана ў Метад 1 .
- Такім чынам, ён дадасць новы ліст Баланс перад лістом з назвай Прыбытак .
Дадатковая інфармацыя: Excel VBA для дадання аркуша з імем зменнай (5 ідэальных прыкладаў)
3. Выкарыстанне Excel VBA для дадання аркуша з імем пасля пэўнага аркуша
У гэтым метадзе мы дадамо аркуш пасля аркуша з назвай Прыбытак . Давайце разгледзім працэс у дэталях.
📌 Этапы:
- Спачатку адкрыйце код Module акно, як паказана ў метадзе 1 .
- Пасля гэтага ўпішыце ў яго наступны код.
6447
Гэты код амаль падобны на код Спосаб 2 . Проста, тут мы хутчэй выкарысталі параметр Пасля чым Да . Таму што мы хочам дадаць новы аркуш пасля пэўнага аркуша.
- Пасля гэтага запусціце код, як паказана ў метадзе 1 .
- Такім чынам, пасля аркуша з назвай Прыбытак будзе дададзены новы аркуш Склад .
Дадатковая інфармацыя: Excel VBA для дадання аркуша, калі ён не існуе (з хуткімі крокамі)
4. Устаўка аркуша з імем у пачатку працоўнай кнігі
У гэтым раздзеле мы ўставім новы аркуш у пачатак кнігі ў Excel з дапамогай VBA . Такім чынам, без далейшых затрымак, давайце паглядзім, як мы гэта зробім.
📌 Крокі:
- Спачатку адкрыйце код Акно модуля , як паказана ў метадзе 1 .
- Пасля гэтага ўпішыце ў яго наступны код.
4230
Тут мы дадаем новы аркуш перад першым аркушам сшытка. Гэта значыць у пачатку працоўнай кніжкі. У выніку цяпер першы аркуш. Акрамя таго, мы назвалі аркуш Профіль кампаніі .
- Затым запусціце код, як паказана ў метадзе 1 .
- Такім чынам, у пачатку працоўнай кнігі будзе дададзены новы аркуш Профіль кампаніі .
Дадатковая інфармацыя: Макрас Excel: стварэнне новага аркуша і перайменаванне (3 ідэальныя прыклады)
5. Выкарыстанне Excel VBA для дадання аркуша ў канец рабочай кнігі
У гэтым раздзеле мы дададзім аркуш пасля апошняга аркуша працоўнай кнігі . Дазвольце мне прадэманстраваць працэсніжэй.
📌 Крокі:
- У першую чаргу адкрыйце акно кода Модуль , як паказана ў Спосаб 1 .
- Па-другое, устаўце ў яго наступны код.
3609
Разбіўка кода
- Па-першае, мы выклікаем працэдуру Sub як Sheet_End_Workbook.
- Далей мы выкарыстоўваем метад Add.Name , каб назваць толькі што створаны ліст. Мы створым гэты аркуш пасля апошняга ліста працоўнай кнігі. Мы можам атрымаць апошні нумар аркуша з уласцівасці Sheets.Count . Акрамя таго, мы назвалі аркуш Справаздача аб даходах .
- Пасля гэтага запусціце код, як паказана ў Метад 1 .
- Такім чынам, у канцы працоўнай кнігі будзе дададзены новы аркуш Справаздача аб даходах .
Дадатковая інфармацыя: Стварэнне новай працоўнай кнігі і захаванне з дапамогай VBA ў Excel
6. Прадстаўленне некалькіх аркушаў з выкарыстаннем значэння ячэек у Excel VBA
Для апошняга спосабу мы дадамо некалькі аркушаў у кнігу з імем з дыяпазону вочак з дапамогай Excel VBA . Больш за тое, мы просім карыстальніка ўвесці дыяпазон, каб прыняць імя. Такім чынам, давайце паглядзім на крокі ніжэй.
📌 Крокі:
- Спачатку адкрыйце код Акно модуля , як паказана ў метадзе 1 .
- Пасля гэтага скапіруйце наступны код і ўстаўце яго туды.
4640
Разбіўка кода
- Па-першае, мы выклікаем субпрацэдура Add_Multiple_Sheets_Using_Cell_Value.
- Затым мы вызначаем тыпы зменных.
- Пасля гэтага мы выкарыстоўваем InputBox , каб атрымаць дыяпазон даных ад карыстальніка.
- Па-чацвёртае, мы актывуем аркуш Справаздача аб продажах .
- Пазней мы выкарыстоўваем цыкл Для кожнага наступнага , каб прайсці па выбраным дыяпазоне вочак адну за адной.
- Далей мы выкарыстоўваем метад Add.Name , каб назваць толькі што створаны аркуш. Мы створым гэтыя аркушы пасля актыўнага аркуша Справаздача аб продажах працоўнай кнігі.
- Зараз запусціце код, як паказана ў Спосаб 1 .
- Імгненна адкрываецца поле ўводу Exceldemy .
- Затым увядзіце ячэйкі ў B5:B9 дыяпазон у полі.
- Нарэшце, націсніце ОК .
- Нарэшце, будзе ўстаўлена пяць аркушаў, названых паводле значэнняў ячэек у дыяпазоне B5:B9 . Усе яны знаходзяцца пасля аркуша Справаздача аб продажах .
Выснова
У гэтым артыкуле прадстаўлены простыя і кароткія рашэнні для дадання аркушаў з назвамі па Excel VBA . Не забудзьцеся загрузіць файл Практыка . Дзякуй, што прачыталі гэты артыкул, мы спадзяемся, што ён быў карысным. Калі ў вас ёсць якія-небудзь пытанні ці прапановы, дайце нам ведаць у раздзеле каментарыяў. Калі ласка, наведайце наш вэб-сайт Exceldemy , каб даведацца больш.