Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Как вставить ZIP-файл как объект
 
Добрый вечер.

С помощью Вставка => Объект => Package я вставляю zip-файл на лист (при этом записываю макрос)
Код
        ActiveSheet.OLEObjects.Add(ClassType:="Package2", Link:=False, _
        DisplayAsIcon:=True, IconFileName:="C:\WINDOWS\system32\packager.dll", _
        IconIndex:=0, IconLabel:="Package").Activate

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

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

Прежде чем задать вопрос здесь, я ищу ответ на него на просторах инета))
ComboBox - присвоить имена столбцов
 
Добрый день.
Как программно присвоить название колонке в ComboBox?
Что-то типа
Код
     ComboBox.Column(1).HeadText = "Колонка_1"

У меня стоит задача - считать данные с закрытой книги и заполнить ComboBox.  (Реализовано)

Но как задать имя столбцам незнаю.

Установил: ColumnCount = 3,  ColumnHeads = True

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

Вставил объект на лист.
Код
ActiveSheet.OLEObjects.Add(ClassType:="Paint.Picture", Link:=False, _         
DisplayAsIcon:=True, IconFileName:="C:\WINDOWS\system32\mspaint.exe", _         
IconIndex:=0, IconLabel:=txt).Select
With Selection
        .name = txt
        .Placement = xlFreeFloating
        .PrintObject = False
End With

И так создаю несколько объектов.

Далее вставляю картинку в какой нибудь объект.

Вопрос: "Как узнать, в каком объекте есть картинка и какой у него размер, а какой пустой?"

Прежде чем задать вопрос здесь, я ищу ответ на него на просторах инета))
Сохранить файл в формате XLSM с модулем
 
Добрый день.
Понимаю тема уже избита.
Вот строка кода, где как я понимаю должен сохраниться файл в формате XLSM с модулем.
Код
ActiveWorkbook.SaveAs Filename:=path, FileFormat:=52, CreateBackup:=False
Но сохраняется в XLSM без модуля?! Что не так?
Прежде чем задать вопрос здесь, я ищу ответ на него на просторах инета))
Качество фотки в Shape
 
Добрый день.
Столкнулся с такой ситуацией. Добавил в файл Shape для вставки в него картинки. Сохраняю это дело в 2003 все хорошо - качество не теряется. Тоже самое в 2007 - качество теряется. Тоже самое в 2010 - качество остается хорошим. Куда копать?
Прежде чем задать вопрос здесь, я ищу ответ на него на просторах инета))
Удалить фотографию из Shape
 
Добрый день.
Есть конструкция, которая вставляет картинку (фото) в shape
Код
ActiveSheet.Shapes("AutoShape 225").Fill.UserPicture ImaFile
Как удалить из shape картинку (фото), не удаляя сам shape?
Прежде чем задать вопрос здесь, я ищу ответ на него на просторах инета))
Как вставить картинку(фото) в ячейку бинарно
 
Добрый день. Есть файл Excel, нужно вставить картинку в ячейку листа бинарно, чтобы потом можно было ее открыть с помощью формы на Picture.
Прежде чем задать вопрос здесь, я ищу ответ на него на просторах инета))
Страницы: 1
Наверх