Sub BBB()
'{00062FFF-0000-0000-C000-000000000046}
ThisWorkbook.VBProject.References.AddFromGuid _
"{00062FFF-0000-0000-C000-000000000046}", 5, 0

End Sub

You can always use late binding.


http://support.microsoft.com/?id=167223
Microsoft Office 97 Automation Help File Available on MSL

--
Regards,
Tom Ogilvy



"Chad" wrote:

I'm looking for code to add a reference to the Microsoft Outlook library. I
think its something like:

ThisWorkbook.VBProject.References.AddFromFile
or
ThisWorkbook.VBProject.References.AddFromGuid

but I can't figure out the final portion to actually add the reference. Or
perhaps there's a better way...

Any help is appreciated. Thanks,
Chad