Что такое открытая книга в excel

Создание и открытие рабочих книг Excel

​Смотрите также​ пустой модуль (меню​ тоже и –​ Откроем еще раз​введите вот такую​ выделения листов можно​ на них.​ щелкнуть​ на основе шаблона​.​Чтобы создать книгу на​Шаблон Excel​Типы файлов книг​расположение личных шаблонов по​ командой сайта office-guru.ru​Открыть​

​, а затем​​Прежде чем начать работу​​Insert — Module​ как следствие –​Диспетчер имен​ формулу:​ использовать клавиши​Далее:​я принимаю​ недавно использовавшихся, нажмите​В поле​ установленного шаблона, щелкните​

Создание новой пустой книги

1. ​или​​дважды щелкните пункт​​ умолчанию​
2. ​Источник: http://www.gcflearnfree.org/office2013/excel2013/5/full​​и выберите​​Обзор​​ с Microsoft Excel​​) и скопируйте туда​
3. ​ имена листов будут​

Открытие существующей книги Excel

​с вкладки​=ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1)​Shift​   Сохранение книги в​и примите лицензионное​ кнопку​Имя файла​ элемент образцы шаблонов,​

1. ​Шаблон Excel с поддержкой​Шаблон​​.​​Автор/переводчик: Антон Андронов​
2. ​Компьютер​​. Кроме этого Вы​​ Вы обязаны создать​​ текст этого макроса:​​ обновляться постоянно.​Формулы (Formulas — Name​=GET.WORKBOOK(1)​и/или​
3. ​ OneDrive​​ соглашение для шаблонов​​пустые и последние​введите имя шаблона.​ а затем дважды​​ макросов​​.​

​Выберите​Автор: Антон Андронов​. Найдите папку, которую​ можете открыть файлы,​​ новый документ, либо​​Sub SheetList() Dim​Для скрытия ошибок​

Закрепление книги в Excel

​ Manager)​Теперь в переменной​Ctrl​Если в вашей рабочей​ сообщества условия использования​и в разделе​

1. ​В поле​ щелкните шаблон, который​​, если в книге​​В поле​Файл​
2. ​Примечание:​ требуется закрепить, и​ хранящиеся в службе​ открыть уже существующий.​ sheet As Worksheet​#ССЫЛКА (#REF)​, двойным щелчком откроем​
3. ​Оглавление​) и в любую​ книге Excel число​ перед загрузкой этого​Недавно использовать шаблоны​

​Тип файла​ вы хотите использовать.​ есть макросы, которые​Имя файла​>​Мы стараемся как​ нажмите на значок​ OneDrive (ранее SkyDrive).​​ Вы можете создать​​ Dim cell As​​, которые будут появляться,​​ созданный диапазон​содержатся наши искомые​ подходящую ячейку вводим​ листов перевалило за​

Использование шаблонов в Excel

​ шаблона.​, дважды щелкните шаблон,​выберите пункт​Чтобы создать книгу на​ должны быть доступны​введите имя шаблона.​Параметры​ можно оперативнее обеспечивать​ канцелярской кнопки.​Появится диалоговое окно​

Как создать новую книгу на основе шаблона

1. ​ пустую книгу или​​ Range With ActiveWorkbook​​ если скопировать нашу​Оглавление​
2. ​ имена. Чтобы извлечь​​ функцию следующего вида:​​ второй десяток, то​​Excel легко справляется с​​ который вы хотите​
3. ​Шаблон Excel​ созданный шаблон, нажмите​
4. ​ в шаблоне.​Нажмите кнопку​.​
5. ​ вас актуальными справочными​​Шаблон – это предварительно​​Открытие документа​ воспользоваться уже готовым​
6. ​ For Each sheet​ формулу с функцией​

​и изменим его​ их оттуда на​=ГИПЕРССЫЛКА(«#Оглавление!A1″;»Назад в оглавление»)​ навигация по листам​ числами. В Excel​

​ использовать.​или​ кнопку​Нажмите кнопку​Сохранить​Нажмите​ материалами на вашем​ созданный документ, служащий​

​. Найдите и выберите​ шаблоном. Помимо этого​
​ In ActiveWorkbook.Worksheets Set​
​ИНДЕКС​

​ формулу:​

office-guru.ru

Сохранение книги в виде шаблона

​ лист, можно воспользоваться​​Эта функция создаст в​ начинает становится проблемой.​ можно упростить ввод​Чтобы создать книгу на​Шаблон Excel с поддержкой​Мои шаблоны​Сохранить​, а затем закройте​Сохранение​ языке. Эта страница​ для ускорения работы.​ нужный файл, а​ в рамках данного​ cell = Worksheets(1).Cells(sheet.Index,​на большее количество​=ЗАМЕНИТЬ(ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1);1;НАЙТИ(«]»;ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1));»»)​ функцией​ текущей ячейке на​ Одним из красивых​ данных с помощью​ установленного шаблона, нажмите​

​ макросов​и на вкладке​.​ шаблон.​, а затем в​ переведена автоматически, поэтому​ Шаблоны содержат готовые​ затем нажмите​ урока мы рассмотрим,​ 1) .Worksheets(1).Hyperlinks.Add anchor:=cell,​ ячеек, чем у​

​=SUBST(GET.WORKBOOK(1);1;FIND(«]»;GET.WORKBOOK(1));»»)​ИНДЕКС (INDEX)​ всех выделенных листах​ способов ее решения​ функции автозаполнения. Затем​ кнопку​, если в книге​Личных шаблонов​

​Шаблон автоматически будет помещен​С помощью шаблона был​ разделе​

Сохранение книги в виде шаблона

1. ​ ее текст может​ настройки, такие как​Открыть​​ как закрепить файлы​ Address:=»», SubAddress:=»‘» &​​ нас есть листов,​

   1. ​Теперь наш список листов​​, которая «выдергивает» элементы​​ гиперссылку с текстом​​ является создание листа-оглавления​​ на основе этих​

   2. ​Установленные шаблоны​​ есть макросы, которые​​дважды щелкните шаблон,​ в папку шаблонов,​​ создан выше, можно​​Сохранение книг​ содержать неточности и​ форматирование и дизайн,​​.​ и папки в​​ sheet.Name & «‘»​

      ​ можно использовать функцию​ будет выглядеть существенно​

      

   3. ​ из массива по​​ «Назад в оглавление»,​​ с гиперссылками, ведущими​

      ​ данных можно получить​и дважды щелкните​ должны быть доступны​ который вы хотите​ чтобы убедиться, что​​ создать новую книгу.​​укажите путь к​​ грамматические ошибки. Для​​ с целью экономии​​Если Вы открывали данный​​ представлении Backstage для​​ & «!A1» cell.Formula​​ЕСЛИОШИБКА (IFERROR)​

2. ​ лучше:​ их номеру:​ щелчок по которой​

3. ​ на соответствующие листы​​ рекомендации и одним​​ шаблон, который вы​​ в шаблоне.​​ использовать.​

4. ​ он будет доступен​​ В этом разделе​​ месту расположения личных​​ нас важно, чтобы​​ времени и сил​

5. ​ документ недавно, то​​ быстрого доступа к​​ = sheet.Name Next​​, которая  перехватывает любые​​Небольшая побочная трудность заключается​

6. ​=ИНДЕКС(Оглавление; СТРОКА())​​ будет возвращать пользователя​​ книги:​

7. ​ щелчком создать диаграммы.​​ хотите использовать в​​Нажмите кнопку​Чтобы создать книгу на​

Создание книги на основе шаблона

​ при необходимости использовать​ описано, как это​ шаблонов в поле​ эта статья была​ при создании нового​ удобнее будет найти​

​ ним.​​ End With End​ ошибки и заменяет​ в том, что​=INDEX(Оглавление; ROW())​ к листу​Есть несколько способов реализовать​ Кроме того, с​

1. ​ разделе​​Сохранить​​ другую книгу, нажмите​​ его для создания​​ можно сделать.​

2. ​Расположение личных шаблонов по​​ вам полезна. Просим​​ проекта.​

   

3. ​ его в списке​Файлы Microsoft Excel называются​

   ​ Sub​ их на пустую​ наша формула в​

Сохранение книги в виде шаблона

1. ​Функция​Оглавление​ подобное.​

2. ​ помощью гистограмм, цветовой​​Установленные шаблоны​​.​​новые из существующих​

3. ​ новой книги.​​Примечание:​​ умолчанию​

4. ​ вас уделить пару​​Откройте вкладку​​Последние книги​​книги​​Закройте редактор Visual Basic​​ строку («»):​ именованном диапазоне​​СТРОКА (ROW)​.​Вставьте в книгу пустой​ кодировки и значков​

5. ​.​​Шаблон автоматически будет помещен​​и дважды щелкните​

   ​Совет:​ Кроме того можно обзор​.​ секунд и сообщить,​Файл​, чем искать на​. Начиная новый проект​

​ и вернитесь в​​И, наконец, для добавления​Оглавление​выдает номер текущей​Это хоть и слегка​ лист и добавьте​ можно с легкостью​Чтобы создать книгу на​ в папку шаблонов,​ книгу, в которую​ Книга Excel можно копировать​ различных шаблонов в​Обычно этот путь является:​ помогла ли она​, чтобы перейти к​ компьютере.​

Чтобы создать новую книгу с помощью шаблона

1. ​ в Excel, необходимо​​ Excel. Добавьте в​​ к именам листов​​будет пересчитываться только​​ строки и, в​

2. ​ экзотический, но весьма​​ на него гиперссылки​​ выявить тенденции и​ созданный шаблон, нажмите​

   • ​ чтобы убедиться, что​ вы хотите использовать.​ в папку шаблонов,​ сети в Excel​​ C:Users[UserName]DocumentsCustom шаблонов Office.​​ вам, с помощью​ представлению Backstage.​Если Вы часто работаете​

   • ​ создать новую книгу.​ книгу чистый лист​ «живых» гиперссылок для​ при вводе, либо​ данном случае, нужна​ красивый и удобный​

   • ​ на нужные вам​ закономерности.​ кнопку​​ он будет доступен​​Совет:​​ а затем книгу​​ и использовать их​Нажмите кнопку​ кнопок внизу страницы.​

   • ​Нажмите​ с одним и​​ Существует несколько способов​​ и поместите его​ быстрой навигации, можно​ при принудительном пересчете​

​ только для того,​​ способ создания автоматического​ листы, используя команду​Создание книги​Мои шаблоны​ при необходимости использовать​​ Когда вы подключены к​​ как шаблон можно​ вместо него. Загрузка​ОК​ Для удобства также​Создать​ тем же документом,​ начать работу с​ на первое место.​ использовать все ту​ книги нажатием на​​ чтобы вручную не​​ листа оглавления вашей​Вставка — Гиперссылка (Insert​Откройте Excel.​и на вкладке​ его для создания​

Сохранение книги в виде шаблона

1. ​ Интернету, можно также​ использовать без сохранения​ бесплатных готовых шаблоновДополнительные​

2. ​.​​ приводим ссылку на​ ​. Следом за опцией​​ то удобнее будет​​ документом Excel 2013:​

3. ​ Затем нажмите​​ же функцию​​ сочетание клавиш​

4. ​ создавать отдельный столбец​​ книги. Экзотический –​​ — Hyperlink)​​Выберите элемент​​ «​​ новой книги.​ перейти шаблонов, доступных​​ в формате файла​ сведения, см.​Если этот параметр настроен,​ оригинал (на английском​

5. ​Пустая книга​​ закрепить его в​​ создать новую пустую​

   ​Alt+F8​ГИПЕРССЫЛКА (HYPERLINK)​Ctrl+Alt+F9​ с порядковыми номерами​ потому что в​. В открывшемся окне​Пустая книга​

​Мои шаблоны​​Совет:​ с сайта Office.com.​ шаблона (.xltx или​Выберите​ все настраиваемые шаблоны,​ языке) .​расположены несколько шаблонов.​ представлении Backstage.​ книгу, воспользоваться существующим​или откройте меню​, которая будет формировать​. Чтобы обойти этот​ извлекаемых элементов (1,2,3…).​ нем используется недокументированная​ нужно выбрать слева​

Чтобы создать новую книгу с помощью шаблона

1. ​.​​» дважды щелкните​ ​ Книга Excel можно копировать​​ В разделе​​ xltm;). В Windows​

2. ​Файл​​ сохраненные в папке​​Если вы часто используете​Выберите шаблон, чтобы посмотреть​

   • ​Перейдите к представлению Backstage,​ шаблоном или открыть​Сервис — Макрос -​ адрес для перехода​​ неприятный момент, добавим​​ Таким образом, в​​ XLM-функция​​ опцию​Или нажмите клавиши CTRL+N.​ шаблон, который вы​

   • ​ в папку шаблонов,​Шаблоны с сайта Office.Com​ Vista папку шаблонов​​>​​ «Мои шаблоны», автоматически​ один и тот​ его.​ затем нажмите​​ ранее сохраненный документ.​​ Макросы (Tools -​

   • ​ из имени листа:​ к нашей формуле​ ячейке А1 у​​ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ (GET.WORKBOOK)​​Место в документе​Ввод данных​​ хотите использовать.​​ а затем книгу​выберите категорию шаблонов​ обычно является AppDataRoamingMicrosoftTemplates​

   • ​Создать​ отображаются в разделе​​ же макет или​​Откроется предварительный просмотр и​Открыть​Выберите вкладку​

​ Macro — Macros)​​И, наконец, для создания​ небольшой «хвост»:​ нас получится имя​, оставленная разработчиками для​и задать внешнее​​Чтобы ввести данные вручную,​​Чтобы создать книгу на​ как шаблон можно​ и в разделе​ C:Users . В​.​Личные​ данные в книге,​ дополнительная информация об​. Появятся последние открытые​Файл​​. Найдите там созданный​​ оглавления можно использовать​=ЗАМЕНИТЬ(ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1);1;НАЙТИ(«]»;ПОЛУЧИТЬ.РАБОЧУЮ.КНИГУ(1));»»)​ первого листа, в​ совместимости со старыми​ текстовое отображение и​

support.office.com

Создание книги

​ выполните указанные ниже​ другую книгу, нажмите​ использовать без сохранения​ этой категории, дважды​ Microsoft Windows XP​Выберите пункт​на странице​ сохраните их в​ использовании шаблона.​ книги.​. Откроется представление Backstage.​ макрос​ и несложный макрос.​&Т(ТДАТА())=SUBST(GET.WORKBOOK(1);1;FIND(«]»;GET.WORKBOOK(1));»»)&T(NOW())​ А2 – имя​

​ версиями Excel. Эта​

1. ​ адрес ячейки, куда​

2. ​ действия.​​новые из существующих​​ в формате файла​

   ​ щелкните шаблон, который​

​ папку шаблонов обычно​

​Личные​Создать​ виде шаблона, а​

1. ​Нажмите​Наведите указатель мышки на​Выберите​SheetList​

2. ​ Правда, запускать его​Функция ТДАТА (NOW) выдает​ второго и т.д.​

​ функция выгружает список​ приведет ссылка:​Выделите пустую ячейку, например​

1. ​и дважды щелкните​ шаблона (.xltx или​ вы хотите загрузить.​ является C:Documents and​.​

2. ​(​ затем используйте его​Создать​​ книгу, которую необходимо​Создать​

​и запустите его​​ придется каждый раз​ текущую дату (с​

support.office.com

Оглавление книги Excel

​Неплохо. Однако, как можно​ всех листов текущей​Для удобства можно создать​ A1, а затем​ книгу, в которую​ xltm;). В Windows​ Если шаблон, который​ Settings Application DataMicrosoftTemplates.​Дважды щелкните только что​Файл​ для создания других​, чтобы воспользоваться выбранным​

​ закрепить. Рядом с​, затем нажмите​

Видео

Способ 1. Создаваемые вручную гиперссылки

​ на выполнение. Макрос​ при изменении структуры​ временем), а функция​ заметить, функция выдает​ книги в заданную​​ также и обратные​ введите текст или​​ вы хотите использовать.​ Vista папку шаблонов​ вы хотите загрузить​​Выберите​​ созданный шаблон.​>​ книг, а не​ шаблоном.​

​ ней появится значок​Пустая книга​ создаст на первом​ книги — в​ Т превращает эту​ не только имя​ переменную, из которой​ ссылки на всех​ число.​Совет:​ обычно является AppDataRoamingMicrosoftTemplates​ предоставлено участником сообщества​файл​​В приложении Excel будет​​Создать​ начинайте работу с​Откроется новая книга на​ в виде канцелярской​.​ листе книги список​​ отличие от​​ дату в пустую​​ листа, но и​​ мы потом можем​ листах вашей книги,​Чтобы перейти к следующей​

​ Когда вы подключены к​

​ C:Users . В​ Office.com корпорации Майкрософт,​и нажмите кнопку​ создана книга на​).​ нуля.​ основе шаблона.​ кнопки. Нажмите на​​Откроется новая пустая книга.​​ гиперссылок с названиями​

Способ 2. Динамическое оглавление с помощью формул

​Способа 2​ текстовую строку, которая​ имя книги, которое​ их извлечь и​ которые будут вести​ ячейке, нажмите клавишу​ Интернету, можно также​ Microsoft Windows XP​ необходимо щелкнуть​​Создать​​ основе шаблона.​Откройте книгу, которую нужно​Вы можете воспользоваться перечисленными​Шаблон можно подобрать по​ значок.​Помимо создания новой книги,​ листов. Щелчок по​, макрос их сам​ затем приклеивается к​ нам не нужно.​ использовать в нашем​

​ назад в оглавление.​​ ВВОД или TAB.​​ перейти шаблонов, доступных​​ папку шаблонов обычно​я принимаю​​.​Откройте книгу, которую требуется​ использовать в качестве​​ свои шаблоны для​​ категории или воспользоваться​​Книга окажется закрепленной. Для​​ существует необходимость открывать​ любой из них​

​ не отслеживает.​
​ нашему имени листа​

​ Чтобы его убрать,​​ оглавлении.​​ Чтобы не заниматься​Чтобы заполнить ряд данных,​ из Office Online.​ является C:Documents and​и примите лицензионное​​В группе​​ использовать в качестве​ шаблона.​ создания новой книги​

​ строкой поиска, чтобы​
​ того чтобы снять​

​ ранее сохраненные документы.​​ переместит Вас на​​Откройте редактор Visual Basic,​ с помощью оператора​ воспользуемся функциями​Откройте​ ручным созданием гиперссылок​ выполните указанные ниже​ В группе​ Settings Application DataMicrosoftTemplates.​ соглашение для шаблонов​Доступные шаблоны​ шаблона.​Выберите​ или воспользуйтесь одной​ найти более редкий​

​ закрепление, снова нажмите​ Для получения подробной​ нужный лист.​ нажав​ склейки (&). Т.е.​ЗАМЕНИТЬ (SUBST)​Диспетчер Имен​ и копированием их​​ действия.​​Microsoft Office Online,​​Нажмите​​ сообщества условия использования​выполните одно из​Выберите​Файл​ из многих готовых​ шаблон.​ на значок канцелярской​ информации обратитесь с​​Для удобства можно создать​​Alt+F11​​ имя листа, фактически,​и​​на вкладке​ потом на каждый​​Введите начало ряда в​​выберите категорию шаблонов​кнопку Microsoft Office​

​ перед загрузкой этого​
​ следующих действий.​

​файл​ >​ шаблонов, которые можно​

​Не все шаблоны созданы​ кнопки.​ уроку Сохранение и​ также и обратные​​или выбрав (в​​ не меняется, но​НАЙТИ (FIND)​Формулы (Formulas – Name​ лист, лучше использовать​ двух ячейках, например:​​ и в разделе​​и выберите команду​ шаблона.​В качестве основы книги​и нажмите кнопку​

​Экспорт​​ загрузить с Microsoft​

​ компанией Microsoft. Многие​Похожим образом в представлении​ автовосстановление книг в​ ссылки на всех​ старых версиях Excel)​ поскольку функция ТДАТА​, которые найдут символ​ Manager)​ другой метод -​ «Янв» и «Фев»​ этой категории, дважды​Создать​Откройте книгу, которую требуется​ на основе шаблона​Сохранить как.​.​ Office Online.​ созданы сторонними компаниями​ Backstage можно закреплять​ Excel.​ листах вашей книги,​ в меню​ пересчитывается и выдает​ закрывающей квадратной скобки​

​и создайте новый​​ функцию​​ или «2014» и​ щелкните шаблон, который​.​​ использовать в качестве​​ недавно использовавшихся, выберите​В поле​В разделе​Более новые версии​​ и даже частными​​ еще и папки​Перейдите к представлению Backstage,​ которые будут вести​Сервис — Макрос -​

​ новое время и​ ( ] )​ именованный диапазон с​ГИПЕРССЫЛКА (HYPERLINK)​ «2015».​ вы хотите загрузить.​​В группе​​ шаблона.​ пункт​Имя файла​

Способ 3. Макрос

​Экспорт​ Office 2010 Office 2007​ пользователями, поэтому некоторые​ для быстрого доступа​ на вкладку​ назад в оглавление,​ Редактор Visual Basic​ дату при любом​​ и заменят весь​​ именем, допустим,​. Выделяем все листы​

​Выделите две ячейки, содержащие​ Если шаблон, который​​Шаблоны​​Нажмите​Последние шаблоны​введите имя шаблона.​​нажмите кнопку​ ​ ​ шаблоны могут работать​ к ним. Для​​Открыть​ как это было​(Tools — Macro -​​ изменении листа, то​​ текст до этого​Оглавление​

​ в книге, куда​ ряд, а затем​ вы хотите загрузить​выполните одно из​кнопку Microsoft Office​и дважды щелкните​В поле​Изменить тип файла​Если вы впервые сохраняете​ лучше, а некоторые​ этого, находясь в​.​ описано в​ Visual Basic Editor)​

​ и остальная часть​ символа включительно на​. В поле​ хотим добавить обратную​ перетащите маркер заполнения​ предоставлено участником сообществе​ следующих действий:​​, а затем —​​ шаблон, который вы​​Тип файла​.​ книгу в виде​​ хуже других.​ представлении Backstage, перейдите​​Выберите​​Способе 1​. В открывшемся окне​ нашей формулы вынуждена​ пустую строку («»).​Диапазон (Reference)​ ссылку (для массового​через ячейки или​ Microsoft Office, необходимо​В качестве основы книги​

​Сохранить как​ хотите использовать.​выберите пункт​В поле​ шаблона, сначала укажите​Урок подготовлен для Вас​ на вкладку​Компьютер​​.​​ редактора создайте новый​

planetaexcel.ru

​ будет заново пересчитаться​

John Naisbitt

Мы тонем в информации, но жаждем знаний

Эта статья содержит полное руководство по использованию рабочей книги VBA.

Если вы хотите использовать VBA для открытия рабочей книги, тогда откройте «Открыть рабочую книгу»

Если вы хотите использовать VBA для создания новой рабочей книги, перейдите к разделу «Создание новой рабочей книги».

Для всех
других задач VBA Workbook, ознакомьтесь с кратким руководством ниже.

Краткое руководство по книге VBA

В следующей таблице приведено краткое руководство по
основным задачам книги VBA.

Начало работы с книгой VBA

Мы можем получить доступ к любой открытой книге, используя код Workbooks («Пример.xlsm»). Просто замените Пример.xlsm именем книги, которую вы хотите использовать.

В следующем примере показано, как записать в ячейку на листе. Вы заметите, что мы должны были указать рабочую книгу, рабочий лист и диапазон ячеек.

Sub ZapisVYacheikuA1()

'Записывает 100 в ячейку A1 листа "Лист1" в МойVBA.xlsm
Workbooks("МойVBA.xlsm").Worksheets("Лист1").Range("A1") = 100

End Sub

Этот пример может показаться немного запутанным для новичка, но на самом деле он довольно прост.

Первая часть до десятичной запятой представляет собой
рабочую книгу, вторая часть представляет собой рабочую таблицу, а третья —
диапазон. Вот еще несколько примеров записи в ячейку

Sub ZapisiVYacheiku()

' Записывает 100 в ячейку A1 листа "Лист1" в МойVBA.xlsm
Workbooks("МойVBA.xlsm").Worksheets("Лист1").Range("A1") = 100

' Записывает «Иван» в ячейку B1 листа «Лист1» в МойVBA.xlsm
Workbooks("МойVBA.xlsm").Worksheets("Лист1").Range("B1") = "Иван"

' Записывает 100 в ячейку A1 таблицы «Счета» в МойVBA.xlsm
Workbooks("МойVBA.xlsm").Worksheets("Счета").Range("A1") = 100

' Записывает дату в ячейку D3 рабочего листа "Лист2" в Книга.xlsx
Workbooks("Книга.xlsx").Worksheets("Лист2").Range("D3") = "112019"

End Sub

Это простой шаблон. Вы можете написать в любую ячейку любого листа из любой книги. Это просто вопрос изменения названия книги, имени листа и диапазона в соответствии с вашими потребностями.

Взгляните на часть книги

Ключевое слово Workbooks относится к совокупности всех открытых рабочих книг. Предоставление имени книги в коллекцию дает нам доступ к этой книге. Когда у нас есть объект, мы можем использовать его для выполнения задач с книгой.

 Устранение неполадок в коллекции книг

Когда вы используете коллекцию Workbooks для доступа к книге, вы можете получить сообщение об ошибке:

Run-time Error 9: Subscript out of Range.

Это означает, что VBA не может найти книгу, которую вы
передали в качестве параметра.

Это может произойти по следующим причинам:

1. Рабочая книга в настоящее время закрыта.
2. Вы написали имя неправильно.
3. Вы создали новую рабочую книгу (например, «Книга1») и попытались получить к ней доступ, используя Workbooks («Книга1.xlsx»). Это имя не Книга1.xlsx, пока оно не будет сохранено в первый раз.
4. (Только для Excel 2007/2010) Если вы используете два экземпляра Excel, то Workbooks () относится только к рабочим книгам, открытым в текущем экземпляре Excel.
5. Вы передали число в качестве индекса, и оно больше, чем количество открытых книг, например Вы использовали
   Workbooks (3), и только две рабочие книги открыты.

Если вы не можете устранить ошибку, воспользуйтесь любой из функций в разделе Поиск всех открытых рабочих книг. Они будут печатать имена всех открытых рабочих книг в «Immediate Window » (Ctrl + G).

Примеры использования рабочей книги VBA

Следующие примеры показывают, что вы можете сделать с
книгой.

Примечание. Чтобы попробовать этот пример, создайте две открытые книги с именами Тест1.xlsx и Тест2.xlsx.

Sub SvoistvaRabocheiKnigi()

    ' Печатает количество открытых рабочих книг
    Debug.Print Workbooks.Count

    ' Печатает полное название книги
    Debug.Print Workbooks("Тест1.xlsx").FullName

    ' Отображает полное имя книги в диалоговом окне сообщения.
    MsgBox Workbooks("Тест1.xlsx").FullName

    ' Печатает количество листов в Тест2.xlsx
    Debug.Print Workbooks("Тест2.xlsx").Worksheets.Count

    ' Печатает имя активного в данный момент листа Тест2.xlsx
    Debug.Print Workbooks("Тест2.xlsx").ActiveSheet.Name

    ' Закрывает книгу под названием Тест1.xlsx
    Workbooks("Tест1.xlsx").Close

    ' Закрывает книгу Тест2.xlsx и сохраняет изменения
    Workbooks("Tест2.xlsx").Close SaveChanges:=True

End Sub

Примечание: в примерах кода я часто использую Debug.Print. Эта функция печатает значения в Immediate Window. Для просмотра этого окна выберите View-> Immediate Window из меню (сочетание клавиш Ctrl + G)

Доступ к рабочей книге VBA по индексу

Вы также можете использовать индексный номер с книгами ().
Индекс относится к порядку, в котором книга была открыта или создана.

Workbooks (1) относится к книге, которая была открыта первой. Workbooks (2) относится к рабочей книге, которая была открыта второй и так далее.

' Первая рабочая книга, которая была открыта
Debug.Print Workbooks(1).Name

' Третья рабочая тетрадь, которая была открыта
Debug.Print Workbooks(3).Name

' Последняя рабочая книга, которая была открыта
Debug.Print Workbooks(Workbooks.Count).Name

В этом примере мы использовали Workbooks.Count. Это количество рабочих книг, которые в настоящее время находятся в коллекции рабочих книг. То есть количество рабочих книг, открытых на данный момент. Таким образом, использование его в качестве индекса дает нам последнюю книгу, которая была открыта

Использование индекса не очень полезно, если вам не нужно знать порядок. По этой причине вам следует избегать его использования. Вместо этого вы должны использовать имя рабочей книги вместе с Workbooks ().

Поиск всех открытых рабочих книг

Иногда вы можете получить доступ ко всем рабочим книгам, которые открыты. Другими словами, все элементы в коллекции Workbooks ().

Вы можете сделать это, используя цикл For Each.

Sub PechatImeniFailaEach()

    ' Распечатывает полное имя файла всех открытых рабочих книг
    Dim wrk As Workbook
    For Each wrk In Workbooks
        Debug.Print wrk.FullName
    Next wrk

End Sub

Вы также можете использовать стандартный цикл For для доступа ко всем открытым рабочим книгам.

Sub PechatImeniFailaFor()

    ' Распечатывает полное имя файла всех открытых рабочих книг
    Dim i As Long
    For i = 1 To Workbooks.Count
        Debug.Print Workbooks(i).FullName
    Next i

End Sub

Для доступа к книгам подходит любой из этих циклов.
Стандартный цикл For полезен, если вы хотите использовать другой порядок или
вам нужно использовать счетчик.

Примечание. Оба примера читаются в порядке с первого открытого до последнего открытого. Если вы хотите читать в обратном порядке (с последнего на первое), вы можете сделать это

Sub PechatImeniFailaForKon()

    ' Распечатывает полное имя файла всех открытых рабочих книг
    ' в обратном порядке.
    Dim i As Long
    For i = Workbooks.Count To 1 Step -1
        Debug.Print Workbooks(i).FullName
    Next i

End Sub

Открыть рабочую книгу

До сих пор мы имели дело с рабочими книгами, которые уже открыты. Конечно, необходимость вручную открывать рабочую книгу перед запуском макроса не позволяет автоматизировать задачи. Задание «Открыть рабочую книгу» должно выполняться VBA.

Следующий код VBA открывает книгу «Книга1.xlsm» в папке «C: Документы»

Sub OtkritKnigu()

    ' Откройте книгу и распечатайте количество листов в ней
    Workbooks.Open ("C:ДокументыКнига1.xlsm")

    Debug.Print Workbooks("Книга1.xlsm").Worksheets.Count

    ' Закройте книгу без сохранения
    Workbooks("Книга1.xlsm").Close saveChanges:=False

End Sub

Рекомендуется проверить, действительно ли существует книга,
прежде чем открывать ее. Это предотвратит ваши ошибки. Функция Dir позволяет
вам легко это сделать.

Sub OtkritKniguDir()

    If Dir("C:ДокументыКнига1.xlsm") = "" Then
        ' Файл не существует - сообщение пользователю
        MsgBox "Could not open the workbook. Please check it exists"
    Else
        ' открыть книгу и сделать что-нибудь с ней
        Workbooks.Open("C:ДокументыКнига1.xlsm").Open
    End If

End Sub

Проверить открыта ли книга

Если вы открываете книгу только для чтения, то не имеет значения, открыта ли она уже. Тем не менее, если вы собираетесь обновить данные в рабочей книге, рекомендуется проверить, открыты ли они.

Приведенную ниже функцию можно использовать для проверки,
открыта ли книга в данный момент. Если нет, то откроется рабочая книга. В любом
случае вы получите открытую рабочую книгу.

Function GetWorkbook(ByVal sFullFilename As String) As Workbook
    
    Dim sFilename As String
    sFilename = Dir(sFullFilename)
    
    On Error Resume Next
    Dim wk As Workbook
    Set wk = Workbooks(sFilename)
    
    If wk Is Nothing Then
        Set wk = Workbooks.Open(sFullFilename)
    End If
    
    On Error Goto 0
    Set GetWorkbook = wk
    
End Function

Вы можете использовать эту функцию так:

Sub PrimerOtkritiyaKnigi()

    Dim sFilename As String
    sFilename = "C:ДокументыКнига2.xlsx"

    Dim wk As Workbook
    Set wk = GetWorkbook(sFilename)
    
End Sub

Этот код хорош в большинстве ситуаций. Однако, если рабочая книга может быть открыта в режиме только для чтения или может быть открыта в данный момент другим пользователем, возможно, вы захотите использовать немного другой подход.

Простой способ справиться с этим в этом сценарии состоит в
том, чтобы настаивать на том, что файл должен быть закрыт для успешного запуска
приложения. Вы можете использовать функцию ниже, чтобы просто проверить, открыт
ли уже файл, и если это так, сообщить пользователю, что он должен быть закрыт в
первую очередь.

' Функция для проверки, если книга уже открыта
Function IsWorkBookOpen(strBookName As String) As Boolean
    
    Dim oBk As Workbook
    
    On Error Resume Next
    Set oBk = Workbooks(strBookName)
    On Error GoTo 0
    
    If Not oBk Is Nothing Then
        IsWorkBookOpen = True
    End If
    
End Function

Пример использования этой функции показан ниже. В этом
случае, если рабочая книга уже открыта, вы сообщаете пользователю, что она
должна быть закрыта для продолжения макроса.

Sub PrimerIsp()

    Dim sFilename As String
    sFilename = "C:tempwritedata.xlsx"

    If IsWorkBookOpen(Dir(sFilename)) = True Then
        MsgBox "File is already open. Please close file and run macro again."
        Exit Sub
    End If
    
    ' Написать в книгу здесь
    
End Sub

Если вам нужно проверить, открыта ли книга в другом экземпляре Excel, вы можете использовать атрибут ReadOnly книги. Будет установлено значение true, если оно открыто в другом экземпляре.

Закрыть книгу

Закрыть книгу в Excel VBA очень просто. Вы просто вызываете метод Close рабочей книги.

Обычно, когда вы закрываете книгу в VBA, вы не хотите видеть
сообщения из Excel, спрашивающие, хотите ли вы сохранить файл.

Вы можете указать, сохранять ли книгу или нет, и тогда
сообщения Excel не будут появляться.

' Не сохранять изменения
wk.Close SaveChanges:= False

' Сохранить изменения
wk.Close SaveChanges:= True

Очевидно, что вы не можете сохранить изменения в книге,
которая в данный момент открыта только для чтения.

Сохранить книгу

Мы только что видели, что вы можете сохранить книгу, когда закроете ее. Если вы хотите сохранить его на любом другом этапе, вы можете просто использовать метод Save.

Вы также можете использовать метод SaveAs

wk.SaveAs "C:Резервная копияСчета.xlsx"

Метод WorkAs SaveAs поставляется с двенадцатью параметрами, которые позволяют вам добавить пароль, установить файл только для чтения и так далее. Вы можете увидеть детали здесь.

Вы также можете использовать VBA для сохранения книги в виде копии с помощью SaveCopyAs.

Копировать книгу

Если рабочая книга открыта, вы можете использовать два метода в приведенном выше разделе для создания копии, т.е. SaveAs и SaveCopyAs.

Если вы хотите скопировать книгу, не открывая ее, вы можете использовать FileCopy, как показано в следующем примере:

Sub KopirovatKnigu()
    FileCopy "C:ДокументыДокументы.xlsm", "C:ДокументыПример копии.xlsm"
End Sub

Использование диалогового окна «Файл» для открытия рабочей книги

В предыдущем разделе показано, как открыть книгу с заданным именем. Иногда вам может понадобиться, чтобы пользователь выбрал рабочую книгу. Вы можете легко использовать Windows File Dialog.

FileDialog настраивается, и вы можете использовать его так:

1. Выберите файл.
2. Выберите папку.
3. Откройте файл.
4. «Сохранить как» файл.

Если вы просто хотите, чтобы пользователь выбрал файл, вы можете использовать функцию GetOpenFilename.

Следующая функция открывает книгу с помощью диалога файлов.
Функция возвращает полное имя файла, если файл был выбран. Если пользователь
отменяет, он отображает сообщение и возвращает пустую строку.

Public Function UserSelectWorkbook() As String

    On Error Goto ErrorHandler

    Dim sWorkbookName As String

    Dim FD As FileDialog
    Set FD = Application.FileDialog(msoFileDialogFilePicker)

    ' Откройте диалоговое окно файла
    With FD
        ' Установить заголовок диалога
        .Title = "Please Select File"

        ' Добавить фильтр
        .Filters.Add "Excel Files", "*.xls;*.xlsx;*.xlsm"

        ' Разрешить выбор только одного файла
        .AllowMultiSelect = False

        ' Диалог дисплея
        .Show

        If .SelectedItems.Count > 0 Then
            UserSelectWorkbook = .SelectedItems(1)
        Else
            MsgBox "Selecting a file has been cancelled. "
            UserSelectWorkbook = ""
        End If
    End With

    ' Убирать
    Set FD = Nothing
Done:
    Exit Function
ErrorHandler:
    MsgBox "Error: " + Err.Description
End Function

Когда вы вызываете эту функцию, вы должны проверить, отменяет ли пользователь диалог.

В следующем примере показано, как легко вызвать функцию UserSelectWorkbook и обработать случай отмены пользователя.

Public Sub TestViborPolz()

    Dim userBook As Workbook, sFilename As String

    ' Вызовите функцию UserSelectworkbook
    sFilename = UserSelectWorkbook()

    ' Если имя файла возвращается пустым, пользователь отменил
    If sFilename <> "" Then
        ' Откройте книгу и сделайте что-нибудь с ней
        Set userBook = Workbooks.Open(sFilename)
    End If

End Sub

Вы можете настроить диалог, изменив Title, Filters и AllowMultiSelect в функции UserSelectWorkbook.

Использование ThisWorkbook

Существует более простой способ доступа к текущей книге, чем использование Workbooks() . Вы можете использовать ключевое слово ThisWorkbook. Это относится к текущей книге, то есть к книге, содержащей код VBA.

Если наш код находится в книге, называемой МойVBA.xlsm, то ThisWorkbook и Workbooks («МойVBA.xlsm») ссылаются на одну и ту же книгу.

Использование ThisWorkbook более полезно, чем использование Workbooks (). С ThisWorkbook нам не нужно беспокоиться об имени файла. Это дает нам два преимущества:

1. Изменение имени файла не повлияет на код
2. Копирование кода в другую рабочую книгу не
   требует изменения кода

Это может показаться очень маленьким преимуществом. Реальность такова, что имена будут меняться все время. Использование ThisWorkbook означает, что ваш код будет работать нормально.

В следующем примере показаны две строки кода. Один с помощью ThisWorkbook, другой с помощью Workbooks (). Тот, который использует Workbooks, больше не будет работать, если имя МойVBA.xlsm изменится.

Sub IzmenenieImeni()

    ' Обе строки делают одно и то же.
    Debug.Print ThisWorkbook.FullName
    Debug.Print Workbooks("МойVBA.xlsm").FullName

End Sub

Использование ActiveWorkbook

ActiveWorkbook относится к книге, которая в данный момент активна. Это тот, который пользователь последний раз щелкнул.

Поначалу это может показаться полезным. Проблема в том, что
любая рабочая книга может стать активной простым щелчком мыши. Это означает,
что вы можете легко записать данные не в ту книгу.

Использование ActiveWorkbook также затрудняет чтение кода. Из кода может быть не очевидно, какая книга должна быть активной.

Надеюсь, я дал понять, что вам следует избегать использования ActiveWorkbook, если в этом нет необходимости. Если вы должны быть очень осторожны.

Примеры доступа к книге

Мы рассмотрели все способы доступа к книге. Следующий код показывает примеры этих способов.

Sub PrimerDostupaKKnige()

    ' Это рабочая книга, которая уже открыта и называется МойVBA.xlsm.
    Debug.Print Workbooks("МойVBA.xlsm").FullName

    ' Рабочая книга, содержащая этот код
    Debug.Print ThisWorkbook.FullName

    ' Открытая рабочая книга, которая была открыта первой
    Debug.Print Workbooks(1).FullName

    ' Открытая рабочая книга, которая была открыта последней
    Debug.Print Workbooks(Workbooks.Count).FullName

    ' Рабочая книга, которая в настоящее время активна
    Debug.Print ActiveWorkbook.FullName

    ' Рабочая книга не указана - будет использована активная
    Debug.Print Worksheets("Лист1").Name

    ' Закрытая рабочая книга с именем Книга1.xlsm в папке 
      'C:Документы
    Workbooks.Open ("C:ДокументыКнига1.xlsm")
    Debug.Print Workbooks("Книга1.xlsm").FullName
    Workbooks("Книга1.xlsm").Close

End Sub

Объявление переменной VBA Workbook

Причина объявления переменной книги состоит в том, чтобы сделать ваш код более легким для чтения и понимания. Проще увидеть преимущество на примере:

Sub OtkrKnigaPerem()

    Dim wrk As Workbook
    Set wrk = Workbooks.Open("C:ДокументыКнига1.xlsm")

    ' Распечатать количество листов в каждой книге
    Debug.Print wrk.Worksheets.Count
    Debug.Print wrk.Name

    wrk.Close

End Sub

Вы можете установить переменную книги с помощью любого из
методов доступа, которые мы видели.

Ниже показан тот же код без переменной рабочей книги.

Sub OtkrKnigaNetPerem()

   Workbooks.Open ("C:ДокументыКнига1.xlsm")

   Debug.Print Workbooks("Книга2.xlsm").Worksheets.Count
   Debug.Print Workbooks("Книга2.xlsm").Name

    Workbooks("Книга2.xlsm").Close

End Sub

В этих примерах разница несущественная. Однако, когда у вас много кода, использование переменной полезно, в частности, для рабочего листа и диапазонов, где имена имеют тенденцию быть длинными, например thisWorkbook.Worksheets («Лист1»). Range («A1»).

Вы можете назвать переменную книги как wrkRead или wrkWrite. Затем вы можете сразу увидеть,
для чего используется эта книга.

Создать новую книгу

Для создания новой рабочей книги вы используете функцию добавления рабочих книг. Эта функция создает новую пустую книгу. Это то же самое, что выбрать «Новая книга» в меню «Файл Excel».

 Когда
вы создаете новую книгу, вы, как правило, хотите сохранить ее. Следующий код
показывает вам, как это сделать.

Sub SozdatKnigu()

    Dim wrk As Workbook
    Set wrk = Workbooks.Add

    ' Сохранить как xlsx. Это по умолчанию.
    wrk.SaveAs "C:TempПример.xlsx"

    ' Сохранить как макрокоманду
    wrk.SaveAs "C:TempПример.xlsm", xlOpenXMLWorkbookMacroEnabled

End Sub

Когда вы создаете новую книгу, она обычно содержит три листа. Это определяется свойством Application.SheetsInNewWorkbook.

Если вы хотите, чтобы в новой книге было другое количество
листов, измените это свойство перед созданием новой книги. В следующем примере
показано, как создать новую книгу с семью листами.

Sub SozdatKniguMnStr()

    ' Сохраните значение SheetsInNewWorkbook, чтобы мы могли сбросить его позже
    Dim sheetCnt As Long
    sheetCnt = Application.SheetsInNewWorkbook

    ' Установите листы в новой книге, чтобы быть 7
    Application.SheetsInNewWorkbook = 7

    ' Рабочая книга будет создана из 7 листов
    Dim wrk As Workbook
    Set wrk = Workbooks.Add

    ' Показать количество листов
    Debug.Print "number of sheets: " & CStr(wrk.Worksheets.Count)

    ' Сброс к первоначальному значению
    Application.SheetsInNewWorkbook = sheetCnt

End Sub

With и Workbook

Ключевое слово With облегчает чтение и написание кода VBA.
Использование с означает, что вам нужно упомянуть только один раз. С
используется с объектами. Это такие элементы, как рабочие книги, рабочие
таблицы и диапазоны.

В следующем примере есть два Subs. Первый похож на код,
который мы видели до сих пор. Второй использует ключевое слово With. Вы можете
увидеть код гораздо понятнее во втором Sub. Ключевые слова End With обозначают
конец кода раздела с помощью With.

' Не используется ключевое слово With
Sub NeIspWith()

   Debug.Print Workbooks("Книга2.xlsm").Worksheets.Count
   Debug.Print Workbooks("Книга2.xlsm").Name
   Debug.Print Workbooks("Книга2.xlsm").Worksheets(1).Range("A1")
   Workbooks("Книга2.xlsm").Close

End Sub

' Использование With делает код легче читать
Sub IspWith()

    With Workbooks("Книга2.xlsm")
        Debug.Print .Worksheets.Count
        Debug.Print .Name
        Debug.Print .Worksheets(1).Range("A1")
        .Close
    End With

End Sub

Резюме

Ниже приводится краткое изложение основных моментов этой статьи.

1. Чтобы получить рабочую книгу, содержащую код, используйте ThisWorkbook.
2. Чтобы получить любую открытую книгу, используйте Workbooks («Пример.xlsx»).
3. Чтобы открыть книгу, используйте Set Wrk = Workbooks.Open («C: Папка Пример.xlsx»).
4. Разрешить пользователю выбирать файл с помощью функции UserSelectWorkbook, представленной выше.
5. Чтобы создать копию открытой книги, используйте свойство SaveAs с именем файла.
6. Чтобы создать копию рабочей книги без открытия, используйте функцию FileCopy.
7. Чтобы ваш код было легче читать и писать, используйте ключевое слово With.
8. Другой способ прояснить ваш код — использовать переменные Workbook.
9. Чтобы просмотреть все открытые рабочие книги, используйте For Every wk в Workbooks, где wk — это переменная рабочей книги.
10. Старайтесь избегать использования ActiveWorkbook и Workbooks (Index), поскольку их ссылка на рабочую книгу носит временный характер.

Вы можете увидеть краткое руководство по теме в верхней части этой статьи

 Заключение

Это был подробная статья об очень важном элементе VBA — Рабочей книги. Я надеюсь, что вы нашли ее полезной. Excel отлично справляется со многими способами выполнения подобных действий, но недостатком является то, что иногда он может привести к путанице.

Чтобы получить максимальную пользу от этой статьи, я рекомендую вам попробовать примеры. Создайте несколько книг и поиграйтесь с кодом. Внесите изменения в код и посмотрите, как эти изменения влияют на результат. Практика — лучший способ выучить VBA.

Файл Excel называют рабочей книгой. При запуске программы сразу, автоматически, создается новый файл с названием Книга1, которое в дальнейшем можно заменить на любое желаемое.

СОЗДАНИЕ НОВОЙ КНИГИ

Выбераем вкладку «Файл». Откроется представление Backstage. Выбераем «Создать», затем нажимаем «Пустая книга». Для быстрого создания новой книги можно воспользоваться стандартной комбинацией «горячих» клавиш CTRL+N.

Backstage — это окно, которое открывается при щелчке на вкладке «Файл».

ОТКРЫТИЕ СУЩЕСТВУЮЩЕЙ КНИГИ EXCEL

1. Переходим к представлению Backstage, на вкладку «Открыть».

2. Выбераем «Компьютер», а затем «Обзор». Кроме этого можно открыть файлы, хранящиеся в службе OneDrive.

Появится диалоговое окно «Открытие документа». Осталось выбрать нужный файл, а затем нажать «Открыть».

ЗАКРЕПЛЕНИЕ КНИГИ В EXCEL

Бывает что приходится работать с одним и тем же документом, именно поэтому будет удобнее закрепить его в представлении Backstage.

1. Нужно перейти к представлению Backstage, затем нажать «Открыть». Появятся последние открытые книги.

2. Наводим указатель мышки на книгу, которую необходимо закрепить. Рядом с ней появится значок в виде канцелярской кнопки. Нажимаем на значок.

3. Книга окажется закрепленной. Для того чтобы снять закрепление, снова нужно нажать на значок канцелярской кнопки.

Похожим образом в представлении Backstage можно закреплять еще и папки для быстрого доступа к ним. Для этого, находясь в представлении Backstage, нужно перейти на вкладку «Открыть» и выбрать «Компьютер». Найти папку, которую требуется закрепить, и нажать на значок канцелярской кнопки.

Шаблоны в Excel

Шаблон – это предварительно созданный документ, служащий для ускорения работы. Шаблоны содержат готовые настройки, такие как форматирование и дизайн, с целью экономии времени и сил при создании нового проекта.

Создание новой книги из шаблона

1. Нужно открыть вкладку «Файл», чтобы перейти к представлению Backstage.

2. Нажать «Создать». Следом за опцией «Пустая книга» расположены несколько шаблонов.

3. Выбрать шаблон, чтобы посмотреть его.

4. Откроется предварительный просмотр и дополнительная информация об использовании шаблона.

5. Нажимаем «Создать», чтобы воспользоваться выбранным шаблоном. Откроется новая книга на основе шаблона.

РЕЖИМ СОВМЕСТИМОСТИ В EXCEL

Иногда возникает необходимость работать с документами, которые созданы в более ранних версиях Microsoft Excel, например, Excel 2007/2003 или 2000. При открытии таких книг включается режим совместимости, иногда его называют режимом ограниченной функциональности. В режиме совместимости некоторые опции отключены, т.е. доступны только те команды, что использовались для создания документа.

Для того чтобы убрать режим совместимости, необходимо преобразовать книгу в формат, соответствующий текущей версии Excel.

ПРЕОБРАЗОВАНИЕ КНИГИ

Представим есть книга Excel созданная в программе версии 2007 года в режиме совместимости. Для того чтобы использовать весь функционал Excel 2013, необходимо преобразовать файл в формат Excel 2013. Необходимо сделать:

1. Открыть вкладку «Файл», чтобы перейти к представлению Backstage.

2. Открываем вкладку «Сведения» и выбераем команду «Преобразовать».

3. В появившемся диалоговом окне нажимаем «ОК», чтобы подтвердить смену формата файла. Книга будет преобразована в новый формат, а режим совместимости убран.

Visual Basic for Applications (VBA) is a frequently used utility for Microsoft applications — including Microsoft Excel, Office, PowerPoint, Word, and Publisher. As VBA is a fairly complicated language to learn, much has been written about it and its capabilities (and if you want to learn more about VBA and Excel, you can read about it here).

One of the most basic tasks you can use VBA for is to open and manipulate files, such as an Excel file. VBA open files will open the Excel file — from there you can control how it is read and written. Commonly, you would use VBA code to open the file, and then use Excel VBA macros to write to the file. 

Let’s take a deeper look into how VBA open files can be used with an Excel Workbook.

What is VBA Open Files and how does it work?

VBA is extremely similar to Visual Basic, a programming language used within the Microsoft ecosystem. It is used to create “macros.” A macro is a sequence of automated events which can fine-tune, optimize, automate, and improve your operations. The Excel VBA implementation can open files and run macros on them.

In Excel, you use VBA by inserting the code in the Visual Basic Editor. You can also choose the “Macro” button on the Developer Tab. From there, you will enter in code as though programming.

Before you start digging into VBA, you should have some understanding of programming. Programming means directing a computer to perform a certain sequence of events. Keep a few things in mind:

• You should always test your programming thoroughly to make sure it does what you want it to do.
• You should never implement your programming in a “live” environment with important data rather than test data.
• You should save your work frequently and you should be prepared to restore both your programming and your data if needed.

Running the macros you program

When macros are created, they’re assigned to given keypresses. Sometimes this is a combination of keys, and sometimes it’s an extra mouse button. Regardless, they’re intended to set off an automated chain of events whenever you do the given action (whether it’s pressing a key on your keyboard, or a button on your mouse). You can also run a macro manually by selecting it.

So, when you run a macro, you have Microsoft Excel already open. The macro runs within Excel, and you will do all your VBA programming inside of that program. Likewise, you will do your Microsoft Word VBA programming inside of Microsoft Word.

Opening an Excel file with VBA

The first step to updating, modifying, and saving Excel files is to be able to open them. To open an Excel file with VBA you would program as follows:

Sub openworksheet()
	Workbooks.Open filename:= _ “filepath”
	End sub

The “sub” above is a lot like a function. It creates a small amount of code that is intended to take action. It begins with “Sub” and ends with “End Sub.”

In the above code, note that the italicized “filepath” references the full path of the workbook. Without the appropriate Workbooks.Open filename, you won’t be able to open the given file. You will also need the appropriate file type (Microsoft Excel, which is either XLS or XLSX) or the open method will fail.

Of course, the above assumes that you are always going to be opening the Workbook at the “filepath.” You might also want to open any file at all. You can create a macro that opens a dialog, through which you can select any file.

	Sub openworksheet()
	Dim Flocation as Variant
	Flocation = Application.GetOpenFileName()
	If Flocation <> false then 
	Workbooks.Open Filename:= Flocation
	End If
	End Sub

The above code prompts the user to give a file name. If the user does give a file name (the variable, Flocation is no longer false), then the program will open that file.

Also note that Flocation is just the name of the variable that’s being used. You could call it something else; in fact, you could even call it just “f.” All that’s important is that you don’t use a word that the code already uses, such as “Variant” or “Filename.”

You might also be wondering why this code is so important. After all, you can open your own files at any time. But you can bind it to a specific keypress, making it a macro. So, now, typing something like “F8” will automatically open the “open a file” dialog.

But once you’ve automatically opened a file, what’s next? Generally, opening the file is only the first step. Once you’ve opened the Excel file, you still need to be able to read and write to it.

Reading the Excel file

You’ve opened your Excel file. But what’s inside of it? Luckily for you, it’s pretty easy to start reading an Excel file once you’ve opened it with VBA.

First, you should know that when you open a file, it becomes the ActiveWorkbook, which can be referenced in code as “ActiveWorkbook.”

Let’s say you want to read the first cell of the book.

Dim contents As Integer
	contents = ActiveWorkbook.Range(“A1”).value

Now, that does assume that the cell is an Integer. You would need to change it to a String if you were reading a string, or a Date if you were reading a Date. Consequently, you need to be really familiar with the type of data you’re reading before you go any further.

Now, note that this is reading the contents of the cell into just a variable. That’s not displaying it. That’s not doing anything with it at all. If you wanted to see, perhaps, what the contents were, you would then type:

MsgBox contents

Alternatively, you could:

MsgBox ActiveWorkbook.Range(“A1”).value

Either of these options should display the value. But, of course, it’s a static value; it’s always going to display A1. So, you might need to code things a little more expressively if you’re trying to read the entirety of a document, or if you’re trying to transition one document to another.

Writing to the file

So, you have your workbook open through the power of VBA. But now you want to write to the file. Writing can be used in tandem with reading; once the Workbook is open you could do both. 

As an example, you could write a macro that would open a Workbook and copy one column to another column, by reading the data in the first column and then writing that data to the second column.

Similarly, you could write a macro that would open two Workbooks and copy data from one to another, and then save both Workbooks, and then close both Workbooks.

As mentioned, once you open a workbook with VBA, the workbook that you opened becomes the ActiveWorkbook. This also happens if you have created a new workbook within VBA.

You can then access its data through:

ActiveWorkbook.Sheets
ActiveWorbook.Cells

As an example, if you wanted to edit the cell at column 1, row 1, on Sheet 1, you would write as follows:

ActiveWorkbook.Sheets(“Sheet 1”).Cells(1,1).Value= “1”

If this is confusing, you can also use the “Range” field.

ActiveWorkbook.Sheets(“Sheet 1”).Range(“A1”).Value= “1”

The above would have the same result.  

Writing to a sheet can become very complex. Consider that, when you’re writing the macro system, you don’t know what data is in those cells. You only know their positions. You’re essentially writing to that position blindly.

Macros are frequently used to do things such as read CSV files and import that CSV information into a brand new Microsoft Excel workbook. But it takes a lot of time and a lot of testing to ensure that the data is going through correctly.

In the above case, you’re only altering range A1. But you could iterate through all the rows and columns of a workbook one by one if you were trying to fill it out line by line. As you learn more about Excel and VBA, you will learn more advanced methods of both reading and writing data.

Saving the Excel workbook file

Just like when you’re using Excel regularly, you still need to save your changes. If you have opened and changed a Workbook, save it before you close it. 

ActiveWorkbook.Save

You could even write a Macro that would save all your workbooks and close them, as follows:

For each workbook in Application.Workbooks
		workbook.Save
	Next workbook
		Application.Quit

The above code iterates through each Workbook saving it until it cannot find a Workbook anymore. Once it can no longer find a Workbook, it quits the application. This is very useful for those who want to shut down fast and have a lot of workbooks left to save.

Closing the selected file

Closing the file is just as easy as opening a workbook. In fact, it’s actually easier, because you don’t need to know the file name. VBA already knows which file it has opened.

To close the Excel file you would type:

ActiveWorkbook.Close

On the other hand, perhaps you wanted to close a specific Workbook. In that case, you would use the following:

Workbooks(“book.xlsx”).Close

This is under the assumption the book was called “book.xlsx”; you would replace the given name for your sheet. Once you have closed the Workbook, you will not be able to make any further modifications to it until you open it again.

Opening a Microsoft Excel workbook that is password protected

Sometimes you may have password-protected your workbooks. That goes into more complicated territory. Understandably, it’s not going to open if you just try to directly open it. 

But you can still open it with VBA.

Workbooks.Open(filename:= “filename”, Password:= “password”)

As you can see above, you just added the password directly into the macro. Now the file is going to open just fine.

But there’s a problem with the above, which (if you’re good with security) you already know. You just saved your password as plain text! 

Now, anyone with access to your computer could potentially open that file without knowing the password. And if you’ve been using that password for multiple files (a big no-no), they could be compromised, too.

So, VBA does provide a method of opening files that have a password. But it’s not a good method because of the above reasons. It means that your system could be compromised. If you just have a password to prevent outside intrusion (the file being sent somewhere else and opened by an outsider), this may not be a problem. But if you’re trying to protect your file internally as well as externally, it can be a major issue.

The alternative is to use the previous method of opening a file with a dialogue box. When you press a button (or otherwise launch your macro), you’ll be given a dialogue box, and you’ll be able to open whatever file you want. Your macro can then continue actions on the file after you have manually entered your password. 

Opening a read-only file

Some Microsoft Excel files don’t have a password when you open them. Instead, they are set to read-only. If they’re set to read-only, you’ll be able to open and read from them. But you won’t be able to actually write to them without a secondary password. 

ActiveWorkbook.Password = “password”

Above is the method that you would call after you’ve opened the book so that you can start to write to it. You wouldn’t include the password when opening the file, because you wouldn’t have been prompted for it then.

The benefits of using Excel VBA Open

VBA is used to automate routine, mundane tasks, such as copying large volumes of data from one book to another. Any time you’re finding yourself spending hours just copying and pasting data, or running fairly mundane calculations, a macro can help.

You can also use VBA to automate smaller tasks that you find use a lot of keypresses. If you find yourself frequently needing to open the same 10 Excel Workbooks at once, for instance, you can create a macro that will open all of them on a single keypress, and close them all, too.

While it may only save you a few minutes of time, those minutes of time add up.

Potential issues with Excel VBA Open

It’s possible to run into issues with VBA open. If you have a protected workbook, you won’t be able to open it without the password (as noted). If you don’t have the password, you aren’t going to be able to open the file.

If the selected file is read-only, you aren’t going to be able to write to it without the right permissions. If you don’t realize that the file is read-only, you could try writing to it only for the action to fail. 

And because you can’t always see what the macro is doing until you run it, you can potentially overwrite data or delete it altogether. This is why it’s always important to test your macros with test data before trying to implement it with live data.

But even so, Excel VBA open is a robust language. Most common activities with Workbooks (such as opening, closing, reading, writing, and saving) can be completed quite intuitively and often with a single line of code.

Learning more about Excel VBA

In the right hands, VBA is very powerful. If you have any automated, routine tasks in Excel, consider automating them with Excel VBA. Even better, once you learn the basics of VBA, you can also use it in other Microsoft applications such as Microsoft Word.

Still, powerful also means that mistakes can be made. Because VBA can open files and write to them, it’s also possible that it can overwrite data. This is why testing your programming is so important. 

Frequently Asked Questions:

Can a macro open a file?

The Excel Macro can be used to prompt a user to open a file or to open a specific file (given the entire filename). 

How do I open a text file in Excel VBA?

The VBA OpenTextFile method can be used to open a text file, just as the VBA Workbooks.Open method is used to open an Excel file.

How do I open a new workbook in VBA?

To open a new workbook in VBA, you would use the Workbooks.Add() VBA function. This function both creates a new workbook and prioritizes it as the active workbook.

• запрещать/разрешать общий доступ к рабочей книге можно при помощи методов SaveAs() или ExclusiveAccess();
• по умолчанию возможность совместного редактирования для книги отключена (проверить можно при помощи свойства MultiUserEditing);
• получить список всех пользователей (а также когда они открыли файл и в каком режиме) можно при помощи свойства UserStatus.

For Each Item In ThisWorkbook.Names

Это свойство удобно использовать для предварительных проверок для устранения потенциальных ошибок времени выполнения.

Методов у объекта Workbook также очень много, однако значения самых употребимых — Activate(), Close(), Save(), SaveAs(), PrintOut(), Protect() и Unprotect() очевидны и действуют аналогично одноименным методам объекта Document в Word.

Как работать с Excel через VBA или объектная модель Excel

Перед созданием своей первой программы в Excel необходимо разобраться в объектную модели приложения. Имея четкое понимания об объектной модели Excel вы сможете управлять практически всеми объектами, создавать/изменять листы, графики, отдельные файлы и многое другое. Возможно на первый взгляд она покажется довольно сложной, но не пугайтесь на конкретных примерах у вас сложится целостная картина.

Структура объектов

Проще всего рассматривать объектную модель как некое дерево или иерархическую структуру, так как каждый объект имеет свое ответвление. Кусочек этой структуры вы можете увидеть на рисунке далее.

Самый главный объект, вершина нашей структуры, это собственно само приложение Excel — объект Application. Какие объекты входят в Excel? правильно книги (файлы Excel), поэтому в объекте Application содержится коллекция из книг — объект Workbooks. Из чего состоят книги — из листов, диаграмм, соответственно внутри объекта Workbooks мы видим объект Worksheets и Charts. Идем дальше, лист в свою очередь состоит из строк, столбцов, ячеек это объекты Rows, Columns, Range.

Это, конечно, как вы понимаете только часть объектной модели Excel, мы перечислили только одни их самых основных объектов. Полное дерево объектов исчисляется сотнями объектов. Возможно она сейчас кажется сложной, не переживайте со временем вы начнете быстро в ней ориентироваться. Главное сейчас — это понять, что есть некие объекты, которые могут состоять из других объектов.

Объекты и коллекции объектов

Многие объекты, которые мы перечислили выше являются коллекциями. Коллекция — это группа однотипных объектов (или классов). Например Workbook s — это коллекция всех открытых в данный момент книг (объектов Workbook). А коллекция Worksheet s состоит из листов книги (объектов Worksheet), и так далее. Как правило все коллекции заканчиваются буквой S.

Давайте посмотрим, как обращаться к конкретным элементам коллекции в коде VBA.

Мы можем указать порядковый номер (начиная с единицы) элемента в коллекции. Worksheets(3) — в этом случае мы обращаемся к 3-му листу книги.

Мы также можем указать название листа в кавычках Worksheets(«Название листа»).

Аналогичным образом можно обратиться к конкретной книге Workbook(«Названием книги»).

Чтобы обратиться к объекту Excel (к листу, или ячейке) необходимо указать ссылку на этот объект, перечислив полный путь к нему в соответствии с объектной моделью.

Например, для ячейки A1 полная ссылка будет выглядеть следующим образом:

На самом деле полный путь писать не обязательно. Application — можно практически всегда не указывать. Workbooks(«Название книги») — можно не указывать, если необходимо обратиться к ячейке из активной книги, а Worksheets(«Название листа») можно не писать в случае если код должен выполнять действия на активном листе. Т.е. в можно упростить до:

Но всегда имейте ввиду, что это будет ячейка на активном листе.

Свойства объектов

Все объекты имеют свойства и методы. Например, объект Range (диапазон ячеек) имеет свойство Value, в котором содержится значение.

Вы можете получать значения из свойств объекта, просто указав путь к нужному свойству. Следующий код выведет значение ячейки A1 на активном листе.

А следующий код присвоит свойству Value новое значение 12345.

Протестируйте эти функции в своем файле.

Кстати, есть свойства объектов, которые доступны только для чтения. Т.е. вы сможете только получить значения этих свойств, но не сможете присвоить им другие значения. Например, свойство Range(«A1»).Address которое содержит адрес ячейки. При попытке записать новое значение в такое свойство будет возникать ошибка.
Или же свойство Worksheets.Count — вы можете только получить количество листов, но не можете изменить количество листов, задав новое свойство Count. Для этого существуют методы объектов.

Методы объектов

В отличие от свойств, которые просто сохраняют или передают значение, методы выполняют какие-либо действия с объектом. Например метод Worksheets.Add создает новый пустой лист в книге. Еще один пример это метод Clear, который позволяет очистить содержимое ячеек. Следующий код очистит данные и форматы из диапазона ячеек A1:C10.

Есть аналогичная функция, которая не удаляет при этом форматирование ячеек, а только очищает их от значений

Методы могут иметь дополнительные аргументы. Например, метод AddComment имеет обязательный аргумент Text, в котором необходимо передать текст комментария к ячейке.

Также можно использовать следующий код для вызова методов. Возможно это более привычная запись, когда по аналогией с функцией Excel мы в скобках передаем аргументы этой функции.

Приемы и лайфхаки

Автоматическое заполнение кода по начальным символам

Часто, особенно на первых порах, вы не запомните точное название всех объектов, но будете помнить их первые символы. В редакторе кода вы можете использовать отобразить список названий и автоматически записать объект по первым символам. Для этого используйте сочетание клавиш Ctrl+ J и увидите список из предложенных вариантов.

Просмотр свойств и методов у объекта

Когда вы будете писать свои программы, то редактор кода VBE будет подсказывать список свойств и методов у объекта. Чтобы отобразить этот список достаточно ввести объект, например, Worksheets и поставить точку, отобразится список свойств и методов. Выберите нужный с помощью мышки или же используйте стрелки. Вы также можете начать писать название свойства и редактор кода подберет подходящее. Когда выбор сделан — нажимайте клавишу Tab.

Явно указывайте тип переменных

Предыдущий лайфхак не будет работать для созданных локальных переменных до тех пор, пока вы явно не укажите их тип. Например, если вы захотели создать переменную MySheet в которой хотите хранить текущий лист. То список свойств и методов у такой переменной вы не увидите. Но стоит добавить строчку кода и явно указать тип переменной:

И подсказки снова заработают.

Быстрый просмотр справки

Все свойства и методы знать невозможно, так как их тысячи. Первое время вы будете активно пользоваться справкой. Советую использовать официальную справку на сайте Microsoft.

Чтобы быстро посмотреть информацию по интересующему вас объекту, свойству или методу просто поставьте курсор на интересующий элемент кода и нажмите клавишу F1. В окне браузера откроется официальная справка по этому элементу.

Поиск по объектной модели

Также вначале пути у вас постоянно будут возникать вопрос «А как называется свойство, которое отвечает за. «. Иногда мы и не заем есть ли такое свойство/метод вообще. Хороший вариант изучения — просмотр объектной модели. Переходите в редактор кода VBA и нажимайте клавишу F2. Откроется окно с поиском по объектной модели. Тут вы найдете все имеющиеся свойства, методы, события и прочие элементы в модели. Просматривайте их, как правило в названии элемента заложена его суть и вы найдете то что искали. А в процессе поиска будете запоминать и другие элементы, которые будут попадаться на глаза.

Давайте разберем на примере. Допустим нам надо защитить лист, но мы не знаем как точно зазывается свойство или метод.

1. Открываем объектную модель клавишей F2.
2. Так как мы хотим защитить лист, то логично предположить, что это метод в объекте Worksheet. Введем его в строку поиска и нажмем бинокль.
3. В результатах поиска выбираем наш объект Worksheet и просматриваем его элементы.
4. Находим метод Protect (Защита).
5. Мы также можем просмотреть описание всех аргументов этого метода
6. Конечно если что-то не понятно, то жмем клавишу F1 и открываем справку по этому методу с подробным описанием каждого аргумента.

На этом данную статью завершим, а в следующих мы более подробно поговорим про самый распространенный объект Excel — объект Range.

Объект книги (Excel)

Объект Workbook входит в коллекцию книг . Коллекция книг содержит все объекты книги, открытые в настоящее время в Microsoft Excel.

Свойство ThisWorkbook объекта Application возвращает книгу, в которой Visual Basic код. В большинстве случаев это то же самое, что и активная книга. Однако если код Visual Basic является частью надстройки, свойство ThisWorkbook не возвращает активную книгу. В этом случае активная книга — это книга, вызываемая надстройка, в то время как свойство ThisWorkbook возвращает надстройку.

Если вы создаете надстройку из кода Visual Basic, следует использовать свойство ThisWorkbook, чтобы квалифицировать любое утверждение, которое должно быть запускаться в книге, которую вы компиляторите в надстройку.

Пример

Чтобы вернуть один объект книги, используйте книги (индекс), индекс которых является именем книги или номером индекса. В следующем примере активируется книга.

Номер индекса обозначает порядок открытия или создания книг. Workbooks(1) является первой созданной книгой и Workbooks(Workbooks.Count) последней созданной. Активация книги не меняет ее номер индекса. Все книги включены в число индексов, даже если они скрыты.

Свойство Name возвращает имя книги. Вы не можете установить имя с помощью этого свойства; Если необходимо изменить имя, используйте метод SaveAs для сохранения книги под другим именем.

В следующем примере в книге с именем Cogs.xls (книга уже должна быть открыта в Microsoft Excel).

Свойство ActiveWorkbook объекта Application возвращает трудовую книжку, которая в настоящее время активна. В следующем примере устанавливается имя автора для активной книги.

В этом примере вкладка таблицы из активной книги передается по электронной почте с помощью указанного адреса электронной почты и темы. Чтобы запустить этот код, активный электронный таблица должна содержать адрес электронной почты в ячейке A1, субъект в ячейке B1 и имя таблицы для отправки в ячейку C1.

События

Методы

Свойства

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.