С Новым годом! Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/15: Рейтинг темы: голосов - 15, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 08.11.2018
Сообщений: 17
1
Excel

Вставка изображения в файл Excel

08.11.2018, 11:16. Показов 3148. Ответов 10

Author24 — интернет-сервис помощи студентам
у меня следующая проблема, необходимо вставить изображение в файл EXCEL, для этого я воспользовался следующим макросом:
Visual Basic
1
2
3
4
5
6
7
8
9
10
Sub sobs()
Environ$ ("USERPROFILE")
 
 ActiveSheet.Pictures.Insert(Environ$("USERPROFILE") & "\AppData\Roaming\Microsoft\AddIns\Ñîáñò.ÏÀÎ.png"). _
        Select
        Selection.ShapeRange.LockAspectRatio = msoFalse
    Selection.ShapeRange.Width = 198
    Application.CommandBars("Format Object").Visible = False
    Selection.ShapeRange.Height = 56
 End Sub
но возникли сложности при копировании файла на другой комп изображение не подгружается, из за отсутствия данной картинки по указанному пути.
вопрос как сделать что бы тело картинки сохранялось внутри файла XLSX ?
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.11.2018, 11:16
Ответы с готовыми решениями:

Вставка изображения из DataGridView в Excel
Есть datagridview в нем есть колонка с изображениями ( они сгенерированы программно) Если бы мне...

Вставка изображения на задний план в Excel
Как вставить картинку в таблице Excel на задний план. Конкретно нужно вставить в шапке таблицы...

Вставка изображения в RTF-файл
Нужно вставить BMP-шное изображение в конец или начало файла RTF. Конкретного метода не нагуглил...

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

10
15153 / 6426 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
08.11.2018, 11:51 2
GrafPSV, вставьте рисунок вручную, настройте расположение и размер. Не снимая выделения, Alt+F11, Ctrl+G, узнайте имя рисунка и скройте его
Код
?selection.shaperange.name
Рисунок 1
selection.shaperange.visible=false
В коде вместо вставки делайте рисунок видимым
Visual Basic
1
activesheet.shapes("Рисунок 1").visible=true
0
0 / 0 / 0
Регистрация: 08.11.2018
Сообщений: 17
08.11.2018, 13:43  [ТС] 3
вставьте рисунок вручную, настройте расположение и размер
Спасибо, идея хорошая но программа сама создает файл EXCEL и вручную вставлять картинки во все создаваемые файлы... это как то не очень.
может есть другие варианты?

Добавлено через 15 минут
смысл всей программы:
исходный файл генерирует сметная программа, сотрудник после генерирования запускает надстройку. надстройка выполняет определенные вычисления и добавляет в Excel картинку.
0
ᴁ®
Эксперт MS Access
3922 / 2244 / 468
Регистрация: 13.12.2016
Сообщений: 7,729
Записей в блоге: 5
08.11.2018, 14:46 4
GrafPSV, как вариант спрячьте вашу картинку в скрытом листе и оттуда вставляйте
Цитата Сообщение от GrafPSV Посмотреть сообщение
запускает надстройку
- так в надстройке и спрячьте ее
0
0 / 0 / 0
Регистрация: 08.11.2018
Сообщений: 17
16.11.2018, 10:18  [ТС] 5
- так в надстройке и спрячьте ее
прежде чем прятать её нужно вставить, а если вставляешь указанным кодом то она и спрятанная пропадет.
0
74 / 7 / 2
Регистрация: 15.11.2018
Сообщений: 75
16.11.2018, 12:20 6
может лучше создать макрос вставки изображений с указанием местоположения и имени файла. я вот пользуюсь надстройкой которая вставляет изображения беря имя файла из выделенного мною в файле столбца (столбец видимо можно скрыть), но если надо можно завести и другой док и получать имена, пути, расположение из него.
0
0 / 0 / 0
Регистрация: 08.11.2018
Сообщений: 17
16.11.2018, 14:38  [ТС] 7
может лучше создать макрос вставки изображений с указанием местоположения и имени файла
я так и сделал см. код первого сообщения
но моя задача что бы потом изображения сохранялось в теле xlsx файле, а не подгружалась каждый раз по сохраненному пути.
0
655 / 247 / 89
Регистрация: 28.10.2015
Сообщений: 526
16.11.2018, 15:53 8
Лучший ответ Сообщение было отмечено GrafPSV как решение

Решение

Visual Basic
1
ActiveSheet.Shapes.AddPicture Environ$("USERPROFILE") & "\AppData\Roaming\Microsoft\AddIns\Ñîáñò.ÏÀÎ.png", False, True, 0, 0, 198, 56
Из справки
Syntax:
expression.AddPicture(Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

Я этим кодом вставляю картинки и они сохраняются в файле, при открытии на любом компе они остаются на своих местах, плюс сразу при вставке мы указываем размер и расположение.
Но есть и минус - все параметры обязательны (Required), что может вызвать свои затруднения...
1
0 / 0 / 0
Регистрация: 08.11.2018
Сообщений: 17
16.11.2018, 15:58  [ТС] 9
Святой НякаЛайк - Спасибо то что искал, на выходных перепишу прогу
0
74 / 7 / 2
Регистрация: 15.11.2018
Сообщений: 75
16.11.2018, 20:55 10
Если есть инет, то можно залить изображение на какой-нибудь свой ресурс и оттуда уже сохранять его макросом.
Когда много изображений вставляю их уменьшенные эскизы, а ссылку по щелчку вешаю на оригинальные
0
10916 / 5608 / 1425
Регистрация: 05.10.2016
Сообщений: 15,852
16.11.2018, 23:08 11
GrafPSV, думаю, вам может пригодится:
Изображения - Размеры в пикселах
Изображения - Изменение размеров
1
16.11.2018, 23:08
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
16.11.2018, 23:08
Помогаю со студенческими работами здесь

Вставка изображения
Смысл в том что ..... Есть 10 картинок с названием 0,1,2,3 и тд.... при нажатие определенной кнопки...

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

Вставка изображения
Доброго времени суток. Подскажите как в три div вставить три разные картинки из файла? Думал так...

Вставка изображения
<html> <head> <title >Начальные сведения</title> <style type="text/css"></style> ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Блоги программистов
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
Полезные поделки на Arduino, которые можно сделать самому
raxper 06.01.2025
Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .
Подборка решений задач на Python
IT_Exp 06.01.2025
Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллер­­ы
raxper 06.01.2025
Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .
Из чего собрать игровой компьютер
inter-admin 06.01.2025
Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
Как использовать GraphQL в C# с HotChocolate
Programming 05.01.2025
GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .
Модель полного двоичного сумматора с помощью логических операций (python)
AlexSky-coder 04.01.2025
def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()
Это мы не проходили, это нам не задавали...(аси­­­­­­­­­­­­­­хро­н­н­ы­й счётчик с управляющим сигналом задержки).
Hrethgir 04.01.2025
Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .
Руководство по созданию бота для Телеграм на Python
IT_Exp 04.01.2025
Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru