Sub Example_LoadDVB()
    ' Этот пример загружает DVB файл и выполняет макрокоманду,
    ' содержавшуюся в файле, используя RunMacro метод.
    '
    ' Этот пример использует DVB файл drawline.dvb.
    ' Вы должны изменить пример, чтобы использовать файл на вашем компьютере.
    '
        
    FileName = "c:\drawline.dvb"
    
    ' Загрузить выбраный DVB файл в VBA проект 
    LoadDVB FileName
    
    ' Выполнить макрос drawline
    RunMacro "Module1.Drawline"
    
    ' Выгрузить файл.
    UnloadDVB FileName
    
    MsgBox "DVB файл был выполнен! "
End Sub