Автоматическая копия файла.

Автоматическая копия файла.

Оконщик Гость	#1 24.07.2012 18:29:34 Братцы подскажите как сделать чтобы при закрытии файл автоматически сохранял копию.

EducatedFool Пользователь Сообщений: 3695 Регистрация: 23.12.2012	#2 24.07.2012 19:58:17 Назначьте на закрытие книги этот макрос: http://excelvba.ru/code/createbackup Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#3 24.07.2012 20:48:26 В "Приемах" ещё есть: http://www.planetaexcel.ru/tip.php?aid=72

Оконщик Гость	#4 24.07.2012 21:01:11 EducatedFool, спасибо. Только мне не нужна новая папка с архивом. А нужна просто копия этого файла рядом.

Оконщик Гость	#5 24.07.2012 21:44:03 EducatedFool,и ещё один момент. Ваш макрос делает копию при открытии файла, а требуется при сохранении или закрытии.

Юрий М Модератор Сообщений: 61089 Регистрация: 14.09.2012 Контакты см. в профиле	#6 24.07.2012 22:24:16 Оконщик, EducatedFool ведь пишет Вам: "Назначьте на закрытие книги этот макрос". Вариант из "Приемов", ссылку на который я дал, не подходит?

EducatedFool Пользователь Сообщений: 3695 Регистрация: 23.12.2012	#7 24.07.2012 22:30:02 Чтобы макрос срабатывал при ОТКРЫТИИ книги, используется такой код в модуле ЭтаКнига: Private Sub Workbook_Open() ' срабатывает каждый раз при открытии файла CreateBackup ' архивация книги End Sub Для СОХРАНЕНИЯ и ЗАКРЫТИЯ используйте аналогичный код в том же модуле: Private Sub Workbook_BeforeClose(Cancel As Boolean) ' перед закрытием файла CreateBackup ' архивация книги End Sub Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) ' перед сохранением файла CreateBackup ' архивация книги End Sub Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Читают тему

Наверх