Макрос для вызова файла!

[SStone]

Ребят, подскажите код макроса, который при нажатии на кнопку будет вызывать (открывать) определенный файл!
Заранее благодарен!

[EducatedFool]

Sub test()
    Workbooks.Open "c:\temp\file.xls"
End Sub

Если надо работать с этим файлом (а не просто открыть его), то можно использовать что-то вроде этого:

Sub test()
    Filename = "C:\Documents and Settings\Игорь\Рабочий стол\пользовательские функции.xls"
    Dim WB As Workbook
    Set WB = Workbooks.Open(Filename) ' открываем файл
    WB.Worksheets(1).[d24] = "текст" ' пишем текст в ячейку
    WB.Save ' сохраняем файл
    WB.Close False ' закрываем его
End Sub

[SStone]

EducatedFool, спасибо, но данный код для работы с книгами экселя, а если мне необходимо, например, по нажатию на кнопку открыть PDF-файл?

[EducatedFool]

http://www.programmersforum.ru/showthread.php?t=37071