Excel VBA Макросы: Открытие файла .xlsm.

[Rengame113]

Как можно открыть файл .xlsm?

[Администратор]

Sub Макрос()

    Dim bk As Workbook
   
    ' Открываем файл и присваиваем ему имя 'bk'.
        ' Далее в коде будем обращаться к файлу, используя имя 'bk'.
    Set bk = Workbooks.Open(Filename:="C:\Users\User\Desktop\Книга1.xlsm")
   
    ' Закрытие файла без сохранения.
    bk.Close SaveChanges:=False
   
End Sub

[Rengame113]

спасибо