Как в эксель вставить картинку за текстом

Добавление текста на фотографию

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

Метод, который рекомендуется использовать, зависит от требуемых результатов и от применяемой программы Microsoft Office. Нужно, чтобы текст был стилизованным? Хотите достичь того же эффекта, который применяется на открытках? Текст короткий? Если да, то, возможно, вам больше подходит WordArt.

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

Выберите программу Office в раскрывающемся списке.

  • Какая программа используется?
  • Excel
  • PowerPoint
  • Word

Добавление текста на фотографию с помощью WordArt

Вставьте фотографию в электронную таблицу.

На вкладке Вставка в группе Текст нажмите кнопку WordArt, выберите нужный стиль и введите текст.

Щелкните внешнюю границу объекта WordArt, чтобы выбрать его, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

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

Добавление текста на фотографию с помощью надписи

Вставьте фотографию в электронную таблицу.

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

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

Щелкните внешнюю границу надписи, чтобы выбрать ее, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

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

Нажмите кнопку Заливка фигуры и выберите команду Нет заливки.

Нажмите кнопку Контур фигуры и выберите пункт Нет контура.

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

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

Добавление текста на фотографию с помощью WordArt

Вставьте фотографию в презентацию.

На вкладке Вставка в группе Текст нажмите кнопку WordArt, выберите нужный стиль и введите текст.

Щелкните внешнюю границу объекта WordArt, чтобы выбрать его, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

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

Добавление текста на фотографию с помощью надписи

Вставьте фотографию в презентацию.

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

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

Щелкните внешнюю границу надписи, чтобы выбрать ее, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

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

Нажмите кнопку Заливка фигуры и выберите команду Нет заливки.

Нажмите кнопку Контур фигуры и выберите пункт Нет контура.

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

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

Добавление текста на фотографию с помощью WordArt

В документе щелкните место, куда вы хотите вставить фотографию.

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

Щелкните полотно, а затем на вкладке Вставка в группе Иллюстрации нажмите кнопку Рисунки.

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

На вкладке Вставка в группе Текст нажмите кнопку WordArt, выберите нужный стиль и введите текст.

Щелкните внешнюю границу объекта WordArt, чтобы выбрать его, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

В разделе Работа с рисунками на вкладке Формат в группе Упорядочить щелкните стрелку рядом с кнопкой Группировать, а затем выберите пункт Сгруппировать.

Добавление текста на фотографию с помощью надписи

В документе щелкните место, куда вы хотите вставить фотографию.

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

Щелкните полотно, а затем на вкладке Вставка в группе Иллюстрации нажмите кнопку Рисунки.

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

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

Введите текст и перетащите надпись в нужное место.

Чтобы изменить шрифт или стиль текста, выделите текст и выберите нужное форматирование в контекстном меню.

Щелкните внешний край надписи и перетащите ее на фотографию.

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

Нажмите кнопку Заливка фигуры и выберите команду Нет заливки.

Нажмите кнопку Контур фигуры и выберите пункт Нет контура.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

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

Выберите программу Office в раскрывающемся списке.

Источник: support.office.com

Добавление текста на фотографию

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

Метод, который рекомендуется использовать, зависит от требуемых результатов и от применяемой программы Microsoft Office. Нужно, чтобы текст был стилизованным? Хотите достичь того же эффекта, который применяется на открытках? Текст короткий? Если да, то, возможно, вам больше подходит WordArt.

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

Выберите программу Office в раскрывающемся списке.

  • Какая программа используется?
  • Excel
  • PowerPoint
  • Word

Добавление текста на фотографию с помощью WordArt

Вставьте фотографию в электронную таблицу.

На вкладке Вставка в группе Текст нажмите кнопку WordArt, выберите нужный стиль и введите текст.

Щелкните внешнюю границу объекта WordArt, чтобы выбрать его, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

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

Добавление текста на фотографию с помощью надписи

Вставьте фотографию в электронную таблицу.

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

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

Щелкните внешнюю границу надписи, чтобы выбрать ее, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

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

Нажмите кнопку Заливка фигуры и выберите команду Нет заливки.

Нажмите кнопку Контур фигуры и выберите пункт Нет контура.

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

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

Добавление текста на фотографию с помощью WordArt

Вставьте фотографию в презентацию.

На вкладке Вставка в группе Текст нажмите кнопку WordArt, выберите нужный стиль и введите текст.

Щелкните внешнюю границу объекта WordArt, чтобы выбрать его, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

Читайте также:  Как в excel объединить таблицы

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

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

Добавление текста на фотографию с помощью надписи

Вставьте фотографию в презентацию.

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

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

Щелкните внешнюю границу надписи, чтобы выбрать ее, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

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

Нажмите кнопку Заливка фигуры и выберите команду Нет заливки.

Нажмите кнопку Контур фигуры и выберите пункт Нет контура.

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

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

Добавление текста на фотографию с помощью WordArt

В документе щелкните место, куда вы хотите вставить фотографию.

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

Щелкните полотно, а затем на вкладке Вставка в группе Иллюстрации нажмите кнопку Рисунки.

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

На вкладке Вставка в группе Текст нажмите кнопку WordArt, выберите нужный стиль и введите текст.

Щелкните внешнюю границу объекта WordArt, чтобы выбрать его, перетащите текст на фотографию и при необходимости поверните его под нужным углом.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

В разделе Работа с рисунками на вкладке Формат в группе Упорядочить щелкните стрелку рядом с кнопкой Группировать, а затем выберите пункт Сгруппировать.

Добавление текста на фотографию с помощью надписи

В документе щелкните место, куда вы хотите вставить фотографию.

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

Щелкните полотно, а затем на вкладке Вставка в группе Иллюстрации нажмите кнопку Рисунки.

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

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

Введите текст и перетащите надпись в нужное место.

Чтобы изменить шрифт или стиль текста, выделите текст и выберите нужное форматирование в контекстном меню.

Щелкните внешний край надписи и перетащите ее на фотографию.

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

Нажмите кнопку Заливка фигуры и выберите команду Нет заливки.

Нажмите кнопку Контур фигуры и выберите пункт Нет контура.

Щелкните внешнюю границу фотографии, нажмите клавишу CTRL и, удерживая ее, щелкните край объекта WordArt, чтобы выбрать оба элемента.

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

Выберите программу Office в раскрывающемся списке.

Источник: support.office.com

Вставка изображений в документы Word и Excel

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

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

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

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

Добавим в нашу исходную таблицу 2 столбца, в которых будут указаны имена вставляемых файлов-картинок:

ФИО PasteImage – печать PasteImage – подпись Паспорт серия Паспорт номер
Быков Андрей Евгеньевич печать 1.PNG подпись 1.PNG 6507 401091
Лобанов Семен Семенович печать 2.PNG подпись 2.PNG 6512 448568
Купитман Иван Натанович печать 3.PNG подпись 3.PNG 6509 731703

Обратите внимание, — столбцы с именами вставляемых картинок, ОБЯЗАТЕЛЬНО должны в названии содержать слово PasteImage

Т.е. столбец может называться, например, PasteImage, или PasteImage_1, или Печать – PasteImage,
но метка PasteImage обязательно должна присутствовать, – по неё программа определяет, что надо вставить именно картинку из файла, а не текст (имя файла)

Изображения с указанными именами файлов ищутся в заданной папке.

Путь к папке с картинками необходимо указать в настройках, на вкладке «Дополнительно»:


Отмеченные на скриншоте зелёными стрелками галочки — тоже желательно включить, это нам тоже может пригодиться.

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

Есть несколько способов ввода имени файла в ячейку:

Способ 1: скопировать имя файла (в Проводнике Windows), вручную вставить в ячейку.
Способ простейший, подробного описания не требует.

Способ 2: нажать комбинацию клавиш Ctrl + Shift + I, и в диалоговом окне выбрать нужный файл картинки.
После выбора файла, его имя будет автоматически вставлено в выделенную ячейку.
Можно и без горячей клавиши обойтись, – аналогичный пункт есть в подменю «Дополнительно»

Способ 3: выбрать имя файла из выпадающего списка в ячейке.
Чтобы в ячейках появился список из всех доступных файлов, выделите диапазон ячеек,
и в меню программы нажмите «Дополнительно» – «Вставить список имён файлов картинок в виде выпадающего списка»

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

Теперь осталось только вставить коды полей (названия столбцов, в фигурных скобках) в шаблоны Word

Код поля (в нашем случае, это и ) можно вставить (только для шаблонов Word) как просто внутри текста (или отдельной строкой),
так и в объекты типа «НАДПИСЬ» – для шаблонов формата Word и Excel (например, чтобы печать, вставляемая из файла PNG с поддержкой прозрачности, была поверх текста)

Чтобы вставить печать поверх текста:

1) открываем наш шаблон Word / Excel, и на ленте нажимаем ВСТАВКА – НАДПИСЬ

2) размещаем вставленный объект «НАДПИСЬ» в нужное место документа (например, над текстом М.П.)
и задаём нужную ширину надписи, а высоту делаем побольше (с запасом)

ВНИМАНИЕ: вставленная картинка (например, печать) будет автоматически масштабирована (пропорционально уменьшена) до ширины надписи

Это может пригодиться, если у вас картинка в большом разрешении (качественная), а вставлять в документ её надо в уменьшенном размере

3) вставляем внутрь надписи код поля

4) при выделенной надписи, на ленте Excel на вкладке ФОРМАТ, включаем режим НЕТ КОНТУРА и НЕТ ЗАЛИВКИ:

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

Во вложении к статье:

  • шаблон АКТ со вставленными надписями
  • заполненный акт со вставленной печатью и подписью
  • архив с тестовыми печатями и подписями в формате PNG
    (которые я сделал из скачанных в интернете JPG в редакторе Corel PhotoPaint за пару минут)
Вложение Размер Загрузки Последняя загрузка
act-template.doc (шаблон акта) 30 КБ Ещё не загружался
act-result.doc (заполненный акт с печатью и подписью) 131.5 КБ Ещё не загружался
stamps.zip (тестовые печати и подписи в формате PNG – с прозрачностью) 316.15 КБ Ещё не загружался
  • Добавить комментарий
  • 14922 просмотра

Комментарии

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

Есть ли возможность вставить в doc-шаблон изображение картинкой (это штрих-код, который генерируется отдельным макросом), а не указанием на имя файла? Если да, то как?

Александр, всё должно работать.

с Office 365 word ваш скрипт не работает у меня.

Андрей, возможно, текст в надписи не соответствует названию столбца (пробел лишний попался, например)

Добрый день!
Настраиваю надстройку для Excel.
Возникла проблема – не удается настроить вставку картинки в шаблон Excel (через вставленный объект «НАДПИСЬ»).
В шаблоне формата Word документ формируется отлично и все работает.
А в Excel вставлю объект “НАДПИСЬ”, формирую ссылку на файл картинки – а результат: поле с ссылкой (картинка не вставляется).
С чем это может быть связано?

Нет, файлы visio программой не поддерживаются

Повтор “наглого” вопроса:
P. S. А совсем уж наглый вопрос задать можно? А вместо png, bmp, jpg. файлы VISIO можно как-то подсунуть?

Ух ты ж. Заработало. А ларчик-то просто открывался :).

Сейчас буду “причёсывать” шаблон, а то что-то в него сильно жутко долго выгружает с картинкой одной, но большой. К тому же он ещё и multirow.

P. S. А совсем уж наглый вопрос задать можно? А вместо png, bmp, jpg. файлы VISIO в шаблон можно как-то подсунуть?

P. P. S. Пока обдумывал “наглый вопрос” попутно поправил шаблон. Теперь вылетают файлы один за другим :). Картинку просто не под таблицу вставил, а сбоку. И “Последовательность вывода страниц” задал “Вниз, затем вправо”.

Код поля надо вставить в НАДПИСЬ, вставленную на лист шаблона Excel
(а не просто в ячейку)
Тогда всё будет работать
Размеры надписи ограничивают размеры вставляемой картинки

Сейчас обновился до 323. Не вставляет :(.
И в описании у вас вот что написано: “Теперь осталось только вставить коды полей (названия столбцов, в фигурных скобках) в шаблоны Word
(пока вставка рисунков работает только с шаблонами Word, шаблоны Excel не поддерживаются)”.
Вместо картинки в шаблон вставляется имя поля :(.
С WORDом всё в порядке: и в WORD картинка вставляется, и в PDF, если ставлю галку соответствующую, тоже.

Опа! А как это я пропустил такую возможность? Надо обновиться срочно. У меня сейчас 3.15. И там нет возможности вставки картинок в шаблоны EXCEL.

P. S. Если вспомните, то я как-то писал про очень медленную выгрузку данных в шаблон. Победил я это дело!
Как всегда, “дело было не в бобине. “, не в программе то есть. Просто тогда я папку для готовых файлов указывал на сетевом общем диске. Вот они очень долго формировались. А после указания папки для готовых файлов на локальном диске, всё начало летать!

Юрий, программа вставляет картинки в шаблоны Excel точно также, как и в шаблоны Word
Эта возможность была реализована давно

Здравствуйте!
А со вставкой картинок в шаблоны EXCEL как продвигаются работы? Или не будет вообще такой возможности?

Очень полезной функцией с рисунками была бы возможность “Вставить только один раз”. Да и не только с рисунками.

Можно было бы ограничиться созданием одного столбика PasteImage, а не плодить их.
Пример: имеем 3 фирмы: Абсолют, Огонь, Белка с набором файлов Абсолют1, Абсолют2, Абсолют3, Огонь1, огонь2.
На данный момент нужно создать 3 столбика.
Предложение: использовать в ячейке ключ: Абсолют*.jpg, Огонь*.jpg
В полях шаблона естественно д.б. заполнены полноценные названия.
Итого: вместо 3 столбиков PasteImageблабла имеем один с ключами. Необходимое условие – определенный набор картинок должен иметь общую часть названия.
На выходе – сэкономленные нервы при заполнении столбиков.
Это же касается PasteWordDoc- рассматриваю как более интересный вариант- можно например вставить блок сразу с 2 подписями и 2 печатями

Источник: excelvba.ru

Вставка изображения в документ Excel

Опубликовано:
10 сентября 2014 в 09:22

Предисловие

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

Расположение изображения относительно листа

Сложность заключается в том, что четких границ страницы в документе Excel не существует. Если мы не задаем область печати, то она будет определяться по содержимому. Если количество используемых ячеек настолько велико, что не умещается на странице выбранного формата, то количество страниц автоматически увеличивается или, если документ настроен иначе, то лист начинает менять масштаб. В такой ситуации координаты для размещения изображения не помогут нам в точном определении его положения на странице, а такие свойства страницы как левая граница и верхняя граница (left, top) отсутствуют в принципе.

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

Работа с подложками

В документе Word подложкой фактически является содержимое колонтитула. Расположить изображение или WordArt в колонтитуле по координатам было также легко, как и на основном листе. В документе Excel колонтитулы совсем другие. Вставить графический объект в колонтитул можно только с помощью действий, которые можно найти на вкладке «Конструктор» панели инструментов, что затрудняет дальнейшее программное форматирование изображения.

Так как на панели инструментов «Конструктор» нет возможности вставить объект WordArt, то в разработке данной возможности также не будет.

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

Справочник

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

Список изменений справочника:

  • добавился новый реквизит-признак «Тип документа», который может принимать значения «Word» и «Excel». При выборе одного из значений мы открываем одни настройки и закрываем другие, в соответствии с возможностями документа. А так же определяем тип документа, для которого будет проводиться вставка графического объекта;
  • добавился новый реквизит-признак «Общая подложка», который может принимать значения «Да» и «Нет». Пока что доступен только для документов типа «Excel». Если указать значение «Да», то вставляемое изображение отобразится на всех страницах документа. Если указать «Нет», то изображение добавится только для первой страницы.

Представление «Picture»

Почти весь имеющийся функционал карточки доступен при вставке изображения в документ Excel. Исключениями являются:

  • тип обтекания текстом;
  • сторона обтекания текстом.

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

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

Представление «WordArt»

Как уже говорилось, вставлять объект «WordArt» в подложку в документе «Excel» невозможно. Поэтому нам доступна только обычная вставка. Но и в обычном режиме есть свои ограничения.

Недоступен для изменения реквизит «Размерность текста». Данный реквизит использовался в документах типа «Word» для того, чтобы определить, как мы будем задавать размер текста. Размером его контейнера, или шрифтом? В Excel, при программной вставке объекта «WordArt», даже если мы зададим гигантский размер контейнера, но не зададим шрифт, то текста мы так и не увидим. Поэтому доступен только шрифт.

Функции

Функция «DIO_InsertGraphicObjectToExcelDocument» работает аналогично функции «DIO_InsertGraphicObjectToWordDocument». Чтобы функции и справочник нормально работали, должны быть заполнены константы «DIO_WordDocumentExample» и «DIO_ExcelDocumentExample». В этих константах хранятся ИД документов Word и Excel соответственно. Эти документы могут иметь любой формат, но лучше оформить их так, чтобы при нажатии кнопки «Предпросмотр» справочника «Графические объекты для вставки в документ» можно было бы наглядно увидеть результат вставки.

Существует определенный баг при работе с файлами, имеющих расширение «xlsx», если на клиентской машине установлен 2013 офис. При вставке графического объекта, сбрасываются настроенные области печати, вследствие чего графический объект некорректно располагается при выравнивании по границам документа. При наличии такого бага лучше использовать отступ в сантиметрах.

Разработка выполнена в системе DIRECTUM 5.0.

В состав разработки входят:

  • константы;
  • словари локализации;
  • справочник;
  • функции.

Полная разработка, позволяющая вставлять графические объекты в документы Word и Excel:

Источник: club.directum.ru

Вставить картинку в лист – по списку или выбору из ячейки

Сама по себе задача вставки картинки на листе не сложная и ответ лежит на поверхности: это доступно прямо из меню: Вставка (Insert) -группа Иллюстрации (Illustrations)Рисунок (Picture) :

Кодом VBA вставить тоже не сложно, даже макрорекордер записывает это действие:

Sub InsertPicture() ActiveSheet.Pictures.Insert(“G:ДокументыИзображенияExcel_vba_ru.png”). _ Select End Sub

Но что делать, если вставить надо картинку из заранее известной папки, но с изменяющимся именем? А если при этом еще надо не просто вставить – а подогнать размер картинки под размер ячейки? Например, в ячейке А2 название товара(соответствует названию картинки), а в В2 должно быть изображение. Здесь уже посложнее. Но тоже вполне реализуемо при помощи VBA

‘————————————————————————————— ‘ Author : The_Prist(Щербаков Дмитрий) ‘ Профессиональная разработка приложений для MS Office любой сложности ‘ Проведение тренингов по MS Excel ‘ https://www.excel-vba.ru ‘ info@excel-vba.ru ‘ WebMoney – R298726502453; Яндекс.Деньги – 41001332272872 ‘ Purpose: вставка в ячейку картинки с подгонкой под размеры ячейки ‘————————————————————————————— Sub InsertPicToCell() ‘путь к папке с картинками Const sPicsPath As String = “G:ДокументыИзображения” Dim sPicName As String, sPFName As String, sSpName As String Dim oShp As Shape Dim zoom As Double ‘в этой ячейке выпадающий список с именами картинок sPicName = Range(“A2”).Value ‘если имя картинки не задано If sPicName = “” Then Exit Sub End If ‘проверяем наличие картинки в папке sPFName = sPicsPath & sPicName If Dir(sPFName, 16) = “” Then Exit Sub End If ‘в эту ячейку вставляем картинку With Range(“B2”) On Error Resume Next ‘задаем картинке уникальный адрес, ‘привязанный к адресу ячейки sSpName = “_” & .Address(0, 0) & “_autopaste” ‘если картинка уже есть – удаляем её Set oShp = ActiveSheet.Shapes(sSpName) If Not oShp Is Nothing Then oShp.Delete End If ‘вставляем выбранную картинку Set oShp = ActiveSheet.Shapes.AddPicture(sPFName, False, True, .Left + 1, .Top + 1, -1, -1) ‘определяем размеры картинки в зависимости от размера ячейки zoom = Application.Min(.Width / oShp.Width, .Height / oShp.Height) oShp.Height = oShp.Height * zoom – 2 ‘переименовываем вставленную картинку(чтобы потом можно было заменить) oShp.Name = sSpName End With End Sub

Чтобы использовать код необходимо создать в книге стандартный модуль(переходим в редактор VBA( Alt + F11 ) –InsertModule) и вставить в него приведенный выше код. Чтобы картинка вставилась в ячейку, надо записать имя картинки в ячейку A2 , нажать сочетание клавиш Alt + F8 и выбрать макрос InsertPicToCell. Не очень удобно, правда?
Значит теперь попробуем сделать так, чтобы при каждом изменении в А2 картинка менялась сама, без необходимости запускать каждый раз код вручную. Для этого придется использовать возможность Excel отслеживать такие события, как изменения ячейки(чтобы лучше понять где это лучше сразу прочитать статью Что такое модуль? Какие бывают модули? и особое внимание уделить описанию про модули листов). Теперь чуть переделываем код:

Private Sub Worksheet_Change(ByVal Target As Range) ‘————————————————————————————— ‘ Author : The_Prist(Щербаков Дмитрий) ‘ Профессиональная разработка приложений для MS Office любой сложности ‘ Проведение тренингов по MS Excel ‘ https://www.excel-vba.ru ‘ info@excel-vba.ru ‘ WebMoney – R298726502453; Яндекс.Деньги – 41001332272872 ‘ Purpose: вставка в ячейку картинки с подгонкой под размеры ячейки ‘————————————————————————————— ‘путь к папке с картинками Const sPicsPath As String = “G:ДокументыИзображения” Dim sPicName As String, sPFName As String, sSpName As String Dim oShp As Shape Dim zoom As Double ‘т.к. список с именами картинок у нас в ячейке А2, ‘то определяем, что значение изменилось именно в ней ‘ если в ячейке А2 имена картинок, а список товара в другой ячейке ‘ то надо заменить А2 на ту, которая изменяется списком или руками If Intersect(Target, Range(“A2”)) Is Nothing Then ‘изменения не в А2 – ничего не делаем, завершаем код Exit Sub End If ‘в этой ячейке выпадающий список с именами картинок sPicName = Range(“A2”).Value ‘если имя картинки не задано If sPicName = “” Then Exit Sub End If ‘проверяем наличие картинки в папке sPFName = sPicsPath & sPicName If Dir(sPFName, 16) = “” Then Exit Sub End If ‘в эту ячейку вставляем картинку With Range(“B2”) On Error Resume Next ‘задаем картинке уникальный адрес, ‘привязанный к адресу ячейки sSpName = “_” & .Address(0, 0) & “_autopaste” ‘если картинка уже есть – удаляем её Set oShp = ActiveSheet.Shapes(sSpName) If Not oShp Is Nothing Then oShp.Delete End If ‘вставляем выбранную картинку Set oShp = ActiveSheet.Shapes.AddPicture(sPFName, False, True, .Left + 1, .Top + 1, -1, -1) ‘определяем размеры картинки в зависимости от размера ячейки zoom = Application.Min(.Width / oShp.Width, .Height / oShp.Height) oShp.Height = oShp.Height * zoom – 2 ‘переименовываем вставленную картинку(чтобы потом можно было заменить) oShp.Name = sSpName End With End Sub

Теперь переходим на лист, где в А2 будет изменяться название картинки -правая кнопка мыши на этом листе –Посмотреть код (View Code) . Вставляем код выше. Все, теперь при любом изменении в А2 картинка будет изменяться(если указанный файл будет найден в нужной папке).
Если картинки расположены не в “G:ДокументыИзображения” , а в той же папке, что и сама книга с кодом, достаточно эту строку
Const sPicsPath As String = “G:ДокументыИзображения”
заменить такими
Dim sPicsPath As String
sPicsPath = ThisWorkbook.Path & “”
тогда папка с книгой будет определяться автоматически.
Но я понимаю, что куда правильнее в ячейке А2 при помощи выпадающего списка выбирать наименование товара, а в В2 при помощи функции ВПР(VLOOKUP) подтягивать из справочника название картинки и уже по этому названию вставлять картинку. Но подстроить код под это уже не сложно. Приводить его здесь не буду, т.к. можно будет запутаться с описанием списка, функций, где и что. Тем более что сам код практически не отличается. К тому же именно в этой реализации код есть в приложенном к статье файле.

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

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

‘————————————————————————————— ‘ Author : The_Prist(Щербаков Дмитрий) ‘ Профессиональная разработка приложений для MS Office любой сложности ‘ Проведение тренингов по MS Excel ‘ https://www.excel-vba.ru ‘ info@excel-vba.ru ‘ WebMoney – R298726502453; Яндекс.Деньги – 41001332272872 ‘ Purpose: вставка в ячейку картинки с подгонкой под размеры ячейки ‘————————————————————————————— Option Explicit Sub InsertPictureByVal() Dim sPicsPath As String Dim sPicName As String, sPFName As String, sSpName As String Dim llastr As Long, lr As Long Dim oShp As Shape Dim zoom As Double ‘выбираем путь к папке с картинками With Application.FileDialog(msoFileDialogFolderPicker) .Title = “Выбрать папку с картинками” ‘заголовок окна диалога .ButtonName = “Выбрать папку” .Filters.Clear ‘очищаем установленные ранее типы файлов .InitialFileName = ThisWorkbook.Path ‘назначаем первую папку отображения .InitialView = msoFileDialogViewLargeIcons ‘вид диалогового окна If .Show = 0 Then Exit Sub ‘показываем диалог sPicsPath = .SelectedItems(1) ‘считываем путь к папке End With ‘ если путь надо указать статичный – вместо диалога прописываем одну строку ‘ sPicsPath = “C:images” ‘проверяем, есть ли слеш после пути к папке ‘если нет – добавляем, иначе путь к картинке будет неверный If Right(sPicsPath, 1) <> Application.PathSeparator Then sPicsPath = sPicsPath & Application.PathSeparator End If ‘определяем последнюю ячейку по столбцу с именами картинок llastr = Cells(Rows.Count, 2).End(xlUp).Row ‘если кроме шапки в столбце с именами картинок ничего нет If llastr “” And sPicName <> “” Then ‘в эту ячейку вставляем картинку With Cells(lr, 3) ‘задаем картинке уникальный адрес, ‘привязанный к адресу ячейки sSpName = “_” & .Address(0, 0) & “_autopaste” ‘если картинка уже есть – удаляем её Set oShp = Nothing On Error Resume Next Set oShp = ActiveSheet.Shapes(sSpName) If Not oShp Is Nothing Then oShp.Delete End If On Error GoTo 0 ‘вставляем выбранную картинку Set oShp = ActiveSheet.Shapes.AddPicture(sPFName, False, True, .Left + 1, .Top + 1, -1, -1) ‘определяем размеры картинки в зависимости от размера ячейки zoom = Application.Min(.Width / oShp.Width, .Height / oShp.Height) oShp.Height = oShp.Height * zoom – 2 ‘переименовываем вставленную картинку(чтобы потом можно было заменить) oShp.Name = sSpName End With End If Next End Sub

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

Вставить картинку в ячейку (366,9 KiB, 48 скачиваний)

Обратная задача – сохранение картинок из листа – уже разбиралась мной в этой статье: Как сохранить картинки из листа Excel в картинки JPG

Статья помогла? Поделись ссылкой с друзьями!

Источник: www.excel-vba.ru

Как вставить в файле эксель картинку, фото

Редактор Microsoft Office Excel позволяет работать не только с функциями, формулами и графиками, но и с другими сторонними объектами типа фигур, рисунков, надписей в стиле WordArt и так далее. Сегодня расскажем, как правильно вставить картинку в эксель.

Общее понятие

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

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

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

Рекомендация! При изменении изображения рекомендуем сохранять пропорции. Так восприятие объекта будет лучше.

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

В появившемся диалоговом окне переходите к ярлыку Свойства и ставите галочку напротив перемещать и изменять объект вместе с ячейками.

Группировка

Иногда, по условиям работы, необходимо поместить картинку за текстом. Для этого необходимо настроить порядок группировки. Текстовый блок необходимо представить в виде объекта и тогда переместить изображение на задний план станет возможным.

  1. Вставляете на рабочий лист надпись и фото.

  1. Выделяете рисунок и во вкладке Разметка страницы нажимаете кнопку На задний план.

  1. Накладываете текст поверх, а потом проводите форматирование надписи доступными инструментами.

Дополнительные возможности

Microsoft Excel позволяет вставить фотографию даже в примечание. Для этого делаете следующее:

  1. Добавляете примечание на рабочий лист через вкладку Рецензирование

  1. Переходите к форматированию примечания.

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

  1. Находите ярлычок Цвета и линии. Внутри палитры есть две дополнительные строки. Выбираете Способы заливки….

  1. В новом диалоговом окне переходите к последней вкладке и нажимаете на кнопку Рисунок. Находите нужное изображение на компьютере и добавляете его в поле предварительного просмотра.

  1. Подтверждаете действие кнопкой ОК и возвращаетесь на рабочий лист.

  1. Получаете фон примечания в виде картинки. При этом текст автоматически будет отображаться на переднем плане.

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

Жми «Нравится» и получай только лучшие посты в Facebook ↓

Источник: mir-tehnologiy.ru