通过VBA

Question

我想通过excel宏发送Skype会议邀请。有办法吗？目前我只能创建一个普通的会议邀请。

Dim olApp As Outlook.Application

Dim ol_Meeting As Outlook.AppointmentItem

Set olApp = New Outlook.Application

Set ol_Meeting = olApp.CreateItem(olAppointmentitem)
ol_Meeting.MeetingStatus = olMeeting

With ol_Meeting

  .Display
  .Attachments.Add ThisWorkbook.Path & "\" & ThisWorkbook.Name

End With

Answer 1

假设您正在使用Skype for Business并假设该宏供您使用，您可以创建Outlook会议邀请并添加自动Skype链接，右键单击Skype会议链接，编辑超链接，复制它和添加到您的宏的电子邮件正文中。

这将填充您的电子邮件，其中包含访问您通常发送的任何Skype会议的链接。它对我有用。