Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема с ActiveX в VB / 10 сообщений из 10, страница 1 из 1
30.05.2007, 12:27:42
    #34560744
obnin
obnin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
Доброго времени суток!
Проблема в следующем.
Пытаюсь вставить в Excel компонент ActiveX(BARCODE.OCX, используется обычно в 1С для отображения штрихкодав), но так как с VB толком не знаком, то ничего не получается.
В ссылки я его добавил.

Пишу
Dim mybar As BARCODELib.Barcode
Set mybar = CreateObject("BARCODELib.Barcode")
он ругается
ActiveX component can't create object

Что делаю не так?

И еще, если кладу на Excel этот мой объект, то как к нему потом обратиться?

Огромное спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 14:53:04
    #34561387
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
obnin

попробуйте так:
Код: plaintext
1.
Dim mybar As BARCODELib.Barcode
Set mybar = New BARCODELib.Barcode
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 16:57:39
    #34562043
obnin
obnin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
Спасибо, вроде прокатило, только потом опять ступор....
Пытаюсь запихать объект в лист
Код: plaintext
1.
ActiveSheet.OLEObjects.Add(ClassType:=New BARCODELib.Barcode, Link:=False _
     , DisplayAsIcon:=False, Width:=MyWidth, Height:=MyHeight, Top:=MyTop, Left:=MyLeft).Select

пишет Cannot insert object

:(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 17:04:07
    #34562070
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
Вместо
Код: plaintext
ClassType:=New BARCODELib.Barcode
попробуйте
Код: plaintext
ClassType:="BARCODELib.Barcode"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 17:14:57
    #34562102
obnin
obnin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
пишет Cannot insert object
:(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 17:16:54
    #34562112
obnin
obnin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
и если пишу "BARCODELib.Barcode.1" (видел в примере)
то тоже не работает...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 17:22:11
    #34562134
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
Я, в общем, представления не имею, что это за объект такой "BARCODELib.Barcode".
Попробуйте открыть диалог "Вставка объекта" (Вставка > Объект...) и поищите его там. Если он там есть, то можно запустить макрорекодер, вставить объект вручную и посмотреть на сгенеренный код.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 17:30:51
    #34562173
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
А вообще, полезайте в реестр и ищите там "BARCODELib.Barcode" в HKEY_CLASSES_ROOT. И посмотрите значение “CurVer”. Если не получится так, то посмотрите “CLSID” этого компонента и подставьте это значение в ClassType:=
Что-то типа:
ClassType:="{0e8d0700-75df-11d3-8b4a-0008c7450c4a}"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 18:17:32
    #34562374
obnin
obnin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
Все оказалось намного интерестнее, чем могло было бы быть :)
В реестре, вместо "BARCODELib.Barcode" находится ветка "BARCODE.BarcodeCtrl.1"
я это название подстваил в ActiveSheet.OLEObjects.Add и все заработало :)

Лена, огромное Вам спасибо!!! ;)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2007, 18:23:39
    #34562390
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ActiveX в VB
Мы все тут рады за Вас :)
Правда, рады.
С нетерпением ждем следующих граблей, на которые Вам доведется наступить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема с ActiveX в VB / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 359ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2182875]:
 0ms
get settings:
 9ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 59ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 33ms
get tp. blocked users:
 1ms
others: 233ms
total:  359ms
x
x
Закрыть


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