我有另一个问题得到关于Outlook的回答 . 我需要从我发送的电子邮件草稿中获取附件,以便我可以检查它们是否是excel文件,如果是这样,请阅读excel文件,将该excel文件中的某些文本复制/粘贴到正文中电子邮件 . 感谢我的回答Previous Question我还在研究如何将附件添加到特定的电子邮件草稿中,但更紧迫的问题是,一旦我添加了某些内容,我会尝试在excel中打开它
Dim NewMail As MailItem, oInspector As Inspector
Set oInspector = Application.ActiveInspector
Dim eAttachment As Object
'~~> Get the current open item
Set NewMail = oInspector.CurrentItem
Set eAttachment = CreateObject("Excel.Application")
With eAttachment
' Change file name to suit
.Workbooks.Open FileName:=NewMail.Attachments.Item(1).FileName
End With
但它基本上告诉我该文件不存在 . 所以我查看附件上的pathName,发现它被设置为空 . 那里没有文字 . 我认为这与附加的Excel文件在与我正在使用的计算机网络连接的计算机上有关 . 我搜索过,但是由于显而易见的原因,搜索“在联网计算机上获取Outlook电子邮件附件的内容”并没有告诉我我想要的结果 .
如何访问附加的Excel文件的工作簿?请注意我的示例仅使用第一个附件,因为对于测试阶段,我现在只附加1个excel文件 . 当我可以打开Excel文件时,我会检查附件以确保它们是excel文件,然后再打开它们 .
编辑:我刚刚将文件复制到我的本地硬盘驱动器并尝试从那里打开文件,同样的问题 . 我打算暂时拥有相同的文件以便打开它吗?这是编辑电子邮件附件时Outlook的作用吗?