Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Программирование, связанное с MS Office > Помоги с VBA в экселе!!!срочно нужно!


Автор: rehom 25.3.2009, 23:26
ЛЮДИ ДОБРЫЕ помоги с вба в экселе...ОЧЕНЬ НУЖНА ПОМОЩ!!!
подскажите пожалуйста код для перехвата сообщения экселя.
Пример:когда открывааешь файл эксель и делаешь там какието изменения а потом повторно пытаешься открыть его то выскакивает окно что повторное открытие приведет к потере несохраненных данных.продолжить? и в сообщении 2 кнопки да и отмена.
так вот вопрос в том какой код нужен чтобы например если я нажму да файл сохранился бы и открлся бы заново уже такойже как после сохранения.или еще пример:делаем изменения в файле эксель а потом жмем крестик(закрыть приложение)вылетает стандартное окно:сохранить изменения в файле? и три кнопки да нет отмена.как прописать например кнопке нет чтобы файл всеравно сохранился?

Автор: Akina 25.3.2009, 23:33
Прими тридцать капель валерьянки. Успокойся. Подумай как спросить, чтобы другие поняли. Спроси снова.

Автор: rehom 25.3.2009, 23:53
ну а что непонятного?
мне нужен код перехвата сообщений экселя.
короче-когда появляеться окно экселя неважно какое например сохранить изменения.как узнать какую кнопку нажал пользователь?
т.е. как узнать что пользователь нажал ок-нужен именно код...

Автор: Akina 26.3.2009, 00:07
Ну скажем так - малой кровью нереально. Да и большой может нехватить.

Опиши лучше ВСЮ задачу - нахрена оно тебе? может, цель-то достигается более простыми средствами...

Автор: rehom 26.3.2009, 00:25
в том то и проблема что это и есть вся задача...
нужен просто код...а если задачу то вот она-
"когда появляеться окно экселя неважно какое например сохранить изменения.как узнать какую кнопку нажал пользователь?
т.е. как узнать что пользователь нажал ок-нужен именно код..."

Автор: RockClimber 26.3.2009, 14:13
Поскольку задача сформулирована расплывчато, предложу такой вариант (для второго случая - перехват закрытия): пишем макрос на событие BeforeClose:
Код
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub

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

Автор: rehom 26.3.2009, 21:32
RockClimber, спасибо но ето чуть чуть не то...даж не знаю как обьяснить...нужо понять на какую кнопку нажал пользователь-например если он нажал нет то всеравн сохранить файл и закрыть книгу...это задание 5 лет никто сделать не может=((((остаеться надеятья на форум...

Автор: Akina 26.3.2009, 21:51
То есть задача - ТОЛЬКО сохранить книгу вне зависимости от того, выбрал юзер сохранение или отказ от него? 

Автор: rehom 26.3.2009, 22:04
нет.
задача в том чтобы докапаться как присвоить кнопкам на стандартных окнах эксель другие значения.

Автор: RockClimber 27.3.2009, 12:43
Цитата(rehom @  26.3.2009,  21:32 Найти цитируемый пост)
RockClimber, спасибо но ето чуть чуть не то...даж не знаю как обьяснить...нужо понять на какую кнопку нажал пользователь-например если он нажал нет то всеравн сохранить файл и закрыть книгу...это задание 5 лет никто сделать не может=((((остаеться надеятья на форум...


Цитата
Akina 
То есть задача - ТОЛЬКО сохранить книгу вне зависимости от того, выбрал юзер сохранение или отказ от него? 
rehom
нет.
задача в том чтобы докапаться как присвоить кнопкам на стандартных окнах эксель другие значения.

Вы путаетесь в показаниях. Что важнее: в любом случае сохранить книгу или в любом случае "докапаться как присвоить кнопкам на стандартных окнах эксель другие значения" и переназначать на них любые действия?

Автор: Akina 27.3.2009, 13:08
 smile 
Цитата(rehom @  26.3.2009,  23:04 Найти цитируемый пост)
присвоить кнопкам на стандартных окнах эксель другие значения

Не мучайся - напиши свой Эксель. быстрее будет.

Автор: rehom 27.3.2009, 18:08
ясна...кароч никто не может помочь......

Автор: RockClimber 30.3.2009, 09:02
А что делать? Excel, мягко говоря, не совсем для этого предназначен...

Автор: Staruha 30.3.2009, 10:22
Эта книга
Код

Private Sub Workbook_Deactivate()
ThisWorkbook.Save
End Sub

 Нажмешь нет сохранит.А нажмешь да - откроет с диска еще несохраненный файл.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)