所以我已经在我的个人文件下创建了一个宏,现在我已经完成了它,我想将其传输到共享服务器上的独立文件中。如果我以个人身份运行程序=没问题,则运行完美。如果从共享文件打开,则会出现编译错误:未定义用户定义的类型。它指向私有子行,并突出显示“ outApp As Outlook.Application”行,任何帮助都将非常有用。
Private Sub Submitit_Click()
Dim outApp As Outlook.Application
Dim myMail As Outlook.MailItem
Set outApp = CreateObject("Outlook.Application")
Set myMail = outApp.CreateItem(olMailItem)