Excel VBA: захаванне і закрыццё працоўнай кнігі (5 прыдатных прыкладаў)

Hugh West

03-10-2023 Макрасы & Excel VBA
  • Падзяліцца Гэтым
Hugh West

У гэтым артыкуле мы пакажам вам 5 метадаў выкарыстання Excel VBA для захавання і закрыцця рабочай кнігі . Паколькі час вельмі каштоўны, мы можам зэканоміць шмат часу, прапусціўшы паўсядзённыя задачы з дапамогай Excel VBA . Акрамя таго, мы ўзялі набор даных, які складаецца з 3 слупкоў : « Імя », « Нарадзіўся » і « Апошняя праца ». Гэты набор даных прадстаўляе 6 год нараджэння людзей і інфармацыю аб іх апошніх фільмах.

Спампаваць сшытак для практыкаванняў

VBA для захавання і закрыцця Workbook.xlsm

5 прыкладаў захавання і закрыцця працоўнай кнігі з дапамогай VBA ў Excel

1. Захавайце і закрыйце актыўную працоўную кнігу з дапамогай Excel VBA

Для першага метаду мы захаваем і закрыем Актыўную працоўную кнігу з дапамогай Макраса VBA . Мы адкрыем акно VBA Module , увядзем наш код, а затым выканаем код для дасягнення нашай мэты. Без лішніх слоў, давайце пяройдзем да працэдуры крок за крокам.

Этапы:

Перш чым уводзіць наш код, нам трэба выклікаць модуль VBA . Каб зрабіць гэта –

  • Спачатку з укладкі Распрацоўшчык >>> абярыце Visual Basic .

Або вы можаце націснуць ALT + F11 , каб зрабіць гэта таксама. Пасля гэтага з'явіцца « Microsoft Visual Basic для прыкладання ».

  • Па-другое, з Уставіць >>> выберыце Модуль .

Тут мы набярэм нашкод.

  • Па-трэцяе, увядзіце наступны код у Модулі . 
7543

Разбіўка кода VBA

  • Спачатку мы выклікаем нашу падпрацэдуру Save_and_Close_Active_Workbook .
  • Тады мы спасылаемся на наш бягучы Workbook як на ActiveWorkbook .
  • Пасля гэтага, выкарыстоўваючы метад Close мы закрываем наш файл.
  • Нарэшце, мы ўсталявалі SaveChanges у True , што захавае нашу Працоўную кнігу пры закрыцці .

Цяпер мы выканаем наш код.

  • Спачатку захавайце гэты модуль .
  • Па-другое, пстрыкніце ўнутры нашага кода.
  • Нарэшце, націсніце кнопку Выканаць .

Калі мы пяройдзем да прыкладання Excel , мы ўбачым, што наша Рабочая кніга зачынена. Такім чынам, мы паспяхова захавалі і закрылі Працоўную кнігу з дапамогай Excel VBA .

Дадатковая інфармацыя: Як захаваць макрас для ўсіх працоўных кніг у Excel (з простымі крокамі)

2. Excel VBA для захавання і закрыцця пэўнай працоўнай кнігі

Для другога спосабу мы будзем выкарыстоўваць захаваць і закрыць пэўную Працоўную кнігу выкарыстоўваючы іншы код VBA . Тут мы адкрылі два Рабочыя сшыткі і мы захаваем і закрыем першы Працоўны сшытак з левага боку.

Крокі:

  • Спачатку, як паказана ў метадзе 1 , адкрыйце VBAМодуль .
  • Па-другое, увядзіце гэты код у гэты модуль . 
9478

Разбіўка кода VBA

  • Спачатку мы выклікаем нашу падпрацэдуру Save_and_Close_Specific_Workbook .
  • Затым мы спасылаюцца на наш першы Workbook унутры аб'екта Workbooks .
  • Пасля гэтага, выкарыстоўваючы метад Close мы закрываем наш файл.
  • Нарэшце, мы ўсталявалі SaveChanges у True , што захавае нашу Працоўную кнігу пры закрыцці .
  • Па-трэцяе, як паказана ў метадзе 1 , выканайце код.

Пасля гэтага мы ўбачым, што першы Рабочы сшытак закрыты і толькі другі Працоўны сшытак адкрыты . Такім чынам, мы паказалі вам яшчэ адзін метад захавання і закрыцця Працоўнай кнігі .

Дадатковая інфармацыя: Excel VBA: захаванне аркуша як новай працоўнай кнігі без адкрыцця

3. Захавайце і зачыніце пэўную працоўную кнігу ў пэўнай тэчцы

Для трэцяга метаду , мы збіраемся захаваць і закрыць канкрэтную працоўную кнігу ў папцы з дапамогай Excel VBA .

Крокі:

  • Спачатку, як паказана ў метадзе 1 , адкрыйце модуль VBA .
  • Па-другое, увядзіце гэты код у гэты модуль . 
8117

Разбор кода VBA

  • Па-першае, мы тэлефануем нашаму SubПрацэдура Save_and_Close_Workbook_in_Specific_Folder .
  • Пасля гэтага, выкарыстоўваючы метад SaveAs мы захоўваем наш файл у пэўным месцы.
  • Затым мы захоўваем імя файла такім жа, як у арыгінальнай Рабочай кнігі .
  • Нарэшце, мы закрываем наш Працоўны сшытак .
  • Па-трэцяе, як паказана ў метадзе 1 , выканайце код.

Пасля гэтага ён захавае наш Рабочы сшытак унутры вызначанага месца папкі і зачыніце яго. Такім чынам, мы паказалі вам іншы метад захавання і закрыцця працоўнай кнігі ў спецыяльнай тэчцы з дапамогай VBA .

Дадатковая інфармацыя: Макрас Excel VBA для захавання PDF у пэўнай тэчцы (7 ідэальных прыкладаў)

Падобныя паказанні

  • Excel VBA: захавайце працоўную кнігу без падказкі (з простымі крокамі)
  • [Выпраўлена!] Чаму Excel не захоўвае маё фарматаванне ? (7 магчымых прычын)
  • Як захаваць Excel у альбомным фармаце PDF (з хуткімі крокамі)
  • Excel VBA для захавання ў выглядзе файла, выкарыстоўваючы шлях ад Ячэйка (з хуткімі крокамі)
  • [Выпраўлена!] Файл CSV Excel не захоўвае змены (6 магчымых рашэнняў)

4. Устаўка кнопкі ў Захаванне і закрыццё рабочай кнігі ў Excel

Для чацвёртага метаду мы збіраемся стварыць кнопку VBA , каб закрыць і захаваць працоўную кнігу ў Excel.

Этапы:

  • Спачатку, як паказана ў метадзе 1 , адкрыйце VBAМодуль .
  • Па-другое, увядзіце гэты код у гэты модуль . 
7334

Разбіўка кода VBA

  • Спачатку мы выклікаем нашу падпрацэдуру Button_Click_Save_and_Close_Workbook .
  • Пасля гэтага, выкарыстоўваючы метад Захаваць , мы захоўваем наш працоўны сшытак
  • Нарэшце, мы закрываем наш Працоўны сшытак з дапамогай Выйдзіце з метаду .

Цяпер мы ўставім сюды кнопку VBA .

  • Спачатку з Распрацоўшчыка укладка >>> Уставіць >>> абярыце Кнопку (Кіраванне формай) .

  • Затым курсор мышы зменіцца і перацягне поле ўнутры Працоўнай кнігі .

Пасля гэтага з'явіцца дыялогавае акно Прызначыць макрас .

  • Затым выберыце “ Button_Click_Save_and_Close_Workbook ”.
  • Пасля гэтага націсніце ОК .

Потым мы ўбачым Кнопку 1 у Працоўнай кніжцы .

  • Нарэшце, націсніце на кнопку.

Гэта захавае і закрые наш Працоўны сшытак .

Чытаць далей: Код VBA для кнопкі захавання ў Excel (4 варыянты)

5. Захавайце і зачыніце ўсе адкрытыя працоўныя кнігі, ужываючы Excel VBA

У гэтым апошнім метадзе мы збіраюся захаваць і зачыніць усе адкрытыя Рабочыя кнігі . На гэты раз у нас ёсць тыя самыя Рабочыя сшыткі , што і ў метадзе 3 , аднак на гэты раз мы захаваем і закрыем абодва Рабочыя сшыткі . Тут мы будзем выкарыстоўваць Наступны цыкл для прагляду нашых Рабочых сшыткаў .

Крокі:

  • Па-першае, як паказана ў метадзе 1 , адкрыйце модуль VBA .
  • Па-другое, увядзіце гэты код унутр гэтага Модуль . 
2713

Разбіўка кода VBA

  • Першы , мы выклікаем нашу падпрацэдуру CloseAndSaveOpenWorkbooks .
  • Затым мы выкарыстоўваем For Next Loop для цыклічнага пераходу па ўсіх працоўных сшытках .
  • Пасля гэтага, выкарыстоўваючы метад Захаваць , мы захоўваем нашы файлы.
  • Потым мы закрываем усе Працоўныя сшыткі , акрамя нашага бягучага Працоўнага сшытка .
  • Нарэшце, мы закрылі арыгінальны Працоўны сшытак з дапамогай Выйдзіце з уласцівасці .
  • Па-трэцяе, як паказана ў метадзе 1 , выканайце код.

Такім чынам, ён захавае і закрые дзве Працоўныя кнігі . Мы бачым, што дата змены аднолькавая для дзвюх Працоўных сшыткаў . У заключэнне мы паказалі 5 розных макрасаў Excel VBA для захавання і закрыцця рабочай кнігі .

Дадатковая інфармацыя: Як захаваць макрас у асабістую кнігу макрасаў?

Выснова

Мы паказалі вам 5 хуткі і лёгкі для разумення Excel VBA для захавання і закрыцця рабочай кнігі . Калі ў вас узнікнуць праблемы, не саромейцеся каментаваць ніжэй. Акрамя таго, вы можаце наведаць наш сайт Exceldemy для большай колькасці звязаных з Excel артыкулаў. Дзякуй за прачытанне, працягвайце выдатныя вынікі!

Папярэдняя публікацыя Як аб'яднаць два радкі ў Excel (4 простых спосабу)
Наступны пост Як аўтаматычна абнавіць табліцу Excel (3 прыдатныя метады)

Х'ю Уэст з'яўляецца вельмі дасведчаным трэнерам і аналітыкам Excel з больш чым 10-гадовым вопытам работы ў галіны. Ён мае ступень бакалаўра ў галіне бухгалтарскага ўліку і фінансаў і ступень магістра дзелавога адміністравання. Х'ю захапляецца навучаннем і распрацаваў унікальны падыход да навучання, які лёгка прытрымлівацца і зразумець. Яго экспертныя веды Excel дапамаглі тысячам студэнтаў і спецыялістаў па ўсім свеце палепшыць свае навыкі і атрымаць поспех у сваёй кар'еры. Праз свой блог Х'ю дзеліцца сваімі ведамі з усім светам, прапаноўваючы бясплатныя падручнікі па Excel і онлайн-трэнінгі, каб дапамагчы прыватным асобам і прадпрыемствам цалкам раскрыць свой патэнцыял.