excel vba SKYPE4COMLib не работает со Skype для бизнеса (SfB)

Есть ли способ отправлять сообщения через Skype для бизнеса с помощью Excel VBA? Я попытался добавить SKYPE4COMLib и следующий код:

Sub skype()
Dim aSkype As SKYPE4COMLib.skype
Set aSkype = New SKYPE4COMLib.skype
Dim oChat As Chat
Dim skUser As SKYPE4COMLib.user
    Set skUser = aSkype.user("user_name")
    Set oChat = aSkype.CreateChatWith(skUser.Handle)
   oChat.OpenWindow
   oChat.SendMessage "automated message"
End Sub

Но это не работает :( Возможно ли это вообще? Большое спасибо!


excel vba skype-for-business
person Marian    schedule 31.03.2017    source источник

Ответы (1)


arrow_upward
2
arrow_downward

Пожалуйста, имейте в виду, что есть два продукта:

оба продукта можно использовать для чата и звонков (VOIP), однако они не являются одними и теми же продуктами. SfB в основном используется для компаний, где SfC в основном используется для потребителей, поскольку вы можете скачать клиент здесь бесплатно, а также можете бесплатно использовать некоторые функции из SfC.

Skype4com.lib совместим только с SfC, но не с SfB. Это связано с тем, что Lync 2013/SfB 2015 не предоставляет точки входа COM, которые может использовать Excel (см. здесь). Если вы хотите отправлять чаты через SfB, проверьте UCWA 2.0.

person BastianW    schedule 02.04.2017