Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
18 / 17 / 3
Регистрация: 07.09.2015
Сообщений: 301

Проблема связывания объектов ActiveX и модулей

09.11.2019, 12:46. Показов 1626. Ответов 8
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Господа, добрый день.
Буду краток:
Есть некий элемент ToggleButton1, на листе1.
И есть модуль: NewMod.
Когда я в модуле пишу следующий код:

Visual Basic
1
2
3
Dim lst As Worksheet
Set lst = Sheets(1)
  MsgBox lst.ToggleButton1.Value
Ругается на строчку
Visual Basic
1
MsgBox lst.ToggleButton1.Value
Говорит, что нету этого элемента на листе. Как его, нету если прописать, код в модуле

Visual Basic
1
MsgBox Sheets(1).ToggleButton1.Value
Всё отработает. А вот с кодом:

Visual Basic
1
MsgBox lst.ToggleButton1.Value
Уже не видит. В чём прикол, как исправить данную ситуацию? Подскажите?
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
09.11.2019, 12:46
Ответы с готовыми решениями:

ActiveX и Netscape - проблема с использование серверных объектов
Я туту раздобыл серверный объектик ASPImage(может знаете ?) и пробовал его под нетскапе а он не работает. Я думал, что браузер не важен при...

как в VC++ создать ActiveX и использовать его методом позднего связывания?
Уважаемые знатоки! Подскажите, пожалуйста, как в VC++ создать ActiveX и использовать его методом позднего связывания? То есть, подобие...

Проблема связывания
Привет всем ! Есть в Аксесе две таблы: Переговоры и ССТ. В первой содержится список переговоров по номерам телефонов(естественно, для...

8
Заблокирован
09.11.2019, 15:31
Schumacher57, объявите
Visual Basic
1
Dim lst As Object 'или Variant - менее желательно
и всё получится
1
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
09.11.2019, 16:06
Schumacher57,

Добавлено через 33 минуты
Schumacher57, но если вам больше нравится
Visual Basic
1
2
Dim lst As Worksheet 'то надо так
MsgBox lst.OLEObjects("ToggleButton1").Object.Value
1
18 / 17 / 3
Регистрация: 07.09.2015
Сообщений: 301
09.11.2019, 19:55  [ТС]
Burk, Остап Бонд,
Спасибо, ребят, за ответ!
Правда говоря, я загуглил, оба эти предложенные варианты....
Хочу просто, чтобы события объектов на листе, обрабатывались в модуле, а не на листе.... А с таким гемором, не разгуляешься.
Можно поиграться с вариантом, что озвучил Burk...

Ладно. Мучает один, только вопрос:
Можно ли через классы, что-будь придумать?
Правда, на самом, деле будет достаточно, ответа "Да" \ "Нет"... Я в них совсем, бревно. Есть смысл туда вообще, лесть по этой теме, вопроса?

Ещё раз, спасибо, за ответы!
0
 Аватар для pashulka
4139 / 2243 / 940
Регистрация: 01.12.2010
Сообщений: 4,624
09.11.2019, 21:58
Можно также использовать кодовое имя рабочего листа, которое может и не совпадать с именем, которое отображается на ярлыке

Visual Basic
1
2
3
Dim lst As Object 'Dim lst As Лист1
Set lst = Лист1
MsgBox lst.ToggleButton1.Value
Visual Basic
1
MsgBox Лист1.ToggleButton1.Value
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
10.11.2019, 11:31
Schumacher57, у меня есть проект с кучей объектов на нескольких страницах (Option, Check), конечно я использую классы, алгоритм обработки кликов ведь одинаков
2
18 / 17 / 3
Регистрация: 07.09.2015
Сообщений: 301
11.11.2019, 05:19  [ТС]
Burk,
Ковыряю в инете... пока, что-то не очень.
Можно взглянуть, короткий пример (уверен, дальше сам допетрю), как сделать класс, обработки события нажатия, нескольких элементов на листе?)
Правда, думаю короткого примера, будет достаточно. Увидеть хоть минимум, как обратиться к коллекции этих элементов или как оно всё выглядит...
0
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
11.11.2019, 14:26
Лучший ответ Сообщение было отмечено Schumacher57 как решение

Решение

Schumacher57, посылаю вам один из файлов моего проекта, хорошо почищенный. Он и так не был предназначен для самостоятельной работы, поэтому нажимать на кнопки, наверно, нет смысла. Вы хотели посмотреть, как всё делается. Обращайте внимание на пояснения ЗАГЛАВНЫМИ БУКВАМИ. Посмотрите все модули проекта. Будут вопросы, шлите телеграммы.
Вложения
Тип файла: rar ОбследованClass.rar (233.3 Кб, 7 просмотров)
1
1847 / 1162 / 354
Регистрация: 11.07.2014
Сообщений: 4,107
12.11.2019, 08:01
Schumacher57, забыл сказать, что в один массив класса можно собирать аналогичные объекты с нескольких страниц
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
12.11.2019, 08:01
Помогаю со студенческими работами здесь

Связь ActiveX-объектов в форме
Добрый день. Возник вот такой вопрос, на который хотелось бы получить подробный ответ На форме есть 2 ActiveX объекта: Microsoft...

Проблема с ActiveX
Создал ActiveX компонент на Делфях (Аналог TChart) в этот ActiveX добавил интерфейс IChartSeries котрой хранит серию чарта, у COM-компонета...

Проблема формой с ActiveX
ПОМОГИТЕ!!! Есть форма, на ней 2 ListView, когда создавал, работала отменно. Сегодня запустил и с ужасом обнаружил, что при запуске...

Проблема с ActiveX CAB
CAB, в котором лежат два контрола: мой и MSINET (используется для upload файлов с компа клиента на веб-сервер) не хочет ставиться на компе...

Window server enterprise 2007 sp1, создание объектов ActiveX планировщиком
есть сервер с window server enterprise 2007 sp1 64-bit через планировщик задач не выполняются jscript -ы, где создаются ActiveX-...


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

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Новые блоги и статьи
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru