Игнорировать макросы

Петро Гость	#1 08.04.2010 12:44:57 Всем привет! Собираю макросом по файлам информацию, но в этих файла, при открытии и закрытии существуют обработочные макросы. Вопрос: Как их проигнорировать, чтобы они не запускались?

Alex_ST Пользователь Сообщений: 2774 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри	#2 08.04.2010 13:00:57 А разве для того, чтобы взять данные из файла, его обязательно открывать? С уважением, Алексей (ИМХО: Excel-2003 - THE BEST!!!)

Петро Гость	#3 08.04.2010 13:03:32 Ну я использую такую конструкцию Set Книга = Application.Workbooks.Open(ПолученноеИмяФайла, True, True) А есть другие варианты?

Alex_ST Пользователь Сообщений: 2774 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри	#4 08.04.2010 13:08:20 Точно можно. Делал. Очень просто. Но к сожалению, не помню как и где... Сейчас Гуру увидят тему и подскажут синтаксис обращения к листам/диапазонам книг. С уважением, Алексей (ИМХО: Excel-2003 - THE BEST!!!)

EducatedFool

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

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

08.04.2010 13:20:37

Sub ВашМакрос()
On Error GoTo выход
Application.EnableEvents = False ' отключаем обработку событий

' код обработки файлов

выход:
Application.EnableEvents = True ' включаем обратно
End Sub

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

Alex_ST Пользователь Сообщений: 2774 Регистрация: 22.12.2012 На лицо ужасный, добрый внутри	#6 08.04.2010 13:33:23 А разве Application.EnableEvents = False будет относиться и ко всем открываемым внутри этого макроса ДРУГИМ книгам? С уважением, Алексей (ИМХО: Excel-2003 - THE BEST!!!)

слэн Пользователь Сообщений: 5192 Регистрация: 16.01.2013	#7 08.04.2010 13:42:35 кодовое слово - application Живи и дай жить..

Hugo Пользователь Сообщений: 26348 Регистрация: 22.12.2012	#8 08.04.2010 13:51:07 Может формулы привлечь? Так, заготовка, в переменную не получилось данные закинуть: Sub ttt() ПолученноеИмяФайла = "пример.xls" fff = "='C:\temp\[" & ПолученноеИмяФайла & "]Изменения'!$B$2" [a2].Formula = fff [a2] = [a2] End Sub

Петро Гость	#9 08.04.2010 15:22:28 Всем спасибо, формулой конечно можно было, но там объемы не шуточные и самое главное в некоторых местах форматы тягать надо:) Спасибо за EnableEvents

Читают тему