Providing I had set a reference to the Microsoft Outlook Object Library (In
the VBE, Tools | References), I could not repoduce your error.
Incidentally, but with no bearing on your problem, perhaps your code should
Dim myOlApp As Outlook.Application
Dim myItem As Outlook.MailItem
Set myOlApp = New Outlook.Application
Set myItem = myOlApp.CreateItem(olMailItem)