Обойти запрет запуска макроса - VBA

Формулировка задачи:

Понимаю вопрос скорей не совсем умный... Проблема в следующем можно ли каким либо образом обойти защиту офиса при запуске макроса, т.е. например при открытии документа у меня должно всплыть окно диалога, но... если в (для 2003) сервис-макрос-безопасность стоит отключить макросы, то ничего не всплывет, кроме предупреждения что документ содержит макрос. Собсно вопрос, можно ли сделать так чтобы окно дилог окна всплывала в любом случае??

Решение задачи: «Обойти запрет запуска макроса»

textual
                            Листинг программы 
                        

                            Sub test() 
    Dim objXL
    Dim Secur
    Set objXL = CreateObject("Excel.Application") 
    objXL.Visible = TRUE
    secur = objXL.AutomationSecurity
    objXL.AutomationSecurity = 1
    objXL.Workbooks.Open replace(Wscript.ScriptFullName,".vbs",".xls"),,,,"4321"
    objXL.AutomationSecurity = secur
End Sub
                        