Форум пользователей Visio

Форум по вопросам применения и программирования в Visio
Текущее время: 20 ноя 2019, 21:05

Часовой пояс: UTC + 3 часа [ Летнее время ]


Правила форума


При размещении файлов предпочтительным является формат vsd (а не vsdx/vsdm)
Размещая ваши вложения на форуме не используйте имена файлов содержащих кириллицу, в противном случае файл будет иметь имя .<расширение файла> !
Для форматирования ваших сообщений используйте BBCodes, описание используемых на форуме BBCodes.



Начать новую тему Ответить на тему  [ Сообщений: 10 ] 
Автор Сообщение
 Заголовок сообщения: закрытие визио
СообщениеДобавлено: 14 дек 2011, 13:40 
Не в сети

Зарегистрирован: 26 июл 2011, 16:29
Сообщений: 5
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
как закрыть автоматически визио при закрытии формы?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 15 дек 2011, 11:00 
Не в сети
Глав-тролль

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3728
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Сбор вторичного сырья
Должность: Безработный
Уровнь квалификации: Отсутствует
закрывать визио надо из какого приложения ? неужели из самого визио …

как закрыть приложение Visio я не догнал еще, а если тупо закрыть активный документ

Код:
Sub lol()
UserForm1.Show
UserForm_close
app.Quit
End Sub
Private Sub UserForm_close()
ActiveDocument.Close
End Sub


честно говоря не понял глубинного сакрального смысла данного кода :)


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 15 дек 2011, 13:58 
Не в сети

Зарегистрирован: 26 июл 2011, 16:29
Сообщений: 5
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Ситуация такая: при открытии документа появляется модальная форма с листбоксом для выбора фамилии пользователя и кнопкой выход для тех кто случайно запустил этот файл.при нажатии на кнопку выход ни сам документ ни визио не получается закрыть.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 15 дек 2011, 16:13 
Не в сети
Глав-тролль

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3728
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Сбор вторичного сырья
Должность: Безработный
Уровнь квалификации: Отсутствует
на форму добавил кнопку Exit. все работает, см. пример


ничего не происходило, т.к. не было модуля обрабатывающего нажатие кнопки. или таки было ?


Вложения:
Комментарий к файлу: см. код кнопки cmdExit
primer.7z [10.73 Кб]
Скачиваний: 77
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 16 дек 2011, 11:16 
Не в сети

Зарегистрирован: 26 июл 2011, 16:29
Сообщений: 5
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
Спасибо за пример.документ таки закрылся. А визио - нет! Хотелось бы чтоб и документ и визио закрылись при нажатии на exit.


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 16 дек 2011, 21:54 
Не в сети
Глав-тролль

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3728
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Сбор вторичного сырья
Должность: Безработный
Уровнь квалификации: Отсутствует
У меня тоже Визио не закрывается …

Не знаю как победить.
Unload.Me не работает. да и если бы работал, после выгрузки макроса. файл не закроется
ActiveDocument.Close и ActiveWindow.Close - данный файл закрылся, макрос был в нем - соответственно выполнение макроса прекращается

а если форму с листбоксом засунуть в другое приложение - все будет работать. я делал создание и закрытие файлов визио из под экселя


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 23 дек 2011, 09:39 
Не в сети
Ветеран

Зарегистрирован: 21 окт 2011, 12:01
Сообщений: 915
Откуда: г. Екатеринбург
Использую Visio c: 2011
Очков репутации: 123

Добавить очки репутацииУменьшить очки репутации
Visio.Application.Quit


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 23 дек 2011, 14:05 
Не в сети
Глав-тролль

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3728
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Сбор вторичного сырья
Должность: Безработный
Уровнь квалификации: Отсутствует
Цитата:
Visio.Application.Quit


у меня в Визио2003 этот код не работает…


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 24 дек 2011, 18:01 
Не в сети
Ветеран

Зарегистрирован: 21 окт 2011, 12:01
Сообщений: 915
Откуда: г. Екатеринбург
Использую Visio c: 2011
Очков репутации: 123

Добавить очки репутацииУменьшить очки репутации
У меня тоже 2003
Вот пример. работает.
Окно с кнопкой должно быть немодальным, как в моем примере. Или модальным, но запущенным НЕ из обработчика событий, иначе визио ругается.


Вложения:
exit.rar [11.57 Кб]
Скачиваний: 84
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: закрытие визио
СообщениеДобавлено: 05 апр 2012, 14:07 
Не в сети
Глав-тролль

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 3728
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Сбор вторичного сырья
Должность: Безработный
Уровнь квалификации: Отсутствует
Да, так действительно работает !

Спасибо, коллега :)


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 10 ] 

Часовой пояс: UTC + 3 часа [ Летнее время ]



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы можете начинать темы
Вы можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Вы можете создать форум бесплатно PHPBB3 на Getbb.Ru, Также возможно сделать готовый форум PHPBB2 на Mybb2.ru
Русская поддержка phpBB