Како да додадете лист со име во Excel VBA (6 лесни начини)

Hugh West

02-06-2023 Макроа & засилувач; Excel VBA
  • Споделете Го Ова
Hugh West

Овој напис дава одговори на вашите прашања за како да додадете лист со име во Excel VBA . Ако барате такви уникатни видови на трикови, дојдовте на вистинското место. Овде, ќе разговараме за 6 лесен & засилувач; докажани начини за додавање лист со име во Excel VBA .

Преземете ја работната книга за вежбање

Можете да ја преземете следната работна книга на Excel за подобро разбирање и вежбање.

Додавање лист со Name.xlsm

VBA код за додавање лист со име

Ќе го користиме објектот на листови за додавање лист во Excel. Основниот код VBA за додавање лист со името изгледа како оној подолу.

Sheets.Add ([Before], [After], [Count], [Type])

Претходно: Тоа е опционално. Додава нов лист пред одреден лист.

По: И тој е изборен. Додава нов лист по одреден лист.

Број: Тоа е исто така изборен параметар. Го означува бројот на листови што треба да се додадат.

Тип: Исто така е опционален. Го одредува типот на листот. Овде, стандардната вредност е xlРаботен лист .

6 различни начини за додавање лист со име во Excel VBA

Во Excel, можеме да додадеме нов лист со додавање ⊕ икона веднаш покрај името на листот. Дали некогаш сте помислиле да ја автоматизирате истата задача во Excel? Не размислувајте повеќе, бидејќи VBA покривте.

Овде имаме работен лист со име Извештај за продажба . Содржи Дневни продажбиИзвештај на одредена кафетерија. Во колоните B , C и D , има имиња на Претставници на продажба , Теми и Количина соодветно.

Овде, ќе додадеме други листови во оваа работна книга со помош на VBA макро .

Овде, користевме Microsoft Excel 365 верзија, можете да користите која било друга верзија според вашата погодност.

1. Додавање лист со име во Excel VBA

Во нашиот прв метод, ќе додадеме лист со името од корисничкиот влез . Ако сте љубопитни да научите, следете ги овие едноставни чекори.

📌 Чекори:

  • На самиот почеток, одете на Картичката Програмер .
  • Второ, изберете Visual Basic во групата Code .
  • Алтернативно, притиснете ALT + F11 за да ја извршите истата задача.

Забелешка: Бидете сигурни да притиснете копчето ALT лево од ПРАЗНАТА . Операцијата нема да се изврши ако користите други клучеви ALT .

  • Веднаш се отвора прозорецот Microsoft Visual Basic за апликации .
  • Подоцна, преместете се во јазичето Вметни .
  • Потоа, изберете Модул од опциите.

  • Во моментов, го отвора кодот Модул .
  • Потоа, напишете го следниот код во Модулот . 
1821

Разложување на кодот

  • Прво, ја нарекуваме Sub-постапката како Додај_лист_со_име .
  • Потоа, ги дефинираме типовите на променливи.
  • Подоцна, ја додадовме изјавата На грешка Продолжи следно . Ова ќе ги игнорира сите грешки.
  • Потоа, користевме InputBox за да го добиеме името на листот од корисникот. Исто така, ја зачувавме текстуалната низа од InputBox во променливата sheet_name .
  • Следно, ако sheet_name е празна, тогаш кодот нема да продолжи.
  • Конечно, го користиме методот Add.Name за да го именуваме новосоздадениот лист. Овде, името ќе биде исто како и променливата sheet_name .

  • Во овој момент, притиснете го копчето Run (⏵) икона. Наместо тоа, можете да притиснете F5 на вашата тастатура.

  • Одеднаш се отвора поле за внесување.
  • Тука, внесете го името на новиот лист. Во овој случај, напишавме Профит во полето.
  • Подоцна, кликнете OK .

  • Значи, нашиот код ќе се изврши и ќе додаде лист со име Профит .

Забелешка: Не споменавме место за нашиот лист. Стандардно, тој е поставен пред активниот лист.

Прочитај повеќе: Excel VBA за додавање лист во друга работна книга (3 практични примери)

2. Примена на Excel VBA за додавање лист со име пред специфичен лист

Во нашиот втор метод, ќе додадеме лист со името пред одреден лист. Ајде да го истражиме процесот чекор по чекорчекор.

📌 Чекори:

  • Прво, отворете го прозорецот Module како што е прикажано во Метод 1 .
  • Второ, напишете го следниов код во него. 
5166

Разложување на кодот

  • Прво, ја нарекуваме процедурата Sub како Add_Sheet_Before_Specific_Sheet .
  • Потоа, го активираме листот Извештај за продажба . Ова ќе осигура дека кодот ќе работи ако сме на друг лист.
  • Следно, го користиме методот Додај.Име за да го именуваме новосоздадениот лист. Овој лист ќе се креира пред листот наречен Профит од работната книга. Покрај тоа, го именувавме листот како Биланс на состојба .

  • Потоа, извршете ја шифрата како што е прикажано во Метод 1 .
  • Така, ќе додаде нова состојба Биланс на состојба пред листот со име профит .

Прочитај повеќе: Excel VBA за додавање лист со име на променлива (5 идеални примери)

3. Користење на Excel VBA за додавање лист со Name After Specific Sheet

Во овој метод, ќе додадеме лист по листот со име Profit . Ајде да го видиме процесот во детали.

📌 Чекори:

  • Најпрво, изнесете го кодот Модул прозорец како што е прикажано во Метод 1 .
  • Потоа, напишете го следниот код во него. 
2019

Овој код е речиси сличен на кодот на Метод 2 . Само, овде го користевме параметарот По отколку Претходно . Затоа што сакаме да го додадеме новиот лист следејќи го одреден лист.

  • Потоа, извршете го кодот како што е прикажано во Метод 1 .
  • Така, ќе додаде нов лист Складиште по листот со име Профит .

Прочитајте повеќе: Excel VBA за додавање лист ако не постои (со брзи чекори)

4. Вметнување лист со име на почетокот на работната книга

Во овој дел, ќе вметнеме нов лист на почетокот на работната книга во Excel користејќи VBA . Значи, без понатамошно одложување, да видиме како ќе го направиме тоа.

📌 Чекори:

  • Иницијално, изнесете го кодот <Прозорец 1>Module како што е прикажано во Метод 1 .
  • Потоа, напишете го следниот код во него. 
5099

Овде, додаваме новиот работен лист пред првиот лист од работната книга. Тоа значи дека на почетокот на работната книга. Како резултат на тоа, сега е првиот лист. Исто така, го нарековме листот Профил на компанијата .

  • Потоа, извршете го кодот како што е прикажано во Метод 1 .
  • Оттука, ќе додаде нов лист Профил на компанијата на почетокот на работната книга.

Прочитај повеќе: Excel Macro: Креирај нов лист и преименувај (3 идеални примери)

5. Користење на Excel VBA за додавање лист на крајот од работната книга

Во овој дел, ќе додадеме лист по последниот лист од работната книга . Дозволете ми да го покажам процесотподолу.

📌 Чекори:

  • Првенствено, отворете го кодот Модул прозорецот како што е прикажано во Метод 1 .
  • Второ, залепете го следниов код во него. 
4344

Разложување на кодот

  • Прво, ја повикуваме постапката Sub како Sheet_End_Workbook.
  • Следно, го користиме методот Add.Name за да го именуваме новосоздадениот лист. Овој лист ќе го креираме по последниот лист од работната книга. Можеме да го добиеме последниот број на листот од својството Sheets.Count . Покрај тоа, го именувавме листот Извештај за успех .

  • Потоа, извршете ја шифрата како што е прикажано во Метод 1 .
  • Оттука, ќе додаде нов лист Извештај за успех на крајот од работната книга.

Прочитајте повеќе: Креирајте нова работна книга и зачувајте користејќи VBA во Excel

6. Воведување на повеќе листови со користење вредност на ќелијата од Excel VBA

За последниот метод, ќе додадеме повеќе листови во работната книга со име од опсег на ќелии користејќи Excel VBA . Покрај тоа, ќе побараме од корисникот да внесе опсег за да го земе името. Значи, ајде да ги погледнеме чекорите подолу.

📌 Чекори:

  • На почетокот, отворете го кодот Module прозорец како што е прикажано во Метод 1 .
  • Потоа, копирајте го следниот код и залепете го во него. 
2383

Поделба на кодот

  • Прво, го повикуваме подпроцедура како Add_Multiple_Seets_Using_Cell_Value.
  • Потоа, ги дефинираме типовите на променливи.
  • Потоа, користиме InputBox за да го добиеме опсегот на податоци од корисникот.
  • Четврто, го активираме листот Извештај за продажба .
  • Подоцна, користиме јамка За секое следно за да поминеме низ избраниот опсег на ќелии еден по еден.
  • Следно, го користиме методот Add.Name за да го именуваме новосоздадениот лист. Ќе ги креираме овие листови по активниот лист Извештај за продажба од работната книга.

  • Сега, извршете го кодот како што е прикажано на Метод 1 .
  • Веднаш, се отвора влезното поле Exceldemy .
  • Потоа, дајте ги ќелиите во B5:B9 опсег во полето.
  • На крај, кликнете OK .

  • Конечно, ќе вметне пет листови именувани по вредностите на ќелиите во опсегот B5:B9 . Сите тие се по листот Извештај за продажба .

Заклучок

Овој напис дава лесни и кратки решенија за додавање листови со имиња од Excel VBA . Не заборавајте да ја преземете датотеката Вежба . Ви благодариме што ја прочитавте оваа статија, се надеваме дека ова беше корисно. Ве молиме известете не во делот за коментари доколку имате какви било прашања или предлози. Ве молиме посетете ја нашата веб-локација Exceldemy за да истражите повеќе.

Претходен пост VBA за криење на редови во Excel (14 методи)
Следен пост Како да го поставите листот Excel на една страница во Word (3 едноставни начини)

Хју Вест е високо искусен тренер и аналитичар на Excel со повеќе од 10 години искуство во индустријата. Има диплома за сметководство и финансии и магистер по бизнис администрација. Хју има страст за предавање и има развиено уникатен пристап на наставата кој е лесен за следење и разбирање. Неговото стручно познавање на Excel им помогна на илјадници студенти и професионалци ширум светот да ги подобрат своите вештини и да се истакнат во нивните кариери. Преку својот блог, Хју го споделува своето знаење со светот, нудејќи бесплатни упатства за Excel и онлајн обука за да им помогне на поединците и бизнисите да го достигнат својот целосен потенцијал.