gpt4 book ai didi

vba - 如何在VBA中进行后期绑定(bind)?

转载 作者:行者123 更新时间:2023-12-02 12:38:14 27 4
gpt4 key购买 nike

我有一个通过 VBA 创建电子邮件的函数。

我通过 Excel 2016 完成了此操作。当我的一些同事尝试使用它时,出现了缺少引用的错误(Outlook Library 16.0)。

我在互联网上寻找解决方案,发现最好的是后期绑定(bind)。我已经阅读过它,但我不明白如何使其在以下示例代码中工作。

Sub EscalateCase(what_address As String, subject_line As String, email_body As String)

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")

Dim olMail As Outlook.MailItem
Set olMail = olApp.CreateItem(olMailItem)

olMail.To = what_address
olMail.Subject = subject_line
olMail.BodyFormat = olFormatHTML
olMail.HTMLBody = email_body
olMail.Send

End Sub

最佳答案

这是早期绑定(bind):

Dim olApp As Outlook.Application
Set olApp = New Outlook.Application

这是后期绑定(bind):

Dim olApp As Object
Set olApp = CreateObject("Outlook.Application")

后期绑定(bind)不需要引用 Outlook Library 16.0,而早期绑定(bind)则需要。但是,请注意,后期绑定(bind)会慢一些,并且您不会获得该对象的智能感知。

关于vba - 如何在VBA中进行后期绑定(bind)?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/47056390/

27 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com