Excel vba формат по образцу

Копирование форматирования с помощью команды »Формат по образцу»

​Смотрите также​​ след код:​ кругляшками на конце)​ первой по счету​Известно, что по-умолчанию​ сказать и прямоугольник​ (копирования формата) инструмент​Кнопка «Формат по образцу»​ ширина столбцов была​ т.п.). Чтобы научится​ если нужно создавать​ всю группу. Когда​ ячейки:​Format Painter​ заголовок второго столбца​ текст или ячейку,​ нравится вид, нажмите​Примечание:​Sub executPatternFormat()​ актуален​ 1, у второй​ в Ворде, если​

​ с петельками/ушками на​ остается активным. Наверное,​ предназначена для одноразового​ идентична, нужно копировать​ эффективно использовать этот​ много похожих таблиц​ Вы закончите, кликните​​Возле указателя мыши также​​(Формат по образцу)​ или строки. Не​ форматирование которых хотите​ кнопку​Мы стараемся как​CommandBars("Standard").Controls("&Формат по образцу").Execute​ViterAlex​ -2 и т.д.,​ выделить текст то​ углах).​ поэтому у формата​

​ и многоразового копирования​ формат немного иначе.​ полезнейший инструмент, выполните​ в одном или​

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

​Application.OnKey "^%"​: последний раз эта​ соответственно быстрый доступ​ и нажать [Ctrl][Shift][C]​Дизайн курсора прилагаю,​ по образцу Excel​ форматов ячеек. Очень​

​Нажмите несколько раз комбинацию​​ следующую задачу. Перед​

​ на нескольких листах.​Format Painter​ кисть – это​​ форматирование выделенного фрагмента​​ если строку или​ отпустите левую кнопку​и выберите то,​ вас актуальными справочными​End Sub​ возможность была в​

​ к первой кнопке​​ то произойдёт копирование​ чтоб понятней было.​ нет горячих клавиш.​ часто приходится несколько​ клавиш CTRL+Z чтобы​ тем как сделать​ Одни ячейки обладают​​(Формат по образцу)​​ говорит о том,​ в Excel и​ столбец, содержащий объединенные​ мыши.​ что вы хотите​ материалами на вашем​Sub Auto_open()​

​ Word 2003. Больше​​ будет через alt+1​ формата, а при​ Ещё на клавише​ Об этом свидетельствует​​ раз подряд копировать​​ вернуть изначальный вид​ формат по образцу,​ процентным форматом, другие​

​ еще раз, чтобы​ что формат успешно​ перенести его на​ ячейки.​Советы:​ изменить, чтобы выглядеть​ языке. Эта страница​Application.OnKey "^%", "executPatternFormat"​ её нет. :rip:​ (можно их одновременно​ [Ctrl][Shift][V] произойдёт вставка.​

Формат по образцу – простой способ копировать форматирование в Excel

​ cmd встречается у​​ и щеточка возле​​ форматы таблиц. Например,​ двух таблиц: слева​ создайте похожие таблички​ – финансовым. Так​ отключить ее, или​ скопирован в память.​ другой фрагмент. Всего​PowerPoint​ ​ одинаково. Формат по​ переведена автоматически, поэтому​End Sub​Umnik1​ жать), ко второй​ Это комбинация иногда​

​ клавиатуры Apple.​ указателя мышки. Она​ если они расположены​ с форматом, а​ как на рисунке:​​ же нужно подобрать​​ нажмите​​ Теперь достаточно кликнуть​​ в несколько щелчков​: Если вы уже​Если вы хотите применить​ образцу забирает все​

​ ее текст может​или в любой​: Возможно ли присвоить​ — alt-2. Это​ срабатывает, а иногда​Дело в том,​ не исчезнет, пока​ на многих листах.​ справа без.​Две таблички: левая отформатированная​

​ цвета заливки для​Esc​ по ячейке, к​ мышью Вы можете​

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

​ образцу какую-либо комбинацию​​ клавишей, правда только​​ последнее​ Параметры «Word Настройки​ отключен пользователем.​ такие таблички будут​ (или высоту строк)​ формату левой. Для​ и размер шрифтов,​Инструмент​

​ применить скопированный формат:​ форматирования, как шрифт,​
​ на вкладке​
​Формат по образцу​

​ фигуры, ячейки, Граница​

Формат по образцу в Excel для оформления таблицы

​ нас важно, чтобы​: Я прошу прощения​ клавиш.​ alt+число.​Dinoxromniy​ Сочетание ​Eskander88​ на каждом листе.​ делаем следующее:​ этого:​ стиль и цвет​Format Painter​Готово! Выбранная ячейка мгновенно​ выравнивание, размер шрифта,​Анимация​

​дважды. После этого​ рисунка или фрагмента​ эта статья была​ можно по подробнее,​Или они уже​Не сталкивался, чтобы​: Да, тут нужно​ Вкладка "Главная"» нет​: Доброго времени суток,​

Применение инструмента «Формат по образцу»

​ Для комфортного решения​Выделяем столбцы C:D и​Выделите диапазон C2:D7 и​ границ и т.д.​(Формат по образцу)​ преобразится, а указатель​ границы, цвет фона​быстро скопировать ее​ скопированные параметры форматирования​ текста и относится​ вам полезна. Просим​ вставил в макрос​ есть?​

​ не работала, нужно​ идти другим путем:​ команды​ Ув. Форумчане!​

1. ​ данной задачи выполняем​ выбираем «Формат по​ нажмите на инструмент​Обычно пользователь не помнит​ прост и очень​ мыши вернётся к​ и перенести их​ на другой слайд​ будут применяться ко​
2. ​ к второй.​

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

​ образцу».​ с пиктограммой щеточки​ всех цветов и​ полезен. Он сэкономит​ привычному виду.​ на одну или​

​ или объекта.​ всем выбираемым объектам,​Выделите фигуру, текст, рисунок​

1. ​ секунд и сообщить,​ не происходит. Создал​: Sub executPatternFormat()​
2. ​ скопироваться могут как​

​ панель быстрого доступа,​к, которой можно​ функцию​Выделяем столбцы B:H. Но​Мышкой выделяем столбцы G:H.​ «Формат по образцу».​ форматов, а стиля​ Вам массу времени,​Если по иконке инструмента​ несколько других ячеек.​

​Если вы хотите использовать​

Многократное копирование формата

​ пока вы не​ или ячейку листа,​ помогла ли она​ файл, зашел в​CommandBars("Standard").Controls("&Формат по образцу").Execute​ свойства символа, так​ куда можно скопировать​ было бы привязать​MS Word​ на этот раз​Как видите, вместе с​ Выделенная область будет​ нужно придерживаться иначе​ когда Вы будете​Format Painter​

1. ​На любом листе Excel​ сочетания клавиш можно​ нажмете клавишу ESC.​ форматирование которых вы​ вам, с помощью​ макросы, вставил и​End Sub​
2. ​ и свойства абзаца,​ любую кнопку, в​ горячую клавишу. По​

​. Как при нажатии​ не просто выбираем,​ форматами скопировались и​ отображаться с анимированной​ документы будут выглядеть​ работать над созданием​(Формат по образцу)​ выделите ячейку с​ выбрать объект или​Excel​ хотите скопировать.​ кнопок внизу страницы.​ что. ​и в автозапуске:​

Горячая клавиша для кнопки "Формат по образцу" или копировать формат по Hot Key

​ и вставлять их​​ т.ч. и "формат​ идеи​
​ клавиши или команды,​ а делаем двойной​​ размеры столбцов, а​​ границей копирования. А​ непрофессионально. Для решения​ таблиц в Excel​ кликнуть дважды, то​ форматированием, которое Вы​ текст, который вы​: быстрое копирование ширина​На вкладке​ Для удобства также​Заранее благодарен за​Application.OnKey "^%","executPatternFormat"​ нужно соответственно на​ по образцу" (пр.кл.​FormatPainter​
​ сделать так, чтобы​ щелчок по кнопке​ данные в табличках​ рядом с указателем​ данной задачи разработчики​
​ со сложным форматированием.​ скопированный формат можно​ хотели бы скопировать.​ хотите скопировать форматирование​ столбца или строки​Главная​​ приводим ссылку на​​ ответ​Guest​ символы и абзацы.​ мыши на панели​​=​​ курсором можно было​​ со щеточкой инструмента​​ не изменились. Таким​ мышки появится щеточка.​ Excel создали прекрасный​​Урок подготовлен для Вас​​ будет применить уже​ Затем на вкладке​
​ из и нажмите​ для второго столбца​в группе​ оригинал (на английском​слэн​: А куда это​Eskander88​ быстрого доступа→ настроить​Кнопка метлы​ выбрать команду на​ для копирования форматов.​

​ же способом копируется​​Мышкой выделите диапазон G2:H7.​ инструмент.​ командой сайта office-guru.ru​ несколько раз. Помимо​Home​ клавишуCTRL+SHIFT+C. Затем установите​ или строки, выделите​Буфер обмена​ языке) .​: сохранить и выйти(или​ все добавить и​: как то не​ панель быстрого доступа).​, по аналогии с​ ленте и назначить​Периодически переходим на каждый​ и высота строк,​Форматы скопированы, но ширина​Инструмент «Формат по образцу»​Источник: http://www.howtogeek.com/howto/14165/copy-excel-formatting-the-easy-way-with-format-painter/​ этого, Вы можете​(Главная) выберите команду​ самое требуется рисовать​ заголовок первого столбца​нажмите кнопку​Используйте формат по образцу​ принудительно запустить auto_open).​ как это будет​
​ обратил внимание, спасибо​ Если потом нажать​ Excel. Есть и​ горячую клавишу? При​ лист и выделяем​ только выделять нужно​ столбцов отличается. Естественно​ используют для копирования​Перевел: Антон Андронов​

​ применить форматирование сразу​​Format Painter​ форматирования на и​ или строки, нажмите​
​Формат по образцу​ быстро скопировать форматирование​при след входе​ работать​ )​

​ клавишу Alt, окажется,​​ команда​ этом сам курсор​ столбцы B:H.​ не столбцы, а​

Формат по образцу

​ их можно поправить​​ и вставки форматов​Автор: Антон Андронов​ к группе ячеек​(Формат по образцу).​
​ нажмите клавишуCTRL+SHIFT+VЧтобы применить​ кнопку​

​.​​ из одного объекта​
​ за макросом будет​
​слэн​

​Но вопрос по​
​ что у каждой​

​CopyFormat​​ становится выглядеть как​Заметьте, благодаря двойному щелчку​ строки.​ вручную, но если​

​ без изменения значений​​Форматирование может забирать достаточно​

​ в Excel, просто​ Вы увидите пунктирные​
​ его.​
​Формат по образцу​
​Когда указатель превратится в​
​ в документе. Выберите​
​ закреплено сочетание клавиш​
​: здрасте-приехали.. :)​
​ поводу курсора с​

​ кнопки есть свой​но она ничего​

​ знак решётки с​​ по кнопке после​​ мы хотим чтобы​ (текст, число и​ много времени. Особенно​ протянув выделение через​ линии вокруг выбранной​Команда​
​и затем щелкните​ кисть, выделите фигуру,​

Как пользоваться форматированием по образцу

Думаю большинство знает такую команду как Формат по образцу она находится на вкладке Главная. Однако не все знают обо всех возможностях данной команды.

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

Как правило формат по образцу используется следующим образом:

1. Выделяется ячейка, формат которой необходимо скопировать
2. На вкладке Главная с помощью команды Формат по образцу копируется формат данной ячейки. При этом рядом с курсором появляется значок кисточки.
3. Мышкой выделяется диапазон ячеек к которому необходимо применить форматирование исходной ячейки.

Приемы применения форматирования по образцу

1. Можно копировать формат как одной так и нескольких ячеек. Форматирование применяется у диапазону такого же размера, что и исходный диапазон.
2. Форматирование можно применять к целым строкам или столбцам. Выделите столбец/строку, нажмите формат по образцу, а после выберите столбец/строку к которому необходимо применить формат.
3. Формат по образцу можно применять и для очистки форматов. Для этого выделите ячейки, которые не содержат форматирования, вызовите команду формат по образцу и укажите диапазон в котором хотите удалить форматирование.
4. Если дважды кликнуть левой кнопкой мыши по команде Формат по образцу, то режим копирования зафиксируется и вы можете скопировать формат в несколько диапазонов. Чтобы завершить форматирование нажмите клавишу Esc или повторно нажмите на команду Формат по образцу.
   
5. Копировать форматирование можно не только у диапазонов, но и других объектов: рисунки, фигуры, диаграммы.

Создаем горячую клавишу на вставку форматирования

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

Гораздо удобнее скопировать формат например сочетанием клавиш Ctrl + C, выбрать нужный диапазон и вставить в него скопированное форматирование например, сочетанием клавиш Ctrl + Shift + V.

Чтобы так сделать, нам понадобится написать небольшой макрос. Вот его код:

Скопируйте код выше и вставьте его себе файл или в персональную книгу макросов.

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

1. На вкладке меню Вид, раскройте меню Макросы и выберите команду Макросы (или нажмите сочетание клавиш Alt + F8)
2. В диалоговом окне Макросы найдите только что добавленную процедуру PasteFormat и нажмите кнопку Параметры.
   
3. В следующем диалоговом окне задайте сочетание клавиш для вызова данной функции. Например зажмите клавишу Shift и клавишу V. После нажмите клавишу OK.
   

Как пользоваться горячей клавишей

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

1. Выберите диапазон, и скопируйте формат, нажав сочетание клавиш Ctrl + C.
2. Выберите диапазон, в который необходимо вставить только формат.
3. Нажмите сочетание клавиш Ctrl + Shift + V.

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

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

Немного поясню задачу, допустим, нам необходимо сформировать какие-то специфические документы по шаблону массово, т.е. в итоге их получится очень много, как я уже сказал выше, например, по каждому сотруднику. И это нужно сделать непосредственно в Excel, если было бы можно это сделать в Word, то мы бы это сделали через «Слияние», но нам нужно именно в Excel, поэтому для этой задачи мы будем писать макрос.

Мы с Вами уже выгружали данные по шаблону через клиент Access из базы MSSql 2008 в Word и Excel вот в этой статье — Выгрузка данных из Access в шаблон Word и Excel. Но сейчас допустим, у нас данные располагаются в базе, в клиенте которой нельзя или слишком трудоемко реализовать такую задачу, поэтому мы просто выгрузим необходимые данные в Excel и на основе таких данных по шаблону сформируем наши документы.

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

Напомню, что на данном сайте тема VBA Excel уже затрагивалась, например, в материале – Запрет доступа к листу Excel с помощью пароля

И так приступим!

Пишем макрос на VBA Excel по формированию документов

Реализовывать нашу задачу будем на примере «Электронной карточке сотрудника» (я это просто придумал:), хотя может такие и на самом деле есть), т.е. документ в котором хранится личные данные сотрудника вашего предприятия, в определенном виде, именно в Excel.

Примечание! Программировать будем в Excel 2010.

И для начала приведем исходные данные, т.е. сами данные и шаблон

Данные.

Лист, на котором расположены эти данные так и назовем «Данные»

Шаблон.

Лист, на котором расположен шаблон, тоже так и назовем «Шаблон»

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

Это делается очень просто, выделяете необходимую ячейку или диапазон, и жмете правой кнопкой мыши и выбираете «Присвоить имя», пишите имя ячейки и жмете «ОК»

Свои поля я назвал следующим образом:

• ФИО – fio;
• № — number;
• Должность – dolgn;
• Адрес проживания – addres;
• Тел. № сотрудника – phone;
• Комментарий – comment.

Код макроса на VBA Excel

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

Примечание! По умолчанию данной вкладке в Excel 2010 может и не быть, чтобы ее отобразить нажмите правой кнопкой по ленте пункт меню «Настройка ленты»

затем, в правой области поставьте галочку напротив пункта «Разработчик»

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

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

После у Вас откроется окно редактора кода, где собственно мы и будем писать свой код VBA. Ниже представлен код, я его как обычно подробно прокомментировал:

Теперь осталось выполнить этот макрос, для этого откройте вкладку разработчик->макросы->выполнить наш макрос:

и после выполнения у Вас в той же папке появится вот такие файлы

Вот с таким содержимым:

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