Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
[ Закрыто ] ActiveX, кроме стандартного Image, которые умеют добавлять фотографии?
 
#1
07.01.2017 17:09:09
Подскажите, если кто в курсе : есть ли в экселе какие-нибудь другие ActiveX, кроме стандартного Image и AniGif, которые умеют добавлять графические файлы?
Я вот, например слышал про такую вещь как PictureBox, но у меня этот элемент управления отсутствует.
Если у кого есть - скиньте ocx пожалуйста.
Или может есть еще какие-нибудь...
 
 
 
#2
07.01.2017 17:18:47
Цитата
какие-нибудь другие ActiveX
Можно и на кнопку CommandButton добавить фото, в свойствах есть Picture
 
 
 
#3
07.01.2017 17:19:30
Serg.Vrn, Microsoft Webbrowser
 
 
 
#4
07.01.2017 17:28:46
Казанский, ну... Webbrowser - это банальщина.
Я думал что-то новое уже появилось.
 
 
 
#5
07.01.2017 17:31:31
Kuzmich, понятно, что и на пустую форму можно добавить фото, и даже на пустой лист.
Я имел ввиду - какой-нибудь навороченный инструмент.
Ну может не навороченный, а просто новый.
Поддерживающий скажем формат пнг...
 
 
 
#6
07.01.2017 17:32:27
Вы бы написали чего ожидаете от элементов - тогда может что и подсказали бы посущественее. А так...При желании картинку можно куда угодно запихнуть и API подключить. Но не зная для чего Вам все это - считаю бесполезной тратой времени. Или уж в курилку тогда, что ли, раз это не обсуждение чего-то конкретного, а рассуждения на тему "а вдруг чего найдется...".
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#7
07.01.2017 17:36:51
The_Prist, я хочу загружать формат пнг (тот в котором можно делать прозрачный фон).
А веб-браузер здесь не подходит, поскольку он постоянно норовит разместить по краям загруженной картинки бегунки - если картинка хоть немного выходит за размеры окна.
Image - не умеет загружать пнг-формат, поскольку безнадежно устарел.
Изменено: Serg.Vrn - 07.01.2017 17:49:25
 
 
 
#8
07.01.2017 18:01:15
Цитата
постоянно норовит разместить по краям загруженной картинки бегунки
это легко отключается
Код
Private Sub Browser_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    On Error Resume Next
    Browser.document.body.Scroll = "no"
    Browser.document.body.Style.Border = "none"
End Sub
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#9
07.01.2017 18:45:34
Игорь, что-то не работает.
Не убирает бегунки и не вписывает картинку в окно браузера с сохранением пропорций.  
 
 
 
#10
08.01.2017 03:29:45
1. Код должен быть в модуле листа1, а на в Module1.
2. Вставленный объект в приложенном файле имеет имя WebBrowser1, а на Browser, поэтому и код должен быть соответствующим:
Код
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
  On Error Resume Next
  WebBrowser1.Document.body.Scroll = "no"
  WebBrowser1.Document.body.Style.Border = "none"
End Sub
 
 
 
#11
08.01.2017 09:22:02
ZVI, бегунки исчезли, но картинка по-прежнему не вписывается в окошко браузера.
В Image - в свойствах можно было выбирать как должен быть вписан рисунок.

А здесь я не знаю как это сделать.
Мне нужно просто - чтобы рисунок с сохранением пропорций вписывался бы в окошко браузера (ну как в Image в общем)
 
 
 
#12
08.01.2017 12:52:08
Цитата
Serg.Vrn написал:
чтобы рисунок с сохранением пропорций вписывался бы в окошко браузера
применить html код, растягивающий картику по ширине/высоте браузера, при загрузке браузера. Например. Погуглите про WebBrowser1.Document.Write
 
 
 
#13
08.01.2017 14:54:28
Цитата
Jungl написал:
применить html код
Так мне картинку - то есть сперва надо в html переводить что ли?
Или этот код на чем-то другом применить?
(У меня в файле - только АктивХ Браузер и ссылка на картинку)
 
 
 
#14
08.01.2017 15:22:24
Название темы должно отражать суть задачи. Предложите новое. Модераторы переименуют тему.
Или закрываем - по теме ответ уже получен.
 
 
 
#15
08.01.2017 15:32:09
Доброе время суток.
Если на лист Png с прозрачностью, то зачем WebBrowser, а стандартные средства чем не угодили?
 
 
 
#16
08.01.2017 17:11:10
Андрей VG, вы разместили на листе пнг-картинку. Это не секрет, я тоже могу ее разместить.

Я спрашивал - есть ли такой инструмент навроде Image, который умеет читать пнг.   Мне посоветовали обычный веб-браузер.    
И речь зашла о том, как заставить веб-браузер проявить те уникальные свойства - которые наблюдаются у Image, в частности - растягивать картинку по размеру окна с сохранением пропорций (как это можно делать в Image).

Было выяснено, что как-то веб-страница Html может растягивать фон. Но именно вебстраница. А у меня на листе - только АктивХ Браузер и ссылка на картинку. То есть Html файла - нет.

Вот этот вопрос и обсуждается.
Может быть вы знаете - как заставить браузер вписывать картинку в его окно?
Изменено: Serg.Vrn - 08.01.2017 17:17:45
 
 
 
#17
08.01.2017 17:54:54
Serg.Vrn, была просьба модератора - предложить название темы, соответствующее обсуждению.
 
 
 
#18
08.01.2017 17:57:58
Цитата
Serg.Vrn написал: Это не секрет, я тоже могу ее разместить.
Цитата
Андрей VG написал: чем не угодили?
Может ответите на вопрос? Пока всё это слишком в общем - вон и модератор намекает, что может тему прикрыть.
Цитата
Serg.Vrn написал: как заставить браузер вписывать картинку в его окно?
Задать атрибуты ширины и высоты изображения, так чтобы оно вписалось в окно WebBrowser.
 
 
 
#19
08.01.2017 18:20:40
Андрей VG, ну вот смотрите - есть пример кода Html по указанной ссылке.
Код
<!DOCTYPE HTML>
<html>
 <head>
  <meta charset="utf-8">
  <title>Тег IMG</title>
 </head>
 <body> 

  <p><a href="lorem.html"><img src="images/1.png" 
  width="189" height="255" alt="lorem"></a>
  Lorem ipsum dolor sit amet...</p>

 </body>
</html>
Куда его поместить в коде ВБА ?
(html у меня нет - только jpg)
Код
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
  On Error Resume Next
  WebBrowser1.Document.body.Scroll = "no"
  WebBrowser1.Document.body.Style.Border = "none"
End Sub
Изменено: Serg.Vrn - 08.01.2017 18:23:13
 
 
 
#20
08.01.2017 18:26:50
Сообщения 14, 17, 18... И НИЧЕГО там не видите?! Перед Вами на колени стать?

Тема закрыта до изменения названия темы.
Новое название темы - в личку модератору.
 
 
 
Страницы: 1
Читают тему
Наверх