В этом руководстве будут продемонстрированы различные методы создания новой книги с использованием VBA.
Создать новую книгу
Чтобы создать новую книгу, просто используйте Рабочие тетради. Добавить:
| 1 | Рабочие тетради. Добавить |
Недавно добавленная рабочая книга теперь ActiveWorkbook.
Вы можете увидеть это с помощью этого кода:
| 123456 | Sub AddWB ()Рабочие тетради. ДобавитьMsgBox ActiveWorkbook.NameКонец подписки |
Создать новую книгу и назначить объекту
Вы можете использовать объект ActiveWorkbook для ссылки на новую книгу. Используя это, вы можете назначить новую книгу объектной переменной:
| 1234 | Dim wb as WorkbookРабочие тетради. ДобавитьУстановить wb = ActiveWorkbook |
Но лучше / проще сразу назначить рабочую книгу переменной при ее создании:
| 123 | Dim wb As WorkbookУстановите wb = Workbooks.Add. |
Теперь вы можете ссылаться на новую книгу по имени переменной.
| 1 | MsgBox wb.Name |
Создать новую книгу и сохранить
Вы также можете создать новую рабочую книгу и сразу сохранить ее:
| 1 | Workbooks.Add.SaveAs Filename: = "NewWB" |
Это сохранит книгу в виде файла .xlsx в папке по умолчанию (например, Мои документы). Вместо этого вы можете настроить SaveAs с помощью нашего руководства по сохранению книг.
Теперь вы можете ссылаться на Рабочую книгу по ее имени:
| 1 | Книги («NewWB.xlsx»). Активировать |
Этот код активирует «NewWB.xlsx».
Создать новую книгу и добавить таблицы
После создания книги вы можете ее редактировать. Вот только один пример добавления двух листов в новую рабочую книгу (при условии, что это ActiveWorkbook):
| 1 | ActiveWorkbook.Worksheets.Add Count: = 2 |
