Макрос, запускающий макрос из другого закрытого файла

[petruha]

Здравствуйте.
Использую Office 2007.
Поискал на форуме, не нашел ответа.
Опишу подробно проблему.
Есть книга1, которая лежит в определенном месте.
В книге1 есть некоторый макрос.
Книга1 закрыта.

Есть книга2, в которой нужно реализовать макрос, который запускает макрос из книги1.
Простите меня, если вопрос тривиальный.

Кроме того, не подскажете как сохранить новую книгу с расширением, отличным от xls(xlsm к примеру)?
Собственно, делаю так:

book.SaveAs Filename : = "E/newbook.xls"

Вот тут мне VB не разрешает поменять xls на xlsm.

Прошу вас подсказать решение.

[Alex-roz]

По второму вопросу:

Ch_Dir = "C:\" 'Путь для сохранения файлов
file_name = "имя_файла.xlsx"

ActiveWorkbook.SaveAs Filename:=Ch_Dir & file_name, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

[petruha]

Большое спасибо!

[Alex-roz]

Если формат другой, это надо указать:

Например, для xlsm - FileFormat:= xlOpenXMLWorkbookMacroEnabled

[petruha]

Да, я так и понял

[petruha]

Может, немного неправильно написал.
Файл, тот в котором макрос, открывать можно.
Лучше с закрытым, конечно если это возможно.

[Alex-roz]

А че будет выполнять макрос в закрытой книге? Обработка данных (ячеек или пр.) или какое-то отвлеченную задачу?
Если в макросе будут ссылки на объекты в закрытой книге, то (как мне кажется) задача несколько усложнится...

[The_Prist]

Вызвать макрос из другой книги можно так:

Sub Call_Macro_In_CloseBook()
Workbooks.Open ThisWorkbook.Path & "\Test.xls"
Application.Run "Test.xls!Module1.Test": Workbooks("Test.xls").Close True 'сохраняем изменения; False - не сохраняем
End Sub

Учитывая то, что для вызова макроса VBA в любом случае будет открывать книгу с макросом, то лучше сразу открыть и вызвать, а затем закрыть. Если в имени файла содержаться пробелы, то не забудьте ставить апостроф в методе Run:

Application.Run "'Test 1.xls'!Module1.Test"