set app = createobject("access.application")
set ws = createobject("wscript.shell")
ws.RegWrite _ "HKCU\Software\Microsoft\Office\" & app.version & _
"\Access\Security\VBAWarnings", "1", "REG_DWORD"
koyu yazan yerin kayit defterinde ki degeri 1 olmali. El ile regedit calistirilip, yapilabilir. Yukarida ki satirlari metin dosyasi icine yazilip, dosya uzantisini bat ile degistirilip ilgili dosyanin calistirilmasi ile yapilabilir.
NOT : BU ISLEM ESNASINDA VERSIYONU BOLUMUNE DIKKAT ETMELISINIZ.