Excel VBA Workbook

Excel файлът се нарича Workbook и всяка работна книга има листове или страници, които се наричат ​​работни листове. Работните листове са областта, в която пишем и създаваме таблица с данни. И Workbook съдържа N брой такива работни листове, които могат да имат различни данни. Във VBA можем да използваме функцията Workbook, без дори да правим нещо в работната книга excel. Ние можем да получим достъп до тези функции в Excel във VBA с командния ред „ Приложение . Работни книжки ”.

Използването на знак за равенство ("=") в excel активира всички функции за вмъкване в excel. И с помощта на „ WorksheetFunction с точка (.) “ Се активира и позволява функциите на excel да се използват, както е показано по-долу.

Как да използвате обект Workbook в Excel VBA?

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

Можете да изтеглите този шаблон на VBA Workbook Excel тук - Шаблон VBA Workbook Excel

VBA Workbook - Пример №1

В този пример ще видим как да отворим работна книга с помощта на обект VBA Workbook.

За това следвайте стъпките по-долу:

Стъпка 1: Отидете до прозореца на VBA и отворете нов модул с помощта на списъка Вмъкване на списък с менюта, както е показано по-долу.

С щракване върху опцията Модул в менюто Вмъкване ще получим Модул, в който ще напишем кода.

Стъпка 2: Сега започнете да пишете подкатегория на функцията VBA Workbook с всяко име, което искате или по-добре запазете името на функцията в същото име, както се изпълнява, както е показано по-долу.

Код:

 Sub VBAWorkbook1 () Край Sub 

Стъпка 3: Сега използвайте функцията WorkBooks в кода. Това ще позволи да се използва всяка работна книга. И за да я отворите, използвайте командата Open след поставянето на точка (.), Както е показано по-долу.

Самата функция Open има толкова много опции и начини за отваряне на всяка работна книга, както е показано в по-долу синтаксиса.

Сега, за да отворим всяка работна книга, се нуждаем от местоположението на този файл. Тук вече сме запазили работна книга на excel от името на „ Тест файл “ някъде в локално устройство, което е достъпно.

Стъпка 4: Според синтаксиса, който е показан по-горе, имаме нужда от име на файл като String, което означава символи. Така че ние копирахме и залепихме местоположение отдолу в обърнати запетаи. Тук можем да поставим всяко местоположение или адрес на файла, където сме го запазили.

Код:

 Sub VBAWorkbook1 () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub 

Стъпка 5: Сега искаме да покажем името на файла, който се отваря с помощта на командата Workbook.Open. Ще използваме MsgBox с ActiveWorkbook.Name . Това показваме името на работната книга, което е отворено и активно сега.

Код:

 Sub VBAWorkbook1 () Workbooks.Open Filename: = "D: \ Test File.xlsx" MsgBox (ActiveWorkbook.Name & "Отворен е сега.") End Sub 

Стъпка 6: Сега компилирайте пълния код стъпка по стъпка и го стартирайте, като кликнете върху бутона Възпроизвеждане

Ще видим, че файлът, наречен „ Тест файл “, вече е отворен и получихме изскачащо съобщение, че „Тестовият файл е отворен сега“ .

VBA Workbook - Пример №2

Това е още един пример, в който ще видим как да използваме обекта VBA WorkBook, за да го използваме за всяка работна книга на excel. За това следвайте стъпките по-долу:

Стъпка 1: Започнете да пишете подкатегория в каквото и да е име или за най-добри практики трябва да е в името на изпълняваната функция.

Код:

 Sub VBAWorkbook2 () Край Sub 

Стъпка 2: Следвайте процедурата, която видяхме в пример-1, за да отворите запазен файл „Тест файл“ на всяко място. Винаги се препоръчва да запазите достъпния файл. Тази команда отваряме файла от споменатия адрес.

Код:

 Sub VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub 

Стъпка 3: Сега ще използваме името на файла заедно с функцията Workbook и ще направим или добавим малко текст в него. За това ние избираме листа, където искате да вмъкнете текста, като използвате командата Sheet (1) . Номер 1 вътре в скобата се използва за последователност на листа, а не за името на листа и за избор на диапазона от клетка А1 до А5, както е показано по-долу.

Код:

 Под VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Работни книги ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" End Sub 

Стъпка 4: Сега използвайте същия формат за избор на работната книга. Използвахме „Тестов файл“, така че ние го използваме тук, последван от точка (.) И записваме. Това ще запази файла.

Код:

 Под VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Работни книги ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" Workbooks ("Тест Файл.xlsx "). Запазване на подп 

Стъпка 5: Сега използваме функцията Workbooks с нейното име, последвана от точка (.) И Close, за да затворим избраната работна книга, както е показано по-долу.

Код:

 Под VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" Workbooks ("Тест File.xlsx "). Запазване на работни книги (" Test File.xlsx "). Затворете End Sub 

Стъпка 6: Сега компилирайте кода и го стартирайте. Виждаме текстът, който използвахме в код „Тест“, сега се копира във цялата клетка от А1 до А5.

И ще получим предупредително съобщение, както е показано по-долу.

Кликнете върху бутона Ok, който ще запази файла и ще го затвори.

VBA Workbook - Пример №3

Нека видим още един пример, в който ще използваме обект VBA Workbook. В този пример ще видим как да защитим Работна книга с помощта на парола. Това е доста полезно, когато имаме важни данни в лист или работна книга и трябва да ги защитаваме както винаги, когато изпълняваме пълния код. Така че защитата на работната книга след работа се превръща в нужда, за да не загубите данни.

За това следвайте стъпките по-долу:

Стъпка 1: В модул започнете да пишете подкатегория в името на използваната функция, както е показано по-долу.

Код:

 Sub VBAWorkbook3 () Край Sub 

Стъпка 2: Сега използвайте командата ActiveWorkbook, за да изберете текущо отворена работна книга, последвана от точка (.), И търсете и изберете командата Защита от списъка, както е показано по-долу.

Стъпка 3: След като изберете командата Защита, ще видим синтаксиса, който ще се използва за разрешаване на защитата в работната книга, както е показано по-долу.

Код:

 Sub VBAWorkbook3 () ActiveWorkbook.Protect End Sub 

Стъпка 4: Сега изберете паролата от синтаксиса и изберете парола, а за структура и прозорец я разрешете като ИСТИНСКА.

Код:

 Под VBAWorkbook3 () ActiveWorkbook.Protect Password: = "TestPassword", Структура: = True, Windows: = True End Sub 

Стъпка 5: Сега го компилирайте и стартирайте след него. Ще видим, че текущата ни работна книга ще се заключи, което може да се види в менюто Преглед в опцията Защита на работната книга, както е показано по-долу. За да го отключите, щракнете върху опцията Защита на работната книга .

Стъпка 5: И въведете паролата „ TestPassword “, която сме избрали в нашия код, и щракнете върху OK .

Сегашният ни лист отново се отключва.

Плюсове на работната книга на Excel VBA

  • VBA Workbook ни позволява да работим в Workbook, без да правим нищо в листа.
  • Можем да изпълняваме всякакви задачи с помощта на обект VBA Workbook, за това просто трябва да изберем или активираме листа чрез код.

Неща, които трябва да запомните

  • Винаги не забравяйте да компилирате целия код или ред по ред, за да избегнете грешка.
  • Файлът с огромни данни и множество редове код, винаги използвайте Close VBA Workbook, за да не загубите данни.
  • За хората, които са начинаещи във VBA Coding, се препоръчва да не използват сложна кодираща структура. Вместо да се опитвате с малки набори от код и да прилагате неговите сценарии за работа в реалния живот.

Препоръчителни статии

Това е ръководство за работната книга на VBA. Тук обсъждаме как да използваме обект Workbook в Excel VBA, заедно с някои практически примери и изтеглящ се шаблон на excel. Можете да разгледате и другите ни предложени статии -

  1. Ръководство за VBA обект
  2. Защитете Excel Workbook
  3. VBA обхватни клетки
  4. Споделете Excel Workbook

Категория: