counterrojo
12-27-2011, 06:40 PM
Hi,
I have used the following code to add a reference in Excel. I was wondering if anyone knows how to adapt this to work in OutLook.
Sub AddShellReferences()
On Error Resume Next
'Reference ADO Object Library using Major / Minor GUID
Set ID = ThisWorkbook.VBProject.References
ID.AddFromGuid "{50A7E9B0-70EF-11D1-B75A-00A0C90564FE}", 1, 0
On Error GoTo 0
End Sub
Thanks!
I have used the following code to add a reference in Excel. I was wondering if anyone knows how to adapt this to work in OutLook.
Sub AddShellReferences()
On Error Resume Next
'Reference ADO Object Library using Major / Minor GUID
Set ID = ThisWorkbook.VBProject.References
ID.AddFromGuid "{50A7E9B0-70EF-11D1-B75A-00A0C90564FE}", 1, 0
On Error GoTo 0
End Sub
Thanks!