Excel общая книга с макросами - Word и Excel - помощь в работе с программами

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

Создание и обновление книги «Личные макросы»

На вкладке Разработчик в группе Код нажмите кнопку Запись макроса.
В диалоговом окне Запись макроса введите содержательное имя макроса в поле Имя макроса. Не используйте пробелы в имени.
В поле Сохранить в выберитеЛичная книга макроса.
Нажмите кнопку ОК.
Выполните действия, которые нужно записать.
На вкладке Разработчик в группе Код нажмите кнопку Остановить запись.
Закроем книгу.

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

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

Общий доступ к макросам

Если вы хотите скопировать макрос из личной книги в другую книгу или наоборот, это можно сделать в редакторе Visual Basic(VBE). Вы можете запустить редактор Visual Basic в Excel, нажав ALT+F11. Дополнительные сведения о копировании макросов из одной книги в другую см. в статье Копирование модуля макроса в другую книгу.

Если вы хотите поделиться файлом Personal.xlsB с другими людьми, вы можете скопировать его в папку XLSTART на других компьютерах. В Windows 10, Windows 7 и Windows Vista эта книга будет сохранена в папке C:Usersимя пользователяAppDataLocalMicrosoftExcelXLStart. В Microsoft Windows XP эта книга сохранена в папке C:Documents and Параметрыимя пользователяApplication DataMicrosoftExcelXLStart. Книги в папке XLStart открываются автоматически при Excel, а все коды, сохраненные в личной книге макроса, будут перечислены в диалоговом окну Макрос.

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

В меню Excel выберите пункт Параметры… > ленты & панели инструментов. В категории Настройка ленты в списке Основные вкладки выберите разработчик и нажмите кнопку Сохранить.

Создание и обновление книги «Личные макросы»

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

На вкладке Разработчик нажмите кнопку Запись макроса.
В диалоговом окне Запись макроса введите содержательное имя макроса в поле Имя макроса. Не используйте пробелы в имени.
В поле Сохранить в выберитеЛичная книга макроса.
Нажмите кнопку ОК.
Выполните действия, которые нужно записать.
На вкладке Разработчик щелкните Остановить запись.
Сохраните изменения, закроем книгу и, наконец, закроем Excel.

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

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

Общий доступ к макросам

Если вы хотите скопировать макрос из личной книги в другую книгу или наоборот, это можно сделать в редакторе Visual Basic(VBE). Чтобы запустить редактор Visual Basic в Excel, щелкните Visual Basic на вкладке Разработчик. Дополнительные сведения о копировании макросов из одной книги в другую см. в статье Копирование модуля макроса в другую книгу.

Если вы хотите поделиться файлом Personal.xlsB с другими людьми, вы можете скопировать его в папку Excel на других компьютерах. Эта папка для Mac находится в домашней папке на сайте ~/Library/Containers/com.microsoft. Excel/Data/Library/Application Support/Microsoft/Roaming/Excel/.

Источник

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

Если вы еще не знакомы с макросами в Excel, то я вам даже немного завидую. Ощущение всемогущества и осознание того, что ваш Microsoft Excel можно прокачивать почти до бесконечности, которые придут к вам после знакомства с макросами — приятные чувства.

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

Макрос — это код (несколько строк) на языке Visual Basic, которые заставляют Excel сделать то, что вам нужно: обработать данные, сформировать отчет, скопипастить много однообразных таблиц и т.п. Вопрос — где эти несколько строк кода хранить? Ведь от того, где макрос хранится будет потом зависеть где он сможет (или не сможет) работать.

Если макрос решает небольшую локальную проблему в отдельно взятом файле (например обрабатывает внесенные в конкретный отчет данные особым образом), то логично хранить код внутри этого же файла. Без вопросов.

А если макрос должен быть относительно универсален и нужен в любой книге Excel — как, например, макрос для конвертирования формул в значения? Не копировать же его код на Visual Basic каждый раз в каждую книгу? Кроме того, рано или поздно, почти любой пользователь приходит к мысли, что неплохо было бы сложить все макросы в одну коробку, т.е. иметь их всегда под рукой. И может быть даже запускать не вручную, а сочетаниями клавиш? И вот тут может здорово помочь Личная Книга Макросов (Personal Macro Workbook).

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

На самом деле, Личная Книга Макросов (ЛКМ) — это обычный файл Excel в формате двоичной книги (Personal.xlsb), который автоматически в скрытом режиме открывается одновременно с Microsoft Excel. Т.е. когда вы просто запускаете Excel или открываете любой файл с диска, на самом деле открываются два файла — ваш и Personal.xlsb, но второго мы не видим. Таким образом все макросы, которые хранятся в ЛКМ оказываются доступы для запуска в любой момент, пока открыт Excel.

Если вы еще ни разу не пользовались ЛКМ, то изначально файл Personal.xlsb не существует. Самый легкий способ его создать — это записать рекордером какой-нибудь ненужный бессмысленный макрос, но указать в качестве места для его хранения Личную Книгу — тогда Excel будет вынужден автоматически ее для вас создать. Для этого:

Откройте вкладку Разработчик (Developer). Если вкладки Разработчик не видно, то ее можно включить в настройках через Файл — Параметры — Настройка ленты (Home — Options — Customize the Ribbon).
На вкладке Разработчик нажмите кнопку Запись макроса (Record Macro). В открывшемся окне выберите Личную книгу макросов (Personal Macro Workbook) как место для хранения записанного кода и нажмите OK:
Остановите запись кнопкой Остановить запись (Stop Recording) на вкладке Разработчик (Developer)

Проверить результат можно, нажав на кнопку Visual Basic там же на вкладке Разработчик — в открывшемся окне редактора в левом верхнем углу на панели Project — VBA Project должен появиться наш файл PERSONAL.XLSB. Его ветку которого можно развернуть плюсиком слева, добравшись до Module1, где и хранится код только что записанного нами бессмысленного макроса:

Поздравляю, вы только что создали себе Личную Книгу Макросов! Только не забудьте нажать на кнопку сохранения с дискеткой в левом верхнем углу на панели инструментов.

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

Дальше все просто. Любой нужный вам макрос (т.е. кусок кода, начинающийся на Sub и заканчивающийся End Sub) можно смело копировать и вставлять либо в Module1, либо в отдельный модуль, добавив его предварительно через меню Insert — Module. Хранить все макросы в одном модуле или раскладывать по разным — исключительно вопрос вкуса. Выглядеть это должно примерно так:

Запустить добавленный макрос можно в диалоговом окне, вызываемом с помощью кнопки Макросы (Macros) на вкладке Разработчик:

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

Кроме обычных макросов-процедур в Личной Книге можно хранить и пользовательские макро-функции (UDF = User Defined Function). В отличие от процедур, код функций начинаются с оператора Function или Public Function, а заканчиваются на End Function:

Код необходимо аналогичным образом скопировать в любой модуль книги PERSONAL.XLSB и затем можно будет вызвать функцию обычным образом, как любую стандарную функцию Excel, нажав кнопку f_x в строке формул и выбрав функцию в окне Мастера Функций в категории Определенные пользователем (User Defined):

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

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

Если вы будете использовать Личную Книгу Макросов, то рано или поздно у вас возникнет желание:

поделиться своими накопленными макросами с другими пользователями
скопировать и перенести Личную Книгу на другой компьютер
сделать ее резервную копию

Для этого нужно будет найти файл PERSONAL.XLSB на диске вашего компьютера. По умолчанию, этот файл хранится в специальной папке автозапуска Excel, которая называется XLSTART. Так что все, что нужно — это добраться до этой папки на нашем ПК. И вот тут возникает небольшая сложность, потому что местоположение этой папки зависит от версии Windows и Office и может различаться. Обычно это один из следующих вариантов:

C:Program FilesMicrosoft OfficeOffice12XLSTART
C:Documents and SettingsComputerApplication DataMicrosoftExcelXLSTART
C:Usersимя-вашей-учетной-записиAppDataRoamingMicrosoftExcelXLSTART

Как вариант, можно спросить о положении этой папки сам Excel с помощью VBA. Для этого в редакторе Visual Basic (кнопка Visual Basic на вкладке Разработчик) нужно открыть окно Immediate сочетанием клавиш Ctrl+G, ввести туда команду ? Application.StartupPath и нажать на Enter:

Полученный путь можно скопировать и вставить в верхнюю строку окна Проводника в Windows и нажать Enter — и мы увидим папку с нашим файлом Личной Книги Макросов:

P.S.

И несколько практических нюансов вдогон:

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

Ссылки по теме

Что такое макросы, как их использовать в работе
Полезности для VBA-программиста
Тренинг «Программирование макросов на VBA в Microsoft Excel»

Источник

Содержание

1 Как сохранить макрос в личную книгу макросов
- 1.1 Как создать Личную Книгу Макросов
- 1.2 Как использовать Личную Книгу Макросов
- 1.3 Где хранится Личная Книга Макросов
- 1.4 P.S.
- 1.5 Ссылки по теме

Большинство пользователей Excel знают, как создать и использовать макрос внутри файла одной рабочей книги. В случаи, когда необходимо использовать тот же макрос в других файлах рабочих книг, тогда можно сохранить его в личной книге макросов. У нее всегда одно название – Personal.xlsb. Она всегда открывается при запуске программы Excel, только скрыто. Данная книга не является доступной по умолчанию в Excel, поэтому ее нужно сначала подключить.

Как сохранить макрос в личную книгу макросов

Чтобы создать и схоронить код в личной книге макросов:

Выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Запись макроса».
В появившемся диалоговом окне «Запись макроса», из выпадающего списка «Сохранить в:» выберите опцию «Личная книга макросов». И нажмите на кнопку OK.
Теперь выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Остановить запись».
Откройте редактор Visual Basic: «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или нажмите комбинацию горячих клавиш ALT+F11. В окне «Project-VBAProject», в дереве проектов появиться доступная еще одна книга Personal.xlsb. Кликните на «плюсик» слева на против этой книги, чтобы раскрыть проект книги Personal.xlsb. А после двойным щелчком отройте ее Module1.
В результате откроется окно кода модуля с зарегистрированным макросом. Удалите его код и введите код своего макроса. Выберите инструмент в редакторе макросов: «File»-«Save Personal.xlsb», а потом закройте редактор Visual Basic.

Теперь у вас подключена скрытая книга для хранения макросов, к которым можно получить доступ из любой другой рабочей книги. Личная книга макросов где находится находиться в папке автозагрузки файлов Excel – XLSTART: C:Documents and SettingsUser_NameAppDataRoamingMicrosoftExcelXLSTARTPersonal.xlsb

Примечание. XLSTART – это папка для автозагрузки файлов вместе с запуском программы Excel. Если сохранить файл в данную папку, то он будет открываться вместе с программой Excel. Для версий старше 2007 путь к папке автозагрузки будет следующим: C:Program FilesMicrosoft OfficeOffice12Xlstart.

Если вам нужно записать в нее новый макрос просто откройте редактор, а потом откройте модуль книги Personal.xlsb. Уже записанные в нее макросы удалять не нужно. Они не будут между собой конфликтовать если соблюдать одно простое правило – в одном модуле нельзя хранить макросы с одинаковыми именами.

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

Откройте вкладку Разработчик (Developer). Если вкладки Разработчик не видно, то ее можно включить в настройках через Файл — Параметры — Настройка ленты (Home — Options — Customize the Ribbon).
На вкладке Разработчик нажмите кнопку Запись макроса (Record Macro). В открывшемся окне выберите Личную книгу макросов (Personal Macro Workbook) как место для хранения записанного кода и нажмите OK:
Остановите запись кнопкой Остановить запись (Stop Recording) на вкладке Разработчик (Developer)

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

Код необходимо аналогичным образом скопировать в любой модуль книги PERSONAL.XLSB и затем можно будет вызвать функцию обычным образом, как любую стандарную функцию Excel, нажав кнопку fx в строке формул и выбрав функцию в окне Мастера Функций в категории Определенные пользователем (User Defined):

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

Если вы будете использовать Личную Книгу Макросов, то рано или поздно у вас возникнет желание:

поделиться своими накопленными макросами с другими пользователями
скопировать и перенести Личную Книгу на другой компьютер
сделать ее резервную копию

C:Program FilesMicrosoft OfficeOffice12XLSTART
C:Documents and SettingsComputerApplication DataMicrosoftExcelXLSTART
C:Usersимя-вашей-учетной-записиAppDataRoamingMicrosoftExcelXLSTART

P.S.

И несколько практических нюансов вдогон:

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

Ссылки по теме

Что такое макросы, как их использовать в работе
Полезности для VBA-программиста
Тренинг «Программирование макросов на VBA в Microsoft Excel»

Источник

Создание, расположение, удаление и добавление Личной книги макросов (PERSONAL.XLSB), предназначенной в Excel для записи, хранения и вызова процедур.

Личная книга макросов

Личная (персональная) книга макросов – это скрытая служебная книга Excel с именем PERSONAL.XLSB, предназначенная для записи и хранения программного кода (функций и подпрограмм) и предоставления доступа к нему из всех открытых рабочих книг.

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

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

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

Подпрограммы, размещенные в Личной книге макросов, можно просмотреть в окне «Список макросов», открыв его из любой рабочей книги Excel. Они будут перечислены с приставкой «PERSONAL.XLSB!». Функции в этом окне не отображаются.

Пользовательские функции, размещенные в Личной книге макросов, доступны для просмотра, выбора и вставки их в ячейки рабочего листа в Мастере функций:

Список пользовательских функций в Личной книге макросов

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

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

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

Создание

Изначально Личная книга макросов в приложении Excel отсутствует. Чтобы проверить, есть ли она в вашей программе (не создал ли ее кто-то ранее), откройте любую рабочую книгу и перейдите в редактор VBA, нажав сочетание клавиш «Alt+F11» (в этом сочетании используется левая клавиша Alt). Открыть редактор VBA можно и пройдя по пунктам меню:

Excel 2007-2016: «Разработчик» –> «Visual Basic» (смотрите, как отобразить вкладку «Разработчик», которая изначально скрыта);

Excel 2000-2003: «Сервис» –> «Макрос» –> «Редактор Visual Basic».

Откроется редактор VBA:

Проводник в редакторе VBA

Если в проводнике сверху вы видите строку «VBAProject (PERSONAL.XLSB)», значит Личная книга макросов на вашем компьютере уже есть.

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

Сохранение макроса в Личной книге макросов

После записи макроса, сохраненного в Личную книгу макросов, эта книга будет создана и появится в проводнике редактора VBA.

Расположение

Место расположения Личной книги макросов на конкретном компьютере, по словам разработчиков, зависит только от версии операционной системы. О его зависимости от версии Excel в их статье ничего не сказано.

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

Результаты поиска папки XLSTART в проводнике

Личная книга макросов в папке XLSTART

Удаление

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

В принципе, наличие неиспользуемой Персональной книги макросов ничем не мешает. Но если не вы ее создавали и вас беспокоит наличие в ней чужого кода, можете удалить из нее в редакторе VBA все стандартные модули и очистить от процедур модули книги (по умолчанию «ЭтаКнига») и листа (по умолчанию «Лист1»).

Добавление

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

В этом случае можно попытаться найти с помощью поиска в проводнике папку XLSTART и, если она будет найдена, вставить в нее пустой файл PERSONAL.XLSB. В данном случае «пустой» означает «без пользовательских процедур (макросов)».

Скачать архив с пустым файлом PERSONAL.XLSB (создан в Excel 2016).

После добавления файла PERSONAL.XLSB в папку XLSTART и перезагрузки приложения Excel, Личная книга макросов появится в проводнике редактора VBA. Перезагрузка Excel заключается в закрытии всех открытых рабочих книг и последующем открытии любого файла этой программы.

Источник

Как сохранить макрос в личную книгу макросов

Чтобы создать и схоронить код в личной книге макросов:

Выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Запись макроса».

В появившемся диалоговом окне «Запись макроса», из выпадающего списка «Сохранить в:» выберите опцию «Личная книга макросов». И нажмите на кнопку OK.

Теперь выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Остановить запись».

Откройте редактор Visual Basic: «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или нажмите комбинацию горячих клавиш ALT+F11. В окне «Project-VBAProject», в дереве проектов появиться доступная еще одна книга Personal.xlsb. Кликните на «плюсик» слева на против этой книги, чтобы раскрыть проект книги Personal.xlsb. А после двойным щелчком отройте ее Module1.

В результате откроется окно кода модуля с зарегистрированным макросом. Удалите его код и введите код своего макроса. Выберите инструмент в редакторе макросов: «File»-«Save Personal.xlsb», а потом закройте редактор Visual Basic.

Источник

In Excel, you can make it so all of your macros can be easily accessed by any Excel workbook.

To do this we need to create what is called a «personal macro workbook» and then save it. All of the macros that we want to use in Excel will be stored within this personal macro workbook and will then be accessible by any Excel file.

Steps to Make any Macro Available in All Excel Files

Open an Excel file and then go to record a dummy macro, recording this dummy macro is what will create the «personal macro workbook» that we need in order to store the macros.
To record a macro go to the Developer tab, if that is visible, or simply look to the bottom left of the Excel window. From there, click the Record Macro button:
On the screen that appears, make sure to select Personal Macro Workbook from the Store macro in: drop down box and then hit the OK button. Nothing else matters here because we just need to record a simple macro, anything really.
Select any cell in the worksheet and then just click the Stop Recording macro button, which is in the exact same location as the Record Macro button in step 2.
Now hit Alt + F11 on the keyboard so we can go to the VBA/Macro editor window. You will now see the PERSONAL.XLSB file appear in the top left pane of the window.
All you have to do now is to add Modules and Macros to this file like you would to any normal Excel file. Double-click Module 1 and we see the macro that we just recorded:

As you can see, this new PERSONAL.XLSB file behaves just like a regular file in the VBA window. This is where you will store any macros that you want to be able to access from all Excel files.

Notes

The personal macro workbook file does NOT travel with your Excel files when you send them; this PERSONAL.XLSB file only remains on your computer for you to use. So, if you send a workbook to another person, they will not be able to access the same macros that you have unless you also put those macros in the workbook you sent.

You must follow the above steps to create the personal macro workbook but, once you have created it, you can access it from any workbook on your computer by simply going to the VBA/Macro editor window (Alt + F11). As such, once it is created, adding macros to this new file is the same as adding it to any other Excel file — open any workbook, go to the VBA window, add a module to the PERSONAL.XLSB file and then add a macro.

The sample file for this tutorial is empty because, remember, you cannot send the personal macro workbook file with Excel files.

Excel VBA Course — From Beginner to Expert

200+ Video Lessons
50+ Hours of Instruction
200+ Excel Guides

Become a master of VBA and Macros in Excel and learn how to automate all of your tasks in Excel with this online course. (No VBA experience required.)

View Course

Subscribe for Weekly Tutorials

BONUS: subscribe now to download our Top Tutorials Ebook!

Excel VBA Course — From Beginner to Expert

200+ Video Lessons

50+ Hours of Video

200+ Excel Guides

Become a master of VBA and Macros in Excel and learn how to automate all of your tasks in Excel with this online course. (No VBA experience required.)

View Course

Источник

Сохранение макроса

Смотрите также именем копии REPEAT_: «Книга1.xls» sExp = регулярно скидывать в & IIf(Right(sFileName, Len(sExpansion))Alex_ST ИМХО, InputBox и через InputBox илиFilename:=»трам-пам-пам.xls», _ рабочий файл (имена-то Или открыть вЕсли вам нужно записать «РАЗРАБОТЧИК»-«Код»-«Visual Basic». ИлиОстановить запись. ее текст может макрос Excel предложитПримечание: FileName = Application.GetSaveAsFilename(InitialFileName:=sFullFilePath, Right(FileName, Len(FileName) - разные директории на <> sExpansion, sExpansion,

: К стати, не окно задания пути ещё как-то…FileFormat:=xlNormal, _ совпадают!!!). редакторе Personal и в нее новый нажмите комбинацию горячих.Чтобы при запуске Excel содержать неточности и

Сохранение макроса в текущей книге

два варианта:Мы стараемся как _ FileFilter:=»Excel Files InStrRev(FileName, «.») + общем ресурсе. «») подскажите «на вскидку» сохранения файла -В чём хитрость-то?Password:=»», _или туда вставить модуль? макрос просто откройте клавиш ALT+F11. ВПри закрытии Excel в автоматически открывались книги, грамматические ошибки. ДляСохранить в виде книги можно оперативнее обеспечивать

(*» & sExp 1) ‘ расширениеДостало постоянно выбиратьIf sFileName = как к имени
это «две большиеThe_PristWriteResPassword:=»», _- сказать Ёкселюz_korch

редактор, а потом окне «Project-VBAProject», в конечном итоге будет

выполните указанные ниже нас важно, чтобы с поддержкой макросов
вас актуальными справочными & «), *» файла вместе с куда и какой ThisWorkbook.FullName Then файла при сохранении разницы» …: А кто мешает
ReadOnlyRecommended:=True, _ «Сохранить как…» и: Может я не

Создание и сохранение макросов в личной книге

откройте модуль книги дереве проектов появиться предложено сохранить изменения действия. эта статья была (XLSM-файл), выбрав материалами на вашем & sExp & точкой (например, «.xls») файл сохранять…MsgBox «Нельзя сохранить добавить перед расширениемThe_Prist перед этим вывести

support.office.com

Запись макроса для открытия определенных книг при запуске Excel

CreateBackup:=False указать с каким знаю как в Personal.xlsb. Уже записанные доступная еще одна в личной книгеОткройте вкладку вам полезна. ПросимНет языке. Эта страница «, All Files FileName = Left(FileName,Переделал макрос Save_Copy_As файл под имененм суффикс — дату: Я Вам уже диалог?End Sub именем, куда и редакторе открыть Personal?Когда в нее макросы книга Personal.xlsb. Кликните

макросов. Нажмите кнопкуРазработчик вас уделить пару. переведена автоматически, поэтому (*.*),*.*», _ Title:=»Сохранение Len(FileName) — Len(sExp)) так, что путь открытого файла!», vbCritical и время сохранения? целый пример накатал

Dim sFileName Asне подходят, т.к. с какими паролями в VBA открываю удалять не нужно. на «плюсик» слева «Да», чтобы макрос

и нажмите кнопку секунд и сообщить,Сохранить в виде книги ее текст может копии файла») ‘задать & sSuff & последнего сохранения копии + vbYesNo, «Ошибка»
(ну, например, Имя_моего_рабочего_файла(01-06-2010 — чем он String, sExpansion As это как раз сохранить файл. А View->Project, то вижу Они не будут
на против этой запускался при каждомЗапись макроса

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

sExp ‘ например, запоминается в самомGoTo BEGIN_ 14-30).xls не устраивает? Выбор

String и есть описанный потом закрыть тот среди объектов только между собой конфликтовать
книги, чтобы раскрыть запуске Excel.. вам, с помощью выбрав
грамматические ошибки. Для имя копии файла «Книга1 [2012.02.06 15-24’39»].xls»
файле в коллекцииEnd IfThe_Prist через диалог, сохраняетBEGIN_: мною выше второй сетевой, видный для
Лист1,2,3,и ЭтаКнига… все. если соблюдать одно проект книги Personal.xlsb.
Каждый раз при запускеВ поле кнопок внизу страницы.Да нас важно, чтобы в окне выбора On Error Resume NamesThisWorkbook.Password = «1»:SetAttr: SetAttr ThisWorkbook.FullName, vbReadOnly куда укажешь иsFileName = ThisWorkbook.Name случай… всех, файл и
Если Insert->Module?, то простое правило – А после двойным Excel автоматически будутИмя макроса
Для удобства также. эта статья была If VarType(FileName) = Next sDirPath =Два дня поюзал ThisWorkbook.FullName, vbReadOnlyAlex_ST

с паролем, даsExpansion = Right(sFileName,tolikt открыть свой рабочий.

support.office.com

Личная книга макросов в Excel и как ее использовать

тоже предлагает сохранить в одном модуле щелчком отройте ее открываться книги, включенныевведите приводим ссылку наЧтобы сохранить макрос как вам полезна. Просим vbBoolean Then Exit .Names(sPath_in_Names).Value ‘ считать — понравилось!ThisWorkbook.SaveCopyAs sFileName: К сожалению, свойство еще и предупреждает, Len(sFileName) — InStrRev(sFileName,: .SaveCopyAs чем не Это тоже не только в «Книга1-ЭтаКнига(Code)» нельзя хранить макросы Module1. в макрос.Auto_Open

Как сохранить макрос в личную книгу макросов

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

Sub ‘ если
из коллекции .NamesSub Save_Copy_As() ‘—————————————————————————————ThisWorkbook.Password = «»:SetAttr vbReadOnly при SaveCopyAs если такой файл «.») + 1) устраивает?
слишком удобно, т.к.kaa
с одинаковыми именами.В результате откроется окноБольшинство пользователей Excel знают,. языке) . макросов, секунд и сообщить, нажали «Отмена», то значение, ранее сохраненное ‘ Procedure : ThisWorkbook.FullName, vbNormal задать не удаётся… есть.sFileName = Application.GetSaveAsFilenameThe_Prist
требует много «мышкодвижений».: в экселе Сервис-Параметрыz_korch кода модуля с как создать иВ спискеПредположим, что вы хотитещелкните помогла ли она FileName = False,

под именем sPath_in_Names

Save_Copy_As ‘ AuthorHugoА нельзя лиAlex_STIf sFileName =: ThisWorkbook.Password = «1»А недавно поставил вкладка «Общие» там: Добрый день! Спасибо зарегистрированным макросом. Удалите использовать макрос внутриСохранить в

записать макрос дляНет вам, с помощью если «Сохранить» - If Err Then : Alex_ST ‘: его задать для: The_Prist, вы с «False» Then ExitThisWorkbook.SaveCopyAs ‘полный путь, себе прогу «PDF-Exchange» есть поле «каталог

за замечательный сайт!Много его код и файла одной рабочейвыберите пункт открытия книг, которые. кнопок внизу страницы. полный путь к .Names.Add sPath_in_Names, .Path Topic_HEADER : КакAlex_ST, про дату в уже созданного файла-копии? такой скоростью создаёте Sub включая расширение файла.

exceltable.com

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

 и увидел там автозагрузки». указывате там полезного нашла,но с введите код своего книги. В случаи,Личная книга макросов используете каждый день,В окне Для удобства также файлу вместе с & «»: sDirPath макросом сохранить копию названии есть вThe_Prist свои ответы покаsFileName = sFileName ДОЛЖЕН БЫТЬ В возможность «Сохранить копию путь. этой проблемой не макроса. Выберите инструмент когда необходимо использовать. при запуске Excel.Сохранить как приводим ссылку на его именем If = .Names(sPath_in_Names).Value ‘ текущего файла? ‘ приёмах:: Алекс, ну чтоже я ввожу свои,

 & IIf(Right(sFileName, Len(sExpansion)) ДРУГОЙ ПАПКЕ, дабы как …».в эту папку могу справиться: подскажите,пожалуйста,как в редакторе макросов:

 тот же макросПосле этого макрос будет Вы можете создатьв раскрывающемся списке оригинал (на английском FileName = .FullName если считать не Topic_URL : http://www.planetaexcel.ru/forum.php?thread_id=16506Alex_ST ВЫ так? Я что я их

 <> sExpansion, sExpansion, не было конфликтаОказалось очень удобно, кладете файл с правильно сохранить макрос, «File»-«Save Personal.xlsb», а

в других файлах доступен при каждом макроса «Авто_открыть», чтобы
Тип файла языке) . Then MsgBox «Здесь

planetaexcel.ru

Как макросом сохранить копию текущего файла?

 удалось, значит путь ‘ DateTime :: Спасибо. Разобрался. ж еще в
просто не успеваю «») при совпадении имен. т.к. при этом макросом чтобы он работал потом закройте редактор рабочих книг, тогда
открытии Excel. сделать это. Вы
выберитеСоздать макрос в Excel нельзя сохранить файл ранее не задавался 08.02.12, 12:00 ‘Только чтобы всё начале писал - читать…If sFileName =ThisWorkbook.Password = «» текущий открытый файлпри открытии экселя
не только с
Visual Basic. можно сохранить егоЧтобы было проще вспомнить, также можете запускайтеКнига Excel с поддержкой можно, запустив средство под таким именем!», и он для Purpose : Сохранение правильно работало нужно «Вы сначала задаетеЩа буду разбираться… ThisWorkbook.FullName Then
Alex_ST не закрывается, а этот файл будет «Эта Книга», а
в личной книге что делает макрос, макрос автоматически при макросов записи макросов или 16, «Ошибка»: GoTo первого раза задаётся копии активного файла не атрибуты файла книге пароль, затем
Беру тайм-аут наMsgBox «Нельзя сохранить: Метод SaveCopyAs требует просто его копия самостоятельно открываться. для любых файлов
Теперь у вас подключена макросов. У нее введите его описание открытии книги..
с помощью редактора REPEAT_ sDirPath = равным ActiveWorkbook.Path sDirPath

 ‘ Notes : через
сохраняете, затем убираете
осмысливание.
файл под имененм
непосредственного указания пути
сохраняется в указанном
Alex_ST
xls. На форуме
скрытая книга для
всегда одно название
в поле
Прежде чем начать, убедитесь,Нажмите кнопку Visual Basic для Left(FileName, InStrRev(FileName, «»)) = Mid(sDirPath, 3,

 Путь сохранения копийSetAttr ActiveWorkbook.FullName, vbReadOnly пароль.

Скорее всего до открытого файла!», vbCritical
и имени сохранения, месте с указанными: По работе на нашла,что надо сохранять хранения макросов, к – Personal.xlsb. Она
Описание

 что на лентеСохранить приложений (VBA). После ‘ путь к Len(sDirPath) — 3) хранится в коллекции устанавливать, т.к. этоТоже самое можно завтра, т.к.у нас + vbYesNo, «Ошибка»

 а хотелось бы свойствами (всё это своём компе создаю/модернизирую/заполняю в Личной книге которым можно получить всегда открывается при. Можно также оставить доступна вкладка

. создания макроса следует папке сохранения копий
‘ убрать из .Names книги (в ничего не даёт сделать и с на работе сегодняGoTo BEGIN_ по вызову макроса
задаётся в стандартных

 разные таблицы. макросов, но когда доступ из любой запуске программы Excel,

это поле пустым.РазработчикЧтобы макросы были доступны
сохранить его для
без имени файла
считанного значения в именованном диапазоне) ‘————————————————————————————— , а
другими атрибутами(только чтение
отмечается «День Корпорации»End If выйти на стандартное

виндовых окнах).По окончании какого-нибудь пытаюсь это сделать другой рабочей книги.
только скрыто. ДаннаяНажмите кнопку
. Если ее нет, при каждом запуске возможности повторного использования .Names(sPath_in_Names).Value = sDirPath
начале «= и
Const sPath_in_Names =
ActiveWorkbook.Password = «ххх»
через GetAttr например).»
(ввиду кризиса -

ThisWorkbook.Password = «1» окно выбора путиВот и подумал, этапа КОПИЮ таблицы выдает ошибку:»Личн.кн.макр.в папке Личная книга макросов книга не является

ОК выполните указанные ниже Excel, создайте их в текущей или

 ‘ запомнить выбранный в конце « «Path4SaveCopyAs» ‘ имя задаёт пароль НАТ.е. сначала Вы на рабочих местах,ThisWorkbook.SaveCopyAs sFileName и имени сохранения а вдруг гуру надо выкладывать на

 автозагрузки должна оставаться где находится находиться доступной по умолчанию. действия. в книге «Personal.xlsb». в других книгах. в диалоге путь sDirPath = sDirPath элемента коллекции .Names, ОТКРЫТИЕ

 сохраняемой книги присваиваете а не наThisWorkbook.Password = «» … форума посоветуют как общий диск с открытой-Запись невозможна»- Как в папке автозагрузки
в Excel, поэтомуОткройте вкладкуОткройте вкладку
Это скрытая книгаЕсли понадобится использовать макрос в коллекции .Names & IIf(Right(sDirPath, 1) в котором долженНадо вот так: все эти атрибуты, природе), поэтому, прошуThe_PristAlex_ST можно сделать макрос, паролем на изменение это сделать? Проблема

 файлов Excel – ее нужно сначала
ФайлФайл на вашем компьютере, только в той
под именем sPath_in_Names = «», «», храниться путь дляWith ActiveWorkbook

 затем сохраняете, потом пардону, с ответами: Алекс, Вы хоть: Да и к осуществляющий аналогичную вункцию (ну, просто для в том,что записав XLSTART: C:Documents and подключить., выберите пункт

и выберите пункт которая открывается при

 книге, где он bReadOnlyRecommended = .ReadOnlyRecommended «») ‘ на сохранения копий файла
.WritePassword = «1» убираете. немного торможу, хотя

 посмотрели, что я тому же метод в Ёкселе? страховки одних пользователей макрос, я его SettingsUser_NameAppDataRoamingMicrosoftExcelXLSTARTPersonal.xlsbЧтобы создать и схоронитьОткрытьПараметры

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

Dim sSuff$: sSuff.ReadOnlyRecommended = TrueDim sFileName As пока ещё вполне предложил? Вы сначала

SaveCopyAs не предполагаетОчевидно, что макрос от действий других…).
правила в VBA,какое-то
Примечание. XLSTART – это
код в личнойи выберите файлы,, а затем —
Для получения сведений
кнопку исходного файла .ReadOnlyRecommended имя было задано

= » [«.SaveCopyAs sFileName String, sExpansion As адекватен, но что
задаете книге пароль, задания опций сохранения
(ну, например, Save_Copy_As)Конечно, можно воспользоваться время он работал, папка для автозагрузки
книге макросов:
с которыми работаете
категорию о выполнении этих
Сохранить
= —(MsgBox(«Рекомендовать открывать в ручную и

 & Format(Now, «yyyy/mm/dd.WritePassword = «»

String будет дальше … затем сохраняете, затем

 (пароль, предложение открыть должен лежать в
стандартными средствами: а потом исчез… файлов вместе сВыберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Запись макроса».
каждый день. ОниНастроить ленту действий см. статьюили
файл только для при этом не hh-mm’ss»») & «]»

.ReadOnlyRecommended = False
BEGIN_:
Alex_ST
убираете пароль.
только для чтения
личной книге макросов
- открыть папку
Теперь, я его

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

. Создание и сохранениеСохранить как чтения?», 36) - верно — без ‘ суффикс кEnd WithsFileName = ThisWorkbook.Name
: The_Prist,спасибо!Тоже самое можно и т.п.)
(Personal.xls)… назначения, скопировать (drag вставляю через редактор Если сохранить файл «Запись макроса», из разных местах. Чтобы
В разделе всех макросов в
так же, как 7) ‘ MsgBox слэша) .Names(sPath_in_Names).Value = имени файла копииЕсли кому-нибудь интересно,sExpansion = Right(sFileName,Всё отлично работает. сделать и сtoliktА вот как & drop’ ом) VBA,он отрабатывает для в данную папку, выпадающего списка «Сохранить выбрать несколько файловНастройка ленты одной книге. при обычном сохранении. Argument 4==vbYesNo 32==vbQuestion, sDirPath ‘ запомнить — дата и то «причёсанный» вариант Len(sFileName) — InStrRev(sFileName, Завтра «дополирую» диалогами другими атрибутами(только чтение: Наверное, я что-то «Сохранить как…», не туда файл, открыть открытого файла, закрываю то он будет в:» выберите опцию в одной папке,в полеПримечание: Но сохранение книги MsgBox Return Values: путь сохранения копий время сохренения копии — в файле. «.») + 1) для задания пассворда через GetAttr например). не понял… закрывая текущего файла? его и поставить Excel,через некот.время открываю открываться вместе с «Личная книга макросов». щелкните каждый изОсновные вкладкиМы стараемся как с макросами происходит vbYes=6, vbNo=7 .SaveCopyAs в коллекции .Names файла Dim FileName,Alex_STsFileName = Application.GetSaveAsFilename …Alex_STТ.к. думал, чтоAlex_ST пароль на открытие… Excel, а макроса программой Excel. Для И нажмите на них, удерживая нажатойустановите флажок можно оперативнее обеспечивать несколько иначе, поскольку FileName .ReadOnlyRecommended = под именем sPath_in_Names sExp$, sDirPath$, sFullFilePath$,: Приходится у себяIf sFileName =А как бы: Я, конечно, естественно, пользователь класса Alex_ST: Сразу оговариваю: Но уж больно там нет!?… версий старше 2007 кнопку OK. клавишу SHIFT.Разработчик вас актуальными справочными необходимо использовать специальный bReadOnlyRecommended ‘ восстановить sFullFilePath = sDirPath sNewPath$ Dim bReadOnlyRecommended на компе вести «False» Then Exit при сохранении копии смогу сделать InputBox уж сумеет как-томакросы типа это не удобно,Guest путь к папкеТеперь выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«ОстановитьОткройте вкладку. материалами на вашем формат файла «с параметры исходного файла & FileName ‘ As Boolean With несколько учётных файлов, Sub задавать «Рекомендовать открытие для задания пути в макросе подогнатьSub Save_File_As() т.к. надо после: А если выбрать автозагрузки будет следующим: запись».РазработчикНажмите кнопку языке. Эта страница поддержкой макросов». Поэтому End With End полный путь сохранения ActiveWorkbook FileName = а их копииsFileName = sFileName только для чтения?» для SaveCopyAs, но, под себя SaveCopyAsActiveWorkbook.SaveAs _ копирования закрыть свой «Все открытые книги»? C:Program FilesMicrosoft OfficeOffice12Xlstart.Откройте редактор Visual Basic:и нажмите кнопкуОК переведена автоматически, поэтому при попытке сохранить Sub вместе с полным

planetaexcel.ru

.Name ‘ например,

Источник

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

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

Откройте вкладку Разработчик (Developer) . Если вкладки Разработчик не видно, то ее можно включить в настройках через Файл — Параметры — Настройка ленты (Home — Options — Customize the Ribbon) .
На вкладке Разработчик нажмите кнопку Запись макроса (Record Macro) . В открывшемся окне выберите Личную книгу макросов (Personal Macro Workbook) как место для хранения записанного кода и нажмите OK:

Остановите запись кнопкой Остановить запись (Stop Recording) на вкладке Разработчик (Developer)

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

Дальше все просто. Любой нужный вам макрос (т.е. кусок кода, начинающийся на Sub и заканчивающийся End Sub ) можно смело копировать и вставлять либо в Module1, либо в отдельный модуль, добавив его предварительно через меню Insert — Module. Хранить все макросы в одном модуле или раскладывать по разным — исключительно вопрос вкуса. Выглядеть это должно примерно так:

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

Кроме обычных макросов-процедур в Личной Книге можно хранить и пользовательские макро-функции (UDF = User Defined Function) . В отличие от процедур, код функций начинаются с оператора Function или Public Function , а заканчиваются на End Function :

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

Если вы будете использовать Личную Книгу Макросов, то рано или поздно у вас возникнет желание:

поделиться своими накопленными макросами с другими пользователями
скопировать и перенести Личную Книгу на другой компьютер
сделать ее резервную копию

C:Program FilesMicrosoft OfficeOffice12XLSTART
C:Documents and SettingsComputerApplication DataMicrosoftExcelXLSTART
C:Users имя-вашей-учетной-записи AppDataRoamingMicrosoftExcelXLSTART

И несколько практических нюансов вдогон:

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

Создание и сохранение всех макросов в одной книге

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

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

Это отличается от поведения Excel по умолчанию, в котором макрос работает только в той книге, в которой она находится.

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

Создание и обновление личной книги макросов

На вкладке Разработчик в группе Код нажмите кнопку Запись макроса.

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

В диалоговом окне сохранить макрос в выберите пункт Личная книга макросов.

Нажмите кнопку ОК.

Выполните действия, которые нужно записать.

На вкладке Разработчик в группе Код нажмите кнопку Остановить запись.

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

Нажмите кнопку сохранить , чтобы сохранить книгу.

Общий доступ к макросам

Если вы хотите скопировать макросы из личной книги в другую книгу или наоборот, это можно сделать в редакторе Visual Basic (VBE). Чтобы запустить редактор Visual Basic в Excel, нажмите клавиши ALT + F11. Дополнительные сведения о копировании макросов из одной книги в другую см. в статье Копирование модуля макроса в другую книгу.

Если вы хотите поделиться своим файлом личных файлов с другими пользователями, вы можете скопировать его в папку XLSTART на других компьютерах. В Windows 10, Windows 7 и Windows Vista эта книга сохраняется в папке c appdatalocaltemp. намеаппдаталокалмикрософтексцелкслстарт. В Microsoft Windows XP эта книга сохраняется в папке «C:Documents and Settings Намеаппликатион Датамикрософтексцелкслстарт». Книги, хранящиеся в папке XLStart, открываются автоматически при запуске Excel, а код, хранящийся в личной книге макросов, будет отображаться в диалоговом окне макрос.

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

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

Создание и обновление личной книги макросов

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

На вкладке Разработчик нажмите кнопку Запись макроса.

В диалоговом окне сохранить макрос в выберите пункт Личная книга макросов.

Нажмите кнопку ОК.

Выполните действия, которые нужно записать.

На вкладке Разработчик щелкните Остановить запись.

Сохраните изменения, закройте книгу, а затем закройте Excel.

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

Нажмите кнопку сохранить , чтобы сохранить книгу.

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

Общий доступ к макросам

Если вы хотите скопировать макросы из личной книги в другую книгу или наоборот, это можно сделать в редакторе Visual Basic (VBE). Чтобы запустить редактор Visual Basic в Excel, на вкладке разработчик нажмите кнопку Visual Basic . Дополнительные сведения о копировании макросов из одной книги в другую см. в статье Копирование модуля макроса в другую книгу.

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

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community, попросить помощи в сообществе Answers community, а также предложить новую функцию или улучшение на веб-сайте Excel User Voice.

Личная книга макросов в Excel и как ее использовать

Как сохранить макрос в личную книгу макросов

Чтобы создать и схоронить код в личной книге макросов:

Выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Запись макроса».
В появившемся диалоговом окне «Запись макроса», из выпадающего списка «Сохранить в:» выберите опцию «Личная книга макросов». И нажмите на кнопку OK.
Теперь выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Остановить запись».
Откройте редактор Visual Basic: «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или нажмите комбинацию горячих клавиш ALT+F11. В окне «Project-VBAProject», в дереве проектов появиться доступная еще одна книга Personal.xlsb. Кликните на «плюсик» слева на против этой книги, чтобы раскрыть проект книги Personal.xlsb. А после двойным щелчком отройте ее Module1.
В результате откроется окно кода модуля с зарегистрированным макросом. Удалите его код и введите код своего макроса. Выберите инструмент в редакторе макросов: «File»-«Save Personal.xlsb», а потом закройте редактор Visual Basic.

Excel где хранятся макросы

7 вопросов о макросах

1) Что такое макрос?

Макрос (другие названия: код, программа, подпрограмма, процедура, скрипт) — это набор команд (или одна команда), выполняющих заданные пользователем при написании кода макроса действий. Правильно называть все макросы Процедура, но в разговорном русском закрепилось название Макрос, поэтому мы будем далее все процедуры называть макросами.
2) Зачем нужны макросы?

Макросы используются в двух случаях:
— Если необходимо автоматизировать часто повторяющиеся действия;
— Если задачу невозможно решить обычными средствами Excel.
3) На каком языке программирования пишутся макросы?

До выхода Excel 95 разработчиками использовался язык макросов под названием XLM (Excel Macro). Начиная с версии Excel 95 стал использоваться язык VBA (Visual Basic for Applications). Этот язык используется и по сей день, но в будущем Microsoft планирует заменить его на VSTA (Visual Studio Tools for Applications) — инструментарий расширения функциональности приложений, основанный на Microsoft .NET.

4) В каких программах работают макросы?
Макросы поддерживаются во многих программах пакета MS Office, кроме Excel это например Word, Access, Outlook, PowerPoint и т.д. Кроме офисного пакета, макросы на VBA работают например в программе AutoCad.
5) Безопасно ли использовать макросы?

Нет, опасность существует. На VBA можно написать вредоносный код. Однако на практике такое встречается настолько редко, что такой возможностью можно пренебречь. Если Вы не уверены в том, как именно работает макрос, то лучше его не запускать. Для того что бы макросы не запускались сами, в MS Office по умолчанию макросы отключены. Если вы пишете макрос сами и не ставите целью испортить свой копьютер — то да, безопасно.

6) Где можно писать макросы?

Для написания макросов используется редактор VBE (Visual Basic Editor). Он встроен в программу Excel по умолчанию. Попасть в него можно несколькими способами. Например, нажав сочетание клавиш Alt+F11 или кликнув правой кнопкой по ярлыку любого листа и в появившемся контекстном меню выбрать пункт Исходный текст.

7) Где хранятся макросы?

Текст макроса хранится в специальном контейнере, называемым модуль. Модули бывают четырёх типов:
Стандартный модуль (или просто модуль);
Модуль листа;
Модуль книги;
Модуль класса.

Excel где хранятся макросы

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

Что это вообще такое.

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

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

В общем суть в том, что однажды PERSONAL.XLSB у вас появляется на экране Visual Basic for Application и многие терпят его там годами, не зная, как от него избавиться.

Как его удалить навсегда?

Надеюсь, что у вас Windows 7 . В Windows XP и Windows 8 всё тоже должно быть похоже.

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

После этого в вашем профиле появится папка AppData . Ваш профиль обычно располагается по пути C:ПользователиИмя вашего пользователя или для англоязычной ОС C:UsersИмя вашего пользователя.

Заметьте, что поиск PERSONAL.XLSB не работает, так как Windows не хочет по умолчанию искать в скрытых папках.

Откройте папку AppDataRoamingMicrosoftExcelXLSTART и удалите оттуда PERSONAL.XLSB , предварительно закрыв Excel, так как тот этот файл держит открытым, что препятствует его удалению.

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

Вот теперь вы от него избавились навсегда 🙂

Источник