locked
SEND SMS FROM VBA EXCEL TO SKYPE FOR BUSNESS RRS feed

  • Question

  • Can you please  provide me code for sending message from excel vba to Skype for business 

    below code is not working for me 


    Sub testingskype()
    Dim aSkype As SKYPE4COMLib.Skype
    Set aSkype = New SKYPE4COMLib.Skype
    Dim oChat As Chat
    Dim skUser As SKYPE4COMLib.User
        Set skUser = aSkype.User("ranya.paraprath@accenture.com")
        Set oChat = aSkype.CreateChatWith(skUser.Handle)
        oChat.OpenWindow
        oChat.SendMessage "hello.....testing"
    End Sub

    I am getting error as  Run-time error '-2147220991(80040201); wait time out

    I have added the SKYPE4COMLib  reference in my VBA project

    this issue is because of I am using SKYPE for business  

    SKYPE4COMLib dll cannot invoke   SKYPE for business

    can you please help me for solve this issue
    Sunday, February 3, 2019 3:40 AM