Запускать макрос при открытии книги excel

Прежде чем начать, убедитесь, что на ленте доступна вкладка Разработчик. Дополнительные сведения см. в статье Отображение вкладки «Разработчик».

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

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

1. Откройте вкладку Разработчик и щелкните элемент Visual Basic.

   

2. В обозревателе VBA Project слева разверните папку VBA Project книги, а затем дважды щелкните модуль ThisWorkbook. Если вы не видите обозреватель Project, перейдите в > Project проводникаили нажмите CTRL+R.

   

3. В окне модуля, которое открывается справа, вставьте следующий код:

   Private Sub Workbook_Open()
   
   ' Put your code here
   
   End Sub

4. В конце и подмножите записи в процедуру Sub.

   Закройте редактор Visual Basic (вам не нужно ничего сохранять).

5. Сохраните книгу как книгу Excel Macro-Enabled (XLSM)и закроем ее.

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

Прежде чем начать, убедитесь, что на ленте доступна вкладка Разработчик. Для этого:

1. В меню выберите пункт Параметры Excel >… >ленты & панели инструментов.

2. В категории Настройка ленты в списке Основные вкладки выберите вариант Разработчик.

3. Нажмите кнопку Сохранить.

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

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

1. Откройте вкладку Разработчик и щелкните элемент Visual Basic.

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

3. В окне модуля, которое открывается справа, вставьте следующий код:

   Private Sub Workbook_Open()
   
   ' Put your code here
   
   End Sub

4. В конце и подмножите записи в процедуру Sub.

   Закройте редактор Visual Basic (вам не нужно ничего сохранять).

5. Сохраните книгу как книгу Excel Macro-Enabled (XLSM)и закроем ее.

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

Если вы часто пользуетесь макросами в MS Excel, то уверен, у вас не раз возникал вопрос: «Как быстро запустить написанный макрос?». Можно привязать горячую клавишу, например. Так же мы расскажем, как сделать так, чтобы макрос был доступен из любого файла Excel и можно было сделать быстрый запуск макроса в Excel.

Если вы не знаете о чем идет речь, то советую прочитать специальную статью. Если коротко, макрос — это список действий, записанных при помощи «языка» VBA. Очень удобно записать такую последовательность, если вы часто выполняете одни и те же операции (их можно записать специальным инструментом — макрорекордером). Макрос будет выполнять их при нажатии одной кнопки.

Где посмотреть полившийся макрос и запустить его?

Самый удобный способ работы с макросами и связанными инструментами — вывести вкладку Разработчик на панель инструментов

Включается он несложно — заходим в левую, верхнюю кнопку Параметры Excel — раздел Основные — в правом окне ставим галочку Показывать вкладку Разработчик на ленте

Как мы видим, здесь большой выбор инструментов, от возможности зайти в Visual Basic до вставки объекта, например, кнопки.

Запуск макроса можно осуществить нажатием второй кнопки слева Макросы.

Появится окно для выбора макроса

Выбираем нужный — жмем выполнить.

Запуск макроса в Excel. Горячие клавиши

Открытие окна выбора макроса можно осуществить через горячую клавишу Alt + F8. А зайти в окно редактирования макроса сочетанием Alt + F11.

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

В данным случае ctrl + Ё.

Автозапуск макроса при открытии книги

Зайдите в окно редактирования макроса Alt + F11 или нажмите кнопку Просмотр кода на панели Разработчик.

У вас откроется VBA. Ваш макрос (особенно записанный макрорекордером) будет храниться в отдельном отделе модулей в левой панели.

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

Копируйте тело макроса из правого окна (между Sub и End Sub)

Выберите в левой панели ЭтаКнига (двойным левым кликом).

В верхних панелях выбираем Workbook и признак включения макроса Open (открытие книги получается).

Копированный текст макроса из модуля вставляем между Private Sub и End Sub. Сохраняем. Закрываем VBA.

Готово! Запуск макроса будет происходить при открытии книги.

Не забудьте сохранить книгу с поддержкой макросов (xlsm или xlsb).

Дополнительные возможности запуска макроса при действии с книгой

Как вы могли увидеть при выборе Workbook в правом окне выбора доступно множество вариантов. Ниже команды, которые запускают макрос при действии с книгой:

• Activate — при активации книги (при переходе из другого окна в эту книгу);
• Deactivate — при переходе в другую книгу;
• BeforeClose — перед закрытием книги;
• BeforePrint — перед печатью книги;
• BeforeSave —  при сохранении книги;
• NewSheet — при создании нового листа книги.

Дополнительные возможности запуска макроса при действии с листом

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

• SheetActivate — при активации листа книги;
• SheetDeactivate — при переходе на другой лист книги;
• SheetCalculate — при пересчете формул на листе;
• SheetBeforeDoubleClick — перед двойным кликом мыши;
• SheetBeforeRightClick — перед кликом правой кнопкой мыши;
• SheetChange — при изменение на листе

Если необходимо запустить макрос при изменении в ячейке — подробная инструкция есть в этой статье.

Готов ответить на вопросы в комментариях!

Добавлю к ответу igumnov.

Код необходимо вставить в модуль ЭтаКнига (Для Word — ThisDocument)

Alt+F11 — открываем проект VBA.
Слева — окно проекта, модуль находится там, в папке Microsoft Excel Objects

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

Если модуля нет, его нужно создать: в редакторе VBA вкладка Insert-Module

Если окна проекта нет, открыть — меню Viev-Project Explorer (Ctrl+R)

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

Поменять уровень безопасности вручную:

Для Excel-2003: меню Сервис-Макрос-Безопасность

Для Excel-2010 глубже: закладка ленты Файл-Параметры-Центр_управления_безопасностью-Параметры_центра_управления_безопасностью-Параметры_макросов

Программно менять уровень безопасности можно, но перед этим нужно установить на компьютер скрипт, который «умеет» менять уровень безопасности. Такие программы есть в свободном доступе.

Автоматический запуск макроса при открытии книги

​Смотрите также​​Мне всегда хватает​ 2)​ Обычно это один​. В отличие от​ файл​ и Personal.xlsb, но​ таблиц и т.п.​ не видно -​Insert — UserForm​Private Sub Workbook_Open()​ модуль листа, но​чтобы создать настраиваемый шаблон​перейдите в папку, в​ выберите пункт Сохранить​ быть отменено, поэтому​ЭтаКнига​Примечание:​ одного из двух​пробовал прописать макрорекордером​ из следующих вариантов:​

​ процедур, код функций​PERSONAL.XLSB​ второго мы не​ Вопрос — где​ отобразите соответствующее окно​. Появится пустая серая​If Sheets(«Лист1»).[a1] <>​ ничего не сортируется.​ книги или листа,​

​ которой хранится книга​

​ как > Компьютер,​ убедитесь, что для​. Если вы​​ Мы стараемся как можно​​ проверенных способов​ открытие книги -​C:Program FilesMicrosoft OfficeOffice12XLSTART​

​ начинаются с оператора​. Его ветку которого​ видим. Таким образом​

​ эти несколько строк​​ через меню​ оконная форма будущей​ 8 Then MsgBox​Sub Worksheet_Open()​ введите любое имя;​ (XLSTART или альтернативная​ нажмите Обзор и​ тестирования кода на​ не видите окно​ оперативнее обеспечивать вас​

1. ​KuklP​​ тоже не помогло​​C:Documents and SettingsComputerApplication DataMicrosoftExcelXLSTART​​Function​​ можно развернуть плюсиком​

   

2. ​ все макросы, которые​​ кода хранить? Ведь​​View — Project Explorer​​ заставки. Добавим на​​ «Это последнее предупреждение!»​Range(«J1»).Select​нажмите Сохранить;​​ папка), выберите книгу​​ выберите папку XLSTART.​ пустую книгу или​ проекта, можно перейти​ актуальными справочными материалами​​: Где он там​​ ((((​​C:Usersимя-вашей-учетной-записиAppDataRoamingMicrosoftExcelXLSTART​​или​​ слева, добравшись до​​ хранятся в ЛКМ​

   

3. ​ от того, где​) и добавьте в​ нее изображение при​

   ​Sheets("Лист1").[a1] = 8​
​Selection.AutoFilter Field:=1, Criteria1:="НА​выберите Файл > Закрыть.​
​ и нажмите Удалить.​

4. ​В чистой установке выпуска​ копию существующей книги.​​ в​​ на вашем языке.​​ такое сказал? И​​Может кто нибудь​

   ​Как вариант, можно спросить​​Public Function​​Module1​ оказываются доступы для​

5. ​ макрос хранится будет​​ него следующий код:​ помощи панели инструментов​​ActiveWorkbook.Save​

​ ПЕЧАТЬ»​Автоматический макрос (например, Auto_Open),​​Вы можете сохранить часто​​ Windows Vista или​

​ Если код не​режим​ Эта страница переведена​​ что по-твоему означает​​ в курсе можно​ о положении этой​

1. ​, а заканчиваются на​​, где и хранится​​ запуска в любой​​ потом зависеть где​​Private Sub Workbook_Open()​​Toolbox​​End Sub​

2. ​End Sub​​ записанный в книгу,​​ используемые настройки книги​​ более новой версии​​ вас устраивают, закройте​​>​​ автоматически, поэтому ее​

3. ​ строка:​​ ли так сделать​​ папки сам Excel​

​End Function​ код только что​ момент, пока открыт​

​ он сможет (или​​ UserForm1.Show End Sub​(если у вас​Лист1 скрыть​Как правильно сделать?​ которая открывается при​ в шаблоне и​ путь к папке​ книгу без сохранения​Окно проекта​ текст может содержать​

1. ​cn.Open sCon​​ ?​​ с помощью VBA.​​:​​ записанного нами бессмысленного​

2. ​ Excel.​​ не сможет) работать.​​И, наконец, вставьте обычный​​ ее не видно,​​_Boroda_​Извините, в макросах​ запуске Excel, запускается​​ автоматически открывать его​​ XLSTART обычно выглядит​

3. ​ изменений.​или нажмите клавиши​ неточности и грамматические​

   ​?​
​???? очень нужна​ Для этого в​
​Код необходимо аналогичным образом​

4. ​ макроса:​Если вы еще ни​​Если макрос решает небольшую​​ модуль (​​ то зайдите в​​: Проще всего ставить​

   ​ я новичок.​​ сразу же при​​ каждый раз при​ так:​

5. ​Откройте вкладку​​Ctrl + R​ ошибки. Для нас​​KuklP​

​ помощь ….​ редакторе Visual Basic​​ скопировать в любой​​Поздравляю, вы только что​

support.office.com

Автоматическое открытие определенной книги или шаблона при запуске Excel

​ разу не пользовались​ локальную проблему в​Insert — Module​ меню​ на листе метку.​webley​ ее открытии.​ запуске Excel.​Office 2013 — C:Пользователи(Имя​Разработчик​.​ важно, чтобы эта​

​: Кросс: http://www.excel-vba.ru/forum/index.php?topic=2225.0​Serge_007​ (кнопка​ модуль книги PERSONAL.XLSB​ создали себе Личную​ ЛКМ, то изначально​ отдельно взятом файле​) и скопируйте туда​

• ​View — Toolbox​ А лучше наоборот​: Лист не открывают,​Чтобы макрос не запустился,​Чтобы использовать шаблон книги,​ пользователя)AppDataMicrosoftExcelXLSTART;​
  ​и щелкните элемент​В открывшейся в правой​

​ статья была вам​AndreTM​

• ​: У Вас слишком​Visual Basic​ и затем можно​ Книгу Макросов! Только​
  ​ файл Personal.xlsb не​ (например обрабатывает внесенные​
  ​ это:​):​ — изначально метка​

​ а активируют :)​​ удерживайте клавишу SHIFT​ создайте книгу, которая​Office 2013 C2R — C:Пользователи(Имя​Visual Basic​ части окна модуля​ полезна. Просим вас​:​ много знаков вопроса​

Использование альтернативной папки автозагрузки

​на вкладке​ будет вызвать функцию​ не забудьте нажать​ существует. Самый легкий​

1. ​ в конкретный отчет​Private Sub KillTheForm()​

2. ​Нажмите кнопку​ есть, макрос при​Private Sub Worksheet_Activate()​ во время запуска​ содержит листы, стандартный​

​ пользователя)AppDataMicrosoftExcelXLSTART.​​.​ вставьте следующий код:​ уделить пару секунд​Цитата​ и скобок​Разработчик​ обычным образом, как​ на кнопку сохранения​ способ его создать​ данные особым образом),​ Unload UserForm1 End​Image​ запуске проверяет ее​webley​ Excel.​ текст (например, заголовки​Если вы выполнили обновление​

Отмена открытия конкретной книги при запуске Excel

​В левой части​Private Sub Workbook_Open()​ и сообщить, помогла​

• ​(KuklP)200?’200px’:»+(this.scrollHeight+5)+’px’);»>Где он там​А макрорекордер пишет​) нужно открыть окно​ любую стандарную функцию​ с дискеткой в​

Автоматическое открытие шаблона книги при запуске Excel

​ — это записать​ то логично хранить​ Sub​ и растяните на форме​ наличие, если есть,​: Сразу файл не​

​Alex4​ страниц, столбцов и​ с другой версии​Проекта VBA​’ Put your​ ли она вам,​ такое сказал? И​ открытие:​Immediate​ Excel, нажав кнопку​

​ левом верхнем углу​ рекордером какой-нибудь ненужный​

• ​ код внутри этого​

• ​Все. Можно закрывать редактор​ прямоугольник — в​ то выполняется и​

• ​ посмотрел — поскольку​

• ​: Цель: автоматически обновлять​ сток), формулы, макросы,​

• ​ Windows, путь может​разверните папку​ code here​ с помощью кнопок​ что по-твоему означает​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub OpenFile()​

• ​сочетанием клавиш​f​ на панели инструментов.​

• ​ бессмысленный макрос, но​ же файла. Без​ Visual Basic, сохранять​

• ​ него будет помещено​

• ​ стирает эту метку.​ лист у вас​

• ​ фильтр в таблице​ стили и другое​

​ выглядеть так:​

1. ​Проекта VBA​End Sub​

2. ​ внизу страницы. Для​ строка: cn.Open sCon​

3. ​Workbooks.Open Filename:=»C:путьКнига2.xls»​Ctrl+G​x​Дальше все просто. Любой​

4. ​ указать в качестве​ вопросов.​

   • ​ файл и пробовать​ фоновое изображение. Затем​ Все последующие разы​

   • ​ один, скорее всего​ при открытии страницы​ форматирование, которое вы​

   • ​Office 2013 — C:Program​для книги, а​Вставьте код записанные в​

5. ​ удобства также приводим​

6. ​В вопросе ТС​

Отмена запуска автоматического макроса при запуске Excel

​End Sub​, ввести туда команду​в строке формул​ нужный вам макрос​ места для его​А если макрос должен​

• ​ закрыть-открыть книгу…​ на панели инструментов​ макрос проверяет метку​ имеется ввиду открытие​

support.office.com

Автозапуск макроса при открытии книги

​Имеется макрос на​​ собираетесь постоянно использовать​ FilesMicrosoft OfficeOffice 15XLSTART​ затем дважды щелкните​
​ подпрограмме между строками​ ссылку на оригинал​
​ фразой «закрытая книга»​Цитата​? Application.StartupPath​
​ и выбрав функцию​ (т.е. кусок кода,​ хранения Личную Книгу​ быть относительно универсален​
​При открытии книги Excel​Properties​ — ее нет​

​ книги.​​ применение фильтра​ в шаблоне.​Office 2013 C2R —​

​ модуль​​Sub​ (на английском языке).​ подразумевалось, скорее всего,​(ek09)200?’200px’:»+(this.scrollHeight+5)+’px’);»>нужно поработать макросом​и нажать на​ в окне​ начинающийся на​ — тогда Excel​ и нужен в​ выполняет процедуру​(если у вас​ — и не​В модуль книги:​Задача: запустить макрос​
​Настройки, которые можно сохранить​ C:Program FilesMicrosoft Office​
​ЭтаКнига​и​Макрос, записанный может потребоваться​ «не открытая в​ в зарытой книгеЭто​

planetaexcel.ru

Выполнение макроса при открытии (активации) листа

​:​​в категории​и заканчивающийся​
​ ее для вас​

​ — как, например,​​из модуля​ то выберите в​Можно в коде​Sheets(1).Activate​ книги​форматирование ячеек и листа;​
​Примечание:​
​В открывшейся в правой​
​.​
​ открытии конкретной книги.​
​ с этой точки​ что бы что-то​
​Полученный путь можно скопировать​

​Определенные пользователем (User Defined)​​End Sub​
​ создать. Для этого:​
​ макрос для конвертирования​ЭтаКнига​ меню​ макроса после выполнения​
​Range(«J1»).Select​Погуглилил — получилось​форматирование страниц и настройки​  Если книга или​ части окна модуля​Закройте​ Пример использует следующую​ зрения, доступ через​ сделать с закрытой​ и вставить в​:​) можно смело копировать​
​Откройте вкладку​ формул в значения?​. Эта процедура отображает​
​View — Properties​ стереть этот же​

planetaexcel.ru

Выполнение макроса один раз при открытии книги excel (Макросы/Sub)

​Selection.AutoFilter Field:=1, Criteria1:=»НА​​ вот что, но​
​ области печати для​ шаблон содержит макрос,​ вставьте следующий код:​Редактор Visual Basic​ процедуру для показано,​
​ DAO/ADO/ODBC — это​ книгой — её​
​ верхнюю строку окна​

​Примеры таких функций можно​​ и вставлять либо​​Разработчик (Developer)​
​ Не копировать же​ на экране нашу​) задайте выберите файл​
​ код​
​ ПЕЧАТЬ"​
​ это не запускается​​ каждого листа;​

​ который автоматически запускается​​Private Sub Workbook_Open()​(не нужно ничего​ как это работает.​ возможность изменить данные.​ надо открыть. Правда​ Проводника в Windows​ в больших количествах​ в​. Если вкладки​ его код на​ форму-заставку. При отображении​ картинки в поле​Можно ставить метку,​End Sub​
​ автоматически. Как запустить?​стили ячеек;​ при открытии книги,​’ Put your​
​ сохранять).​ Можно также запустить​ Как мы помним,​ сделать это можно​
​ и нажать​ найти в интернете​
​Module1​

​Разработчик​​ Visual Basic каждый​ формы запускается процедура​

excelworld.ru

Заставка при открытии книги Excel

​Picture​ но не на​openid.mail.ru/mail/vlad3622340​Sub Workbook_Open() Sheets(«таблица»).Range(«B5»).AutoFilter​количество и тип страниц​

​ например Auto_Open, макрос​ code here​Сохранение книги в виде​ макрос автоматически при​

Шаг 1. Создаем экранную форму

​ наличие на компьютере-клиенте​ и незаметно, но​Enter​ или здесь же​, либо в отдельный​​не видно, то​ раз в каждую​UserForm_Activate​:​ листе, а в​​: Спасибо большое, Webley!​ Field:=2, Criteria1:=»<>0″ End​​ в книге;​​ будет по умолчанию​​End Sub​​книги Excel с поддержкой​ запуске Excel.​ самого Excel при​​ всё-таки придётся​​- и мы​ на сайте (сумма​ модуль, добавив его​ ее можно включить​ книгу? Кроме того,​​, которая с задержкой​​Возможно, придется немного изменить​ свойствах, например.​Sub Worksheet_Activate() работает!​ SubСпасибо!​​защищенные и скрытые области​​ запускаться при запуске​

​Вставьте код записанные в​​ макросов (* xlsm)​​Windows macOS ​ этом совершенно необязательно​Hugo​ увидим папку с​ прописью, приблизительный текстовый​​ предварительно через меню​​ в настройках через​ рано или поздно,​ в 5 секунд​ размер формы, чтобы​​Можно создавать специальный​​А я где-то​LVL​​ книги. Вы можете​​ Excel.​

​ подпрограмме между строками​и закройте ее.​Прежде чем начать, убедитесь,​Hugo​: Сергей, R Dmitry​ нашим файлом Личной​​ поиск, ВПР 2.0,​​Insert — Module​​Файл — Параметры -​

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

​При открытии книги, код,​ что отображаются вкладки​

Шаг 2. Добавляем управляющий код

​: Сергей, ну в​ сказал, что можно​ Книги Макросов:​​ конвертация кириллицы в​​. Хранить все макросы​ Настройка ленты (Home​

​ приходит к мысли,​KillTheForm​ Чтобы написать на​Можно …​

​ и с этим​​ в модуль книги​​ и строки, чтобы​ запускаемую книгу в​и​ добавленных на процедуры​ «​​ общем конечно «не​​Тут: http://www.planetaexcel.ru/forum….D=28979 в​И несколько практических нюансов​

​ транслит и т.п.)​ в одном модуле​

​ — Options -​ что неплохо было​​, который убирает форму​​ форме текст, можно​Dan116​

​ мучился.​ (ЭтаКнига)​ предотвратить изменения в​

​ другом месте, выполните​End Sub​Workbook_Open​Разработчик​

Как это работает?

​ притрагиваясь» к файлу​ конце.​​ вдогон:​​Если вы будете использовать​​ или раскладывать по​​ Customize the Ribbon)​ бы сложить все​ с экрана.​ использовать элемент управления​​: всем спасибо за​​Это в примере​alexthegreat​ ячейках;​​ следующее:​​.​будет выполняться автоматически.​

planetaexcel.ru

Как использовать Личную Книгу Макросов

​» на ленте.​ в нём ничего​Вообще вся тема​при использовании Личной Книги​ Личную Книгу Макросов,​ разным — исключительно​.​ макросы в одну​Если вы еще не​Label​ идеи!​ лист один, а​: заходите в ВБА,​

​повторяемый текст, например подписи​выберите Файл > Параметры​Закройте​Прежде чем начать, убедитесь,​ Подробнее читайте вкладку​ изменить нельзя. Ну​ в тему, без​ Макросов Excel будет​

​ то рано или​ вопрос вкуса. Выглядеть​На вкладке​ коробку, т.е. иметь​ знакомы с макросами​с панели​Этот прием позволит Вам​ в оригинале 6.​ там слева будут​ страниц, столбцов и​ Excel > Дополнительно;​Редактор Visual Basic​ что отображаются вкладки​ «Разработчик».​ разве что если​ воды.​ запускаться чуть медленнее,​

​ поздно у вас​ это должно примерно​Разработчик​ их всегда под​ в Excel, то​Toolbox.​ выводить на экран​ После открытия книги​ объекты, смотрите Объект​ строк;​

​в разделе Общие в​(не нужно ничего​ «​Чтобы использовать в приведенном​ только изменив адресацию​Serge_007​ особенно на слабых​ возникнет желание:​ так:​нажмите кнопку​ рукой. И может​ я вам даже​Ну, и наконец, выделив​ окно-заставку при открытии​ другие листы изменяются​ ЭТА КНИГА, щелкаете​данные, графические элементы, формулы,​ поле Каталог автозагрузки​ сохранять).​Разработчик​ ниже примере, откройте​ диска​: Я Диму конечно​ ПК​поделиться своими накопленными макросами​Запустить добавленный макрос можно​Запись макроса (Record Macro)​ быть даже запускать​

Как создать Личную Книгу Макросов

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

​ что проверил -​ не верю​ Книгу от информационного​скопировать и перенести Личную​ вызываемом с помощью​ выберите Личную книгу​ сочетаниями клавиш? И​ того, что ваш​ в строке заголовка,​Заставка появляется сразу после​ И вот после​ наверху будут 2​настройки проверки данных;​ автозагрузки.​ макросов (* xlsm)​В меню выберите команду​

1. ​ Код VBA не может​​ работают оба варианта​​Меня Сергей KukIp​​ мусора, старых и​​ Книгу на другой​ кнопки​ макросов (Personal Macro​​ вот тут может​ Microsoft Excel можно​ используя свойство​ открытия файла и​​ его открытия (АКТИВАЦИИ),​
2. ​ выпадающих списка слева​​макросы, гиперссылки и элементы​​Примечание:​​и закройте ее.​​Excel​ быть отменено, поэтому​ SQL/ADO. И добавляет,​ на программерс убедил​ ненужных макросов и​ компьютер​​Макросы (Macros)​​ Workbook) как место​
   
3. ​ здорово помочь Личная​​ прокачивать почти до​​Caption​​ автоматически исчезает через​

​ должно сразу отобразиться​ выбираете workbook справа​​ ActiveX для форм;​​  Так как Excel​При открытии книги, код,​​>​​ убедитесь, что для​ и обновляет.​ (к сожалению не​ т.п.​​сделать ее резервную копию​​на вкладке​ для хранения записанного​​ Книга Макросов (Personal​​ бесконечности, которые придут​в панели​ несколько секунд.​​ то, что нужно​​ Open и туда​параметры вычислений в книге​ будет пытаться открыть​ добавленных на процедуры​

​предпочтения…​ тестирования кода на​ek09​ могу найти ссылку,​у корпоративных пользователей бывают​Для этого нужно будет​Разработчик​ кода и нажмите​

Как использовать Личную Книгу Макросов

​ Macro Workbook).​ к вам после​Properties​Откройте редактор Visual Basic​​ печатать.​​ вставляете свой макрос​​ и представлений окон.​​ каждый файл в​Workbook_Open​>​​ пустую книгу или​​: Спасибо за помощь​ это давно было)​ иногда сложности с​​ найти файл PERSONAL.XLSB​​:​OK​На самом деле,​ знакомства с макросами​:​ — в старых​Так что нужно​

​ БЕЗ НАЗВАНИЯ без​Чтобы создать шаблон:​ альтернативной папке автозагрузки,​будет выполняться автоматически.​​ленты и панели инструментов​​ копию существующей книги.​​ всем ! Какая​​Для того что​

​ использованием Личной Книги,​ на диске вашего​​В этом же окне,​​:​Личная Книга Макросов​ — приятные чувства.​В итоге у вас должно​ версиях Excel это​ именно в модуль​ строки sub и​выберите Файл > Сохранить​

​ укажите папку, в​Если вы постоянно используете​.​​ Если код не​ ​ то интересная штука​ бы прочитать последовательность​​ т.к. это файл​ компьютера. По умолчанию,​ нажав кнопку​​Остановите запись кнопкой​​(ЛКМ)​​Однако, эта статья для​​ получиться нечто подобное:​​ можно сделать через​​ листа.​

​ end sub​ как;​ которой находятся только​ приложение Excel для​В категории​ вас устраивают, закройте​ получается …​ байт необходимо открыть​​ в системной скрытой​_{​ этот файл хранится​}​Параметры (Options)​Остановить запись (Stop Recording)​- это обычный​​ тех, кто уже​​Щелкните правой кнопкой мыши​​ меню​​Вопрос решён. Ещё​

​Если правильно понял​в поле Тип файла​ те файлы, которые​ работы с одной​настроить ленту​ книгу без сохранения​в открытой книге​ контейнер их содержащий​ папке​

Где хранится Личная Книга Макросов

​ в специальной папке​, можно задать сочетание​на вкладке​ файл Excel в​ «познал мощь» и​

• ​ по форме и​Сервис — Макрос -​
• ​ раз благодарю!​ Ваш вопрос​ выберите пункт Шаблон;​
• ​ можно открыть с​

​ и той же​в списке​ изменений.​ ссылка на ячейку​ (т.е. файл). На​ek09​ автозапуска Excel, которая​ клавиш для быстрого​Разработчик (Developer)​ формате двоичной книги​ начал использовать макросы​ выберите​ Редактор Visual Basic​Dan116​А вообще приложите​в поле Сохранить в​ помощью Excel. Если​ книгой или создаете​Основные вкладки​Откройте вкладку​ в закрытой книге​

• ​ кластере HDD -​
• ​: Здравствуйте​
• ​ называется XLSTART. Так​

​ запуска макроса с​Проверить результат можно, нажав​ (​ (чужие или написанные​View Code​ (Tools — Macro​: Добрый день.​​ файл и Вам​​ укажите папку, в​​ книга с одним​​ новые книги на​​установите флажок​​Разработчик​​ обновляется а макросом​​ это просто последовательность​​как макросом книги​​ что все, что​​ клавиатуры. Будьте внимательны:​​ на кнопку​

​Personal.xlsb​ самостоятельно — не​.В открывшийся модуль формы​ — Visual Basic​Стоит задача, выполнить​​ сделают, потом посмотрите​​ которую нужно сохранить​ и тем же​ основе одного шаблона,​Разработчик​

P.S.

​и щелкните элемент​ нет ))))​

• ​ байт, не имеющая​ 1 открыть закрытую​ нужно — это​ сочетания клавиш для​Visual Basic​
• ​), который автоматически в​ важно) в своей​ добавьте такой код:​ Editor)​ макрос один раз​
• ​ как сделали… думаю​ шаблон;​ именем находится и​ настройте Excel таким​.​Visual Basic​

planetaexcel.ru

как макросом книги 1 открыть закрытую книгу 2 Excel ??????? (Макросы Sub)

​Serge_007​​ привязки к конкретному​
​ книгу 2 Excel​ добраться до этой​ макросов различают раскладку​там же на​
​ скрытом режиме открывается​ повседневной работе.​Private Sub UserForm_Activate()​, а в новых​ при открытии книги,​ будет проще..​в поле Имя файла​ в папке XLSTART,​
​ образом, чтобы ваша​Нажмите кнопку​.​: Она обновляется только​
​ файлу. Как-то так…​ ???????​ папки на нашем​ (русская или английская)​
​ вкладке​ одновременно с Microsoft​

​Макрос — это код​​ Application.OnTime Now +​ кнопкой​ при последующих открытиях​
​openid.mail.ru/mail/vlad3622340​ сделайте следующее:​
​ и в альтернативной​
​ книга или шаблон​
​Сохранить​

​В левой части​​ в том случае,​Hugo​В идеале нужно​ ПК. И вот​ и регистр.​Разработчик​ Excel. Т.е. когда​ (несколько строк) на​ TimeValue(«00:00:05»), «KillTheForm» End​Visual Basic​

​ макрос не выполнять.​​: Доброго дня всем​чтобы создать шаблон книги​
​ папке автозагрузки, будет​ открывались при его​
​.​Проекта VBA​ если Вы ОТКРЫЛИ​

​: Я сам не​​ поработать макросом в​ тут возникает небольшая​Кроме обычных макросов-процедур в​
​- в открывшемся​ вы просто запускаете​ языке Visual Basic,​ Sub​на вкладке​
​Как можно реализовать​ обитателям Планеты Excel!​ по умолчанию, введите​ открываться файл из​ запуске.​Чтобы использовать в приведенном​разверните папку​ закрытую книгу и​ проверял — и​ зарытой книге а​

​ сложность, потому что​​ Личной Книге можно​ окне редактора в​ Excel или открываете​ которые заставляют Excel​Откройте модуль​Разработчик (Developer)​
​ наиболее простым способом?​Подскажите пожалуйста, как​ Книга;​

​ папки XLSTART.​​Чтобы открывать одну и​ ниже примере, откройте​Проекта VBA​ внесли в неё​
​ в теме не​
​ у меня почему​

​ местоположение этой папки​​ хранить и​

​ левом верхнем углу​​ любой файл с​​ сделать то, что​​ЭтаКнига​и создайте новую​Спасибо!​ запустить код макроса​
​чтобы создать шаблон листа​Чтобы книга не открывалась​ ту же книгу​ новую книгу.​для книги, а​ изменения, после чего​ отписались как решилось…​ то макрос книги​ зависит от версии​пользовательские макро-функции​ на панели​ диска, на самом​ вам нужно: обработать​

​в левом верхнем​​ форму, используя команду​Nic70y​ при открытии листа?​ по умолчанию, введите​ автоматически при запуске​ при запуске Excel,​Важно:​ затем дважды щелкните​
​ она опять стала​ Так что не​ 1 не работает​ Windows и Office​(UDF = User Defined​

​Project — VBA Project​​ деле открываются два​ данные, сформировать отчет,​ углу (если ее​ меню​
​:​Вставляю это в​ Лист;​ Excel:​ в меню Файл​

​ Код VBA не может​​ модуль​ закрытой​ знаю.​ в закрытой книге​ и может различаться.​ Function)​должен появиться наш​ файла — ваш​

excelworld.ru

​ скопипастить много однообразных​

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

Запускать код VBA при закрытии или открытии книги

---

Запускать код VBA при закрытии или открытии книги

1. Включите книгу, нажмите Alt + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. Двойной клик ThisWorkbook в проекте — VBAProject панель, чтобы открыть ThisWorkbook (Код) окно.

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

3. Затем скопируйте свой собственный код без первой и последней строки и вставьте между Private Sub Workbook_Open() и End Sub как показано ниже.

4. Затем нажмите Сохраните кнопку, чтобы сохранить код, в появившемся диалоговом окне напоминания нажмите Нет.

5 Тогда Сохранить как появится диалоговое окно, сохраните файл как Excel Macro-Enabled Workbook и выберите папку для размещения файла.

6. Нажмите Сохраните кнопка. Теперь код будет работать, пока рабочая книга открыта.

Если вы хотите запускать код при закрытии книги каждый раз, выберите Деактивировать из правого раскрывающегося списка в Code окно и скопируйте код, который вы будете запускать, и вставьте между Private Sub Workbook_Deactivate() и End Sub.

---

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

• Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
• Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
• Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
• Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
• Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
• Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
• Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
• Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
• Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

---

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

• Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
• Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
• Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

Комментарии (1)

Оценок пока нет. Оцените первым!

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

ikki Пользователь Сообщений: 9709 Регистрация: 22.12.2012	файл с макросом — в папку XLSTART   сам макрос — в процедуру Workbook_Open на лист макросов Эта книга фрилансер Excel, VBA — контакты в профиле «Совершенствоваться не обязательно. Выживание — дело добровольное.» Э.Деминг

	Не получается так.     Книга, которую создают такие приложения, не записана на диск еще. Потому код из Personal.xls не выполняется когда создается такой сеанс EXCEL…

ikki Пользователь Сообщений: 9709 Регистрация: 22.12.2012	гм?..   честно говоря, не пробовал, нужды пока нет.   но, чисто теоретически, Экс должен открывать все файлы из папки XLStart при любом запуске.     пс. про Personal.xls я вообще не говорил. это то же самое? фрилансер Excel, VBA — контакты в профиле «Совершенствоваться не обязательно. Выживание — дело добровольное.» Э.Деминг

	Может кто-нибудь знает как обработать «УПАВШИЕ» в EXCEL данные из другого приложения с помощью макросов?

Alex_ST Пользователь Сообщений: 2746 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри

Вы что, хотите сказать, что при открытии Ёкселя, когда автоматом создаётся ещё не сохраненная нигде пустая Книга1, у вас не открывается, лежащий в папке XLSTART файл Personal.xls и не отрабатываются его события?   Что-то с трудом верится…   Ну, если даже почему-то вдруг и не срабатывает обработчик события Workbook_Open, расположенный в модуле книги файла Personal.xls, то попробуйте использовать вместо него обработчик события Auto_Open в стандартном модуле. С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!) <#0>

	ИМЕННО ТАК, ПОПРОБУЙТЕ САМИ.   Макрос с именем «auto_open» будет выполняться при каждом открытии книги, содержащей макрос, вручную.

ran Пользователь Сообщений: 7091 Регистрация: 21.12.2012	Тоже засомневался и проверил.   Если при закрытом Экселе передать из файнридера файл в эксел, создается новая книга, и в редакторе VB — только один проект. Персонал.xls у меня нет, но надстройки не подключаются.

может быть, я чего-то не понимаю, охота разобраться, т.к., хоть до сих пор не использовал такую возможность, но сейчас, благодаря этому форуму, кажется, нашёл реальное применение в своей работе.   так вот. как я понимаю, Personal.xls — это обычный файл Excel. Но если он называется именно так (в любой версии) и расположен в папке XLStart, то он служит т.н. «личной книгой макросов» — т.е. открывается автоматически при запуске Excel и макросы, находящиеся в нём, будут доступны в любой книге.   если же в вашем варианте такой файл не открывается, тогда, наверное, есть разница между запуском Excel’я и созданием нового объекта Excel’я в другом приложении? т.е. тогда Excel как бы «не запускается».   перечитал… сумбурно немножко… но по-другому что-то не получается выразиться

Serge Пользователь Сообщений: 11308 Регистрация: 01.01.1970	При выгрузке из 1С не происходит события открытия (запуска) Экса.   Вы об этом?

Alex_ST Пользователь Сообщений: 2746 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри

Не поленился, проверил.   Понаставил у себя в Personal.xls MsgBox’ов в Workbook_Open и в Auto_Open …   Сохранил скрин экрана с таблицей Ёкселя в ДжиПег. Распознал в файнридере и велел ему передать распознанный проект в Ёксель.   Нифига не появились MsgBox’ы … Посмотрел в VBE — только этот проект и открыт и больше ничего — ни Персонала, ни одной надстройки…   Даже при уже открытом Ёкселе и объявленном в декларациях модуля книги Personal.xls объекте Application для отлавливания событий в других книгах Private WithEvents App As Application событие App_NewWorkbook при передаче на анализ в Ёксель из файнридера НЕ ВОЗНИКАЕТ!   Тут надо ждать гуру. Может, что посоветуют… С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!) <#0>

слэн Пользователь Сообщений: 5192 Регистрация: 16.01.2013	попробуйте грузить в ворд — там шаблон всегда грузится, а в нем можно макрос запускать

Alex_ST Пользователь Сообщений: 2746 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри

{quote}{login=The_Prist}{date=28.03.2011 10:05}{thema=}{post}…Сторонние приложения запускают Excel типа в безопасном режиме(вроде как с зажатой клавишей Shift). Так что все макросы и надстройки игнорируются {/post}{/quote}   Дмитрий, спасибо за информацию.   На чём бы узелок завязать чтобы вспомнить когда понадобится…?   (борода уже вся в узелках С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!) <#0>

{quote}{login=Mijver}{date=27.03.2011 01:54}{thema=Запуск макроса при любом старте EXCEL}{post}Как запустить макрос при любом старте EXCEL, включая случаи передачи данных из приложений, например, из FineReader распознанный текст. Книга с этими данными не сохранена еще на диске.{/post}{/quote}     КАК Я ПОНЯЛ — НАДО РУКАМИ СОХРАНЯТЬ ФАЙЛ «УПАВШИЙ» ИЗ ПРИЛОЖЕНИЯ, ПОТОМ ЗАСТАВИТЬ ЕГО ИСКАТЬ, ЧТОБЫ ЗАПУСТИЛСЯ МАКРОС… ИЛИ В ПРИЛОЖЕНИИ КОВЫРЯТЬСЯ, ЕСЛИ ОНО ПОЗВОЛИТ…

Hugo Пользователь Сообщений: 23252 Регистрация: 22.12.2012	А может vbs запустить?     Set objExcel = GetObject(, «Excel.Application»)   set ws=objExcel.sheets(1)   msgbox ws.cells(1,1).value

ran Пользователь Сообщений: 7091 Регистрация: 21.12.2012	Из файнридера не грузится.

Mijver: «КАК Я ПОНЯЛ — НАДО РУКАМИ СОХРАНЯТЬ ФАЙЛ «УПАВШИЙ» ИЗ ПРИЛОЖЕНИЯ». И не иначе — вы указываете Абби куда передать распознанное, вызывается соответствующее приложение и в него помещаются данные, как вы с ними согласились — запомнили. Нет, назад в Абби, правите в Абби, и снова передача… Во всяком случае даже по «короткой» дорожке (зависит от версии)- автоматом распознать и передать в XL — требуется сохранять под указанным именем. Или что-то не договаривают…   -96602-

	СПАСИБО ЗА ОБСУЖДЕНИЕ.     Я ХОТЕЛ «НЕ ТЕРЯТЬ ИНИЦИАТИВУ» —     ТАК ЭТО НАЗЫВАЕТСЯ В СИСТЕМАХ РЕАЛЬНОГО ВРЕМЕНИ:     ЕСЛИ ЧЕЛОВЕК НАЖАЛ КНОПКУ, ТО ХОТЕЛОСЬ ИЗ ЭТОГО НАЖАТИЯ ВЫЖАТЬ МАКСИМУМ.     НО ВИНДОУС ТАК УСТРОЕН — ЧТОБЫ ЧЕЛОВЕК СИДЕЛ ОКОЛО НЕГО И НАЖИМАЛ КНОПКИ КАКИЕ НАДО И НЕ НАДО… ЛИШЬ БЫ ПОБОЛЬШЕ

	Не думал, что это может кого-то раздражать. Извините, если что не так. Я думал здесь не буквы читают а мысли.

Юрий М Модератор Сообщений: 60581 Регистрация: 14.09.2012 Контакты см. в профиле	{quote}{login=Mijver}{date=28.03.2011 11:09}{thema=Re: }{post}Я думал здесь не буквы читают а мысли.{/post}{/quote}   Вы ошиблись — здесь помогают по Excel.

ikki Пользователь Сообщений: 9709 Регистрация: 22.12.2012	вот, встретил у Уокенбаха:     переключатель командной строки /automation   Excel запускается без подключения надстроек и шаблонов, а также загрузки файлов из папки Xlstart или любой другой папки автозагрузки. Этот переключатель используется для «чистой начальной загрузки» Excel. фрилансер Excel, VBA — контакты в профиле «Совершенствоваться не обязательно. Выживание — дело добровольное.» Э.Деминг

ZVI Пользователь Сообщений: 4328 Регистрация: 23.12.2012	Из других приложениий Excel, как правило, запускается в режиме автоматизации через CreateObject(«Excel.Application»). При этом создается отдельный объект (класса) Excel без загрузки надстроек, кроме COM-надстроек. То есть, если создать свою COM-надстройку и подключить её к Excel, то такая надстройка, в принципе, позволит контролировать Excel.

dimaqw Пользователь Сообщений: 1 Регистрация: 01.01.1970	#23 28.05.2012 12:50:31 думаю оно. во всяком случая очень нужная вещь:    http://www.excel-vba.ru/chto-umeet-excel/kak-otsledit-sobytienaprimer-vydelenie-yacheek-v-lyuboj-knige/