how to make excel open outlook inbox

hi all
i have some code that when command button is press it open's my inbox i have some code but keep getting compile error variable not defined here my code i have highlighted the code were it stops with error in red

Please Login or Register  to view this content.

thanks for your help in advance

Code works fine for me. Most likely issue is you don't have a reference to the Microsoft outlook library so it doesn't know what olFolderInbox is.

Does it work if you have:
Dim olApp As Object ' Outlook.Application
Set olApp = CreateObject("Outlook.Application")
olApp.Session.GetDefaultFolder(6).Display

work Great thanks Legend!!!!!!!!!