J
Jason Zischke
Hi all,
I want my program to automatically install all the applicable references and
I found a bit of code that looked like it would work however it didn't it
came up with 'error 1004 Programmatic access to Visual Basic Project is not
trusted'.How can I get arround this, below is my code.
Private Sub Workbook_Open()
'Visual Basic for Applications
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common
Files\Microsoft Shared\VBA\VBA6\VBE6.DLL")
'Microsoft Excel 11 Object Library
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Microsoft
Office\OFFICE11\EXCEL.EXE")
'OLE Automation
ThisWorkbook.VBProject.References.AddFromFile
("C:\WINDOWS\system32\STDOLE2.TLB")
'Microsoft Office 11 Object Library
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common
Files\Microsoft Shared\OFFICE11\MSO.DLL")
'Microsoft Forms 2.0 Object Library
ThisWorkbook.VBProject.References.AddFromFile ("C:\WINDOWS\system32\FM20.DLL")
'Microsoft Office Web Components 11.0
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common
Files\Microsoft Shared\Web Components\11\OWC11.DLL")
'Microsoft Office Web Components 9.0
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Microsoft
Office\Office\MSOWC.DLL")
End Sub
Thanks in adavnce
Jason
I want my program to automatically install all the applicable references and
I found a bit of code that looked like it would work however it didn't it
came up with 'error 1004 Programmatic access to Visual Basic Project is not
trusted'.How can I get arround this, below is my code.
Private Sub Workbook_Open()
'Visual Basic for Applications
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common
Files\Microsoft Shared\VBA\VBA6\VBE6.DLL")
'Microsoft Excel 11 Object Library
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Microsoft
Office\OFFICE11\EXCEL.EXE")
'OLE Automation
ThisWorkbook.VBProject.References.AddFromFile
("C:\WINDOWS\system32\STDOLE2.TLB")
'Microsoft Office 11 Object Library
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common
Files\Microsoft Shared\OFFICE11\MSO.DLL")
'Microsoft Forms 2.0 Object Library
ThisWorkbook.VBProject.References.AddFromFile ("C:\WINDOWS\system32\FM20.DLL")
'Microsoft Office Web Components 11.0
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Common
Files\Microsoft Shared\Web Components\11\OWC11.DLL")
'Microsoft Office Web Components 9.0
ThisWorkbook.VBProject.References.AddFromFile ("C:\Program Files\Microsoft
Office\Office\MSOWC.DLL")
End Sub
Thanks in adavnce
Jason