Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.05.2010, 12:30   #11
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Эту функцию располагаете в книге.с которой идет проверка.
Еще раз объясняю принцип работы.Функция Forms_Open передает в функцию API
FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
команду ,
- посмотри ,не видишь ли окно с заголовком "Кн_1"
и если форма открыта,функция возвращает число отличное от 0,если не видит эту форму возвращает 0
Анализ,обработка данных Недорого

Последний раз редактировалось doober; 12.05.2010 в 12:32.
doober вне форума Ответить с цитированием
Старый 12.05.2010, 15:23   #12
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию вопрос к doober и IgorGo

Подскажите пож. как функция трактует открытую форму (Show=True) при сворачивании окна книги или Excel ?
alvazor вне форума Ответить с цитированием
Старый 12.05.2010, 18:07   #13
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

результаты испытаний.Макрос запускался в ворде,окно Екселя было свернуто.-Результат True
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 13.05.2010, 14:06   #14
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

Спасибо, doober! Это уже что-то!
По проблемке открыл новую тему:
http://www.programmersforum.ru/showt...134#post524134
Может, глянете на досуге
С уважением
alvazor вне форума Ответить с цитированием
Старый 14.05.2010, 16:51   #15
transgd
Пользователь
 
Регистрация: 16.04.2009
Сообщений: 37
По умолчанию doober

Спасибо, все работает.
Понял в чем была проблема.
Мне казалось, что после открытия второй книги из формы в первой книге и возврате обратно в первую книгу (с закрытием второй), код формы первой книги будет продолжаться. Увы. Может кто объяснит, почему так.
transgd вне форума Ответить с цитированием
Старый 14.05.2010, 17:02   #16
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Для того .чтобы контролировать несколько книг с их формами надо.
Заголовки форм должны быть разные.
Если Книга будет все время отрыта напишем сейчас класс.
Если книга1 закрывается,то совсем другое надо.Книга1,с котрой запускается макрос-все время открыта?
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 14.05.2010, 19:06   #17
transgd
Пользователь
 
Регистрация: 16.04.2009
Сообщений: 37
По умолчанию doober

Да, Книга 1 всегда открыта.
Запускаемая Форма 1 в Книге 1 используется для выбора месяца (номер которого входит в имя второй открываемой книги) и для указания цеха, имя которого используется для поиска расположения второй книги.
Книга 2 открывается и закрывается из Формы 1 Книги 1.
Name Книги 1 : "Таб.учет"
Name Формы 1: "Welcome"

Name Книги 2 : "табель_1" или "табель_2" и т.д. (в зависимости от выбранного месяца).
Name Формы 2: "Menu"
transgd вне форума Ответить с цитированием
Старый 14.05.2010, 20:28   #18
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Был бы код было бы проще.Во вложении наметки.Посмотрите на статус бар.Запускайте файлы формы.выделяйте диапазоны.может в чем то и пригодится
Вложения
Тип файла: rar 1234.rar (35.9 Кб, 11 просмотров)
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 14.05.2010, 21:05   #19
transgd
Пользователь
 
Регистрация: 16.04.2009
Сообщений: 37
По умолчанию doober

Спасибо! Надо переварить, как мне это использовать.
transgd вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с Form SHOW HIDE и виндовые окна AK BULLETS Общие вопросы Delphi 11 27.02.2015 11:32
UserForm Hide Show Insainer Microsoft Office Excel 9 28.11.2010 16:31
форма находится в закрытом состоянии segail Microsoft Office Excel 2 07.05.2010 17:38
Hide Witaliy Общие вопросы Delphi 2 12.05.2008 09:21
Form1.Hide и Form1.Show... Roof Общие вопросы Delphi 9 13.10.2007 13:33