ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вставка объекта в EXcel
7 сообщений из 7, страница 1 из 1
Вставка объекта в EXcel
    #33493866
Ekonomova
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ekonomova
Гость
В форму для заполнения вставляю объекты из Visio (просто на лист). Каджому объекту присваивается имя (мжет быть до 10 картинок). Потом их надо все скопировать на другой лист.
Помогите пожалуйста, никак не могу к ним обратиться, выделяет только по имени, а я не знаю какие имена будут использованы.
...
Рейтинг: 0 / 0
20.01.2006, 12:19:58
| Ответить | Цитировать | Написать  
Вставка объекта в EXcel
    #33494124
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    Dim obj As OLEObject
    
    For Each obj In Worksheets("Лист2").OLEObjects
        Debug.Print obj.Name
        Debug.Print obj.ProgId
        obj.Copy
        Worksheets("Лист3").Paste
    Next obj
...
Рейтинг: 0 / 0
20.01.2006, 13:18:41
| Ответить | Цитировать | Написать  
Вставка объекта в EXcel
    #33496793
Ekonomova
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ekonomova
Гость
Большое спасибо
Все работает, только что значат следующие строки, объясните если не трудно (я новичок в этом деле!)
Debug.Print obj.Name
Debug.Print obj.ProgId
...
Рейтинг: 0 / 0
23.01.2006, 11:33:19
| Ответить | Цитировать | Написать  
Вставка объекта в EXcel
    #33496816
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Выводит в окно отладки (Immediate Window) название объекта и его класс, т.е. получим примерно следующее:

Код: plaintext
1.
Object 1
Visio.Drawing.6
...
Рейтинг: 0 / 0
23.01.2006, 11:39:33
| Ответить | Цитировать | Написать  
Вставка объекта в EXcel
    #33496841
Ekonomova
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ekonomova
Гость
А тогда еще вопрос
У меня кроме объектов Visio на листе еще OptionButton и т.д. валяются и они у меня вместе с теми объектами копируются, как этого избежать
...
Рейтинг: 0 / 0
23.01.2006, 11:48:01
| Ответить | Цитировать | Написать  
Вставка объекта в EXcel
    #33496908
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Можешь так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    Dim obj As OLEObject
    
    For Each obj In Worksheets("Лист1").OLEObjects
        If obj.ProgId Like "Visio*" Then
            obj.Copy
            Worksheets("Лист2").Paste
        End If
    Next obj
...
Рейтинг: 0 / 0
23.01.2006, 12:07:14
| Ответить | Цитировать | Написать  
Вставка объекта в EXcel
    #33497034
Ekonomova
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ekonomova
Гость
Вроде получилось, спасибо
...
Рейтинг: 0 / 0
23.01.2006, 12:43:36
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вставка объекта в EXcel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=33496841&tid=2166519]:
 0ms
get settings:
 12ms
get forum list:
 18ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 194ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 213ms
total:  495ms
созд. / загр.: 495ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]