Очищение книги - Microsoft Office Excel

Волк · 26.02.2009, 12:01

Как при выходе сделать чтобы вся книга очищалась? Через VBA!

SAS888 · 26.02.2009, 13:09

Не совсем ясно, что понимать под словами "очистить книгу".
Ну, например, вставить в модуль "Эта книга" код:

Код:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim sh As Worksheet
    For Each sh In ThisWorkbook.Worksheets
        sh.Cells.Delete 'удалить все
        'sh.Cells.ClearContents 'только очистить содержимое
    Next
End Sub

Волк · 26.02.2009, 13:54

Чтобы при закрытии из книги все удалялось

SAS888 · 26.02.2009, 13:59

Лаконичность - это хорошо, но не до такой степени.
Что значит удалить все? Код из поста №2 удаляет все со всех листов перед закрытием книги. Программные модули тоже нужно удалять?

Юнлинг · 26.02.2009, 14:00

Цитата:

Сообщение от Волк

Чтобы при закрытии из книги все удалялось

Что должно удаляться? Непонятно
1. Можно выйти без сохранения изменений
2. Удалялись макросы. Ну это уже обсуждалось. (если надо дам ссылки)
3. Очитку листов книги тебе дал SAS888

Извени SAS888 не заметил твой пост

26.02.2009, 12:01	#1
Волк Форумчанин Регистрация: 04.02.2009 Сообщений: 156	Очищение книги Как при выходе сделать чтобы вся книга очищалась? Через VBA! Все мы отчасти гении!Но на сколько мы умны настолько же мы и глупы!

26.02.2009, 13:09	#2
SAS888 Старожил Регистрация: 05.12.2007 Сообщений: 4,180	Не совсем ясно, что понимать под словами "очистить книгу". Ну, например, вставить в модуль "Эта книга" код: Код: `Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim sh As Worksheet For Each sh In ThisWorkbook.Worksheets sh.Cells.Delete 'удалить все 'sh.Cells.ClearContents 'только очистить содержимое Next End Sub` Чем шире угол зрения, тем он тупее.

26.02.2009, 13:54	#3
Волк Форумчанин Регистрация: 04.02.2009 Сообщений: 156	Чтобы при закрытии из книги все удалялось Все мы отчасти гении!Но на сколько мы умны настолько же мы и глупы!

26.02.2009, 13:59	#4
SAS888 Старожил Регистрация: 05.12.2007 Сообщений: 4,180	Лаконичность - это хорошо, но не до такой степени. Что значит удалить все? Код из поста №2 удаляет все со всех листов перед закрытием книги. Программные модули тоже нужно удалять? Чем шире угол зрения, тем он тупее.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
снятие пароля с книги/листа из другой книги?	Bezdar	Microsoft Office Excel	3	25.12.2008 11:59
Книги по С++	DoomCross	Общие вопросы C/C++	0	18.12.2007 12:41
Работа с файлами (создание, удаление, открытие, связываение с переменной, очищение памяти переменной)	Arkuz	Общие вопросы Delphi	12	25.09.2007 20:47
книги	oLMeR	Свободное общение	2	10.11.2006 18:09