使用VBA在Skype中发送消息
目标：当某个macros完成时，向Skype联系人发送消息。
来源：我search了一下，发现了一些问题，试图做同样的事情。 这是我使用Excel VBA将Skype消息发送到群聊的代码的基础，也是这个https://www.mrexcel.com/forum/excel-questions/424432-sending-skype-message-through-excel -vba.html这两个问题都使用类似的代码。
问题：当我运行代码时，出现以下错误：
运行时错误“429”：ActiveX组件不能创build对象
在线上：
Set aSkype = New SKYPE4COMLib.Skype 问：这个API是否仍然适用于这种程序？ 我如何解决正在进行的错误？
码：
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("user_name") Set oChat = aSkype.CreateChatWith(skUser.Handle) oChat.OpenWindow oChat.SendMessage "message" End Sub
Obs：我在每个创build的模块中显式使用选项。
这可能没有太大的帮助，但我不认为你在这里列出的代码工作或图书馆没有添加到您的Excel中。
相同的代码在这里： https : //stackoverflow.com/a/43172531/8716187
你有没有下载并注册Skype的DLL（错误必须与不添加它出现的ActiveX控件）。 如果您使用的是x64，则可能只有x32。
当您安装使用Skype4COM.dll依赖项的软件时，软件应自动为您注册该文件。 在某些情况下，您的DLL文件可能无法正确注册，因此将提供“Skype4COM.dll未注册”错误。 幸运的是，您可以使用名为“Microsoft Register Server”（regsvr32.exe）的内置工具重新注册您的Skype4COM.dll文件。 如何从提升的命令提示符（Windows XP，Vista，7，8和10）重新注册Skype4COM.dll：
点击开始button。
在search框中input“command”…不要点击ENTER！
在键盘上按住CTRL-Shift键的同时，按下ENTER键。
系统会提示您提供权限对话框。
单击是。
键入以下命令：regsvr32 / u Skype4COM.dll。
按ENTER键。 这将联合国注册您的文件。
键入以下命令：regsvr32 / i Skype4COM.dll。
按ENTER键。 这将重新注册您的文件。
closures命令提示符窗口。
重新启动与Skype4COM.dll错误相关的程序。
干杯，WWC