Зависание Excel при закрытии файла кодом

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Зависание Excel при закрытии файла кодом - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Зависание Excel при закрытии файла кодом (Макросы/Sub)

Зависание Excel при закрытии файла кодом

Алекс75

Дата: Понедельник, 27.04.2015, 11:57 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Файл сложный.
Цель: закрытие файла при разных условиях

[vba]

Код

If Sheets("spr2").Range("N10").Value = "save" Then ActiveWindow.Close savechanges:=False 'если есть метка save, то файл уже сохранён и тут просто нужно закрыть файл
'Если файл нужно закрыть без сохранения, то:
Application.EnableEvents = False
Sheets("spr2").Range("N9").Value = "close" 'ставим метку, что просто закрыть
ActiveWindow.Close savechanges:=False

[/vba]

Если файл открыт один, то всё проходит безболезненно. Но если открыто более одного файла, то этот то закроется, а дальше крутиться бублик и фатал еррор экселя. Остальные файлы закрываются в аварийном режиме.

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Зависание Excel при закрытии файла кодом (Макросы/Sub)

Страница 1 из 1
1