Как удалить файл при открытии

Как удалить файл при открытии, удаление макросом открытого файла

Artmasterpro Пользователь Сообщений: 128 Регистрация: 04.08.2014	#1 13.10.2015 16:05:57 Добрый день. Прошу помощи знатоков - можно ли как-то макросом удалить открытый Excel файл в Workbook_open() или в другом месте? Заранее спасибо!

Игорь

Пользователь

Сообщений: 3695 Регистрация: 23.12.2012

13.10.2015 16:10:34

да, можно

примерно так:

Код

    Application.DisplayAlerts = False ' отключаем уведомления
    FilePath$ = ThisWorkbook.FullName
    ThisWorkbook.ChangeFileAccess xlReadOnly ' разблокируем файл
    SetAttr FilePath$, vbNormal ' меняем его атрибуты
    Kill FilePath$: DoEvents ' удаляем файл
    ThisWorkbook.close false ' закрываем файл без сохранения

Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Artmasterpro Пользователь Сообщений: 128 Регистрация: 04.08.2014	#3 13.10.2015 16:12:24 Большое спасибо, сейчас попробую. Да , супер, все работает! Еще раз спасибо! Изменено: Artmasterpro - 14.10.2015 14:05:34

Читают тему