Модераторы: mihanik
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как создать макрос выхода в Exel? 
V
    Опции темы
PrettyGirl
Дата 31.5.2007, 14:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 62
Регистрация: 9.5.2006

Репутация: нет
Всего: нет
Привет всем!!! 
помогите пожалуйста прописать кнопку выхода из макроса(что-ниб типа EXIT в программировании на Си)ю
Заранее спасибо! 
PM MAIL   Вверх
mihanik
Дата 31.5.2007, 15:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 9
Всего: 109
Поясни немного, что ИМЕННО ты хочешь?

Что за макрос?
Что делает?
Выводится ли форма при работе с этим макросом?




--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
PrettyGirl
Дата 31.5.2007, 15:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 62
Регистрация: 9.5.2006

Репутация: нет
Всего: нет
мне нужен совсем простой макрос для того ,чтобы показать отчеты. 
вот структура макроса: 
у меня есть 3 листа: 
Лист1(меню)
Лист2(исходные данные)
Лист3(расчет показателей) 
и 3 простейших модуля:
Код

Sub макрос1()

    Sheets("исходные данные").Select
    ActiveWindow.SmallScroll Down:=-39
End Sub

Код

Sub макрос1()
    Sheets("исходные данные").Select
    ActiveWindow.SmallScroll Down:=-39
End Sub

Код

Sub Макрос4()

    Sheets("меню").Select
End Sub



здесь же мне бы хотелось создать макрос на выход.

Добавлено через 3 минуты и 38 секунд
вот,кстати,о форме... я пока решила сделать без нее. 
ещё не совсем разобралась с формами.
могу ли я реализовать выход без форма на форме я знаю можно воспользоваться обработкой при нажатии клавиши и написать процедуру выхода: 

Код

Private Sub CommandButton2_Click()
    Unload Me
End Sub
 
PM MAIL   Вверх
bilya
Дата 31.5.2007, 15:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 3.1.2007

Репутация: 1
Всего: 1
Так вам нужно закрыть лист или книгу?
Из макроса выходить не надо, он завершается на строке End Sub
PM MAIL   Вверх
PrettyGirl
Дата 31.5.2007, 15:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 62
Регистрация: 9.5.2006

Репутация: нет
Всего: нет
я сделала так: 
Код

Sub Макрос3()
Application.Workbooks.Close
End Sub


это не повредит работе приложения?
PM MAIL   Вверх
mihanik
Дата 1.6.2007, 07:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 9
Всего: 109
Цитата(PrettyGirl @  31.5.2007,  15:48 Найти цитируемый пост)
это не повредит работе приложения? 


Нет, не повредит... Это просто закроет рабочую книгу...



--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
Ved
Дата 21.6.2007, 08:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 304
Регистрация: 3.8.2006
Где: Хижина в Тетюшах

Репутация: нет
Всего: 1
mihanik, Извините что влез в Вашу беседу но у меня небольшой вопросик!
Код

Sub Макрос3()
Application.Workbooks.Close
End Sub

Этот код просто книгу закрывает!


А полностью ексель закрыть, возможно макрокомандой или это на грани фантастики? smile 



--------------------
Я не волшебник, я только учусь!  smile 
PM MAIL   Вверх
mihanik
Дата 21.6.2007, 09:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


-=Белый Медведь=-
****


Профиль
Группа: Комодератор
Сообщений: 4054
Регистрация: 24.4.2006
Где: г. Тверь

Репутация: 9
Всего: 109
Цитата(Ved @  21.6.2007,  08:58 Найти цитируемый пост)
А полностью ексель закрыть, возможно макрокомандой или это на грани фантастики?  


Код

Private Sub CommandButton1_Click()
    Application.Quit
End Sub



Это сообщение отредактировал(а) mihanik - 21.6.2007, 09:21


--------------------
Программистами не рождаются, - это родовая травма...
user posted imageuser posted image
PM MAIL WWW ICQ   Вверх
Ved
Дата 21.6.2007, 09:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 304
Регистрация: 3.8.2006
Где: Хижина в Тетюшах

Репутация: нет
Всего: 1
mihanik, 
Блин вот я тупой, я по обычному бейсику по привычке
Код

end

пытался закрыть, благодарю за разъяснение!



--------------------
Я не волшебник, я только учусь!  smile 
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела

Если Вам понравилась атмосфера форума, заходите к нам чаще!
С уважением mihanik и staruha.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программирование, связанное с MS Office | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0474 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.