如何使用VBA指定要从其发送电子邮件的帐户

我有一个使用VBA自动发送电子邮件的macros。 在我的Outllok，我有3个不同的帐户/电子邮件设置，我可以发送电子邮件。

这是我的macros

Set olapp = New Outlook.Application Set msg = olapp.CreateItem(olMailItem) msg.To = Sheets("CONFIRM").Range("G2") msg.Subject = Subj msg.BodyFormat = olFormatHTML msg.HTMLBody = "<p style='font-family:calibri;font-size:15'>" & Body & "</p>" msg.Attachments.Add (DestinationFile1) msg.Send 

如何指定使用哪个帐户发送电子邮件….谢谢

Answer 1

制作3个macros，每个帐户一个，根据标准调用你想要的macros。 或者根据我所设想的G1 G2或G3标准包括select声明