powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Доступ к объекту Screen в Excel
5 сообщений из 5, страница 1 из 1
Доступ к объекту Screen в Excel
    #33367520
Фотография grinya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Никак не пойму природу объекта Screen в Excel-e - является ли он встроенным
(MsgBox Screen.Width)
или его нужно объявлять через класс, типа
Dim MyScreen as New Screen?
В обоих случаях выдается сообщение, что объект не найден, или не определен такой тип.
Чувствую, где-то туплю, в References все перерыл, не нашел... Подскажите, как из Excel-евского VB добраться до него?
Спасибо.
...
Рейтинг: 0 / 0
Доступ к объекту Screen в Excel
    #33367779
Дмит
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В VBA нет объекта Screen. Используй API для определения видео режима (GetSystemMetrics).
...
Рейтинг: 0 / 0
Доступ к объекту Screen в Excel
    #33368245
Фотография grinya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, но мне это нужно не для разрешения, а посмотреть имя активного окна после запуска из экселевского макроса другого приложения, т.е.
FormName = Screen.ActiveForm.Caption
MsgBox FormName
Где бы найти соответсвующие функции в данном случае?
...
Рейтинг: 0 / 0
Доступ к объекту Screen в Excel
    #33369805
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В API конечно же. GetForegroundWindow() и GetWindowText()
...
Рейтинг: 0 / 0
Доступ к объекту Screen в Excel
    #33370597
Фотография grinya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, это и искал, то что надо.
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Доступ к объекту Screen в Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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