在VBA中发送信息主要可以通过以下几种方式实现：
使用Outlook发送邮件
通过Outlook对象模型，可以编写VBA代码来创建、设置和发送邮件。这需要引入Outlook对象库，并使用其相关属性和方法，如`To`、`Subject`和`Body`等。
使用腾讯云短信服务发送短信
可以通过Excel VBA引入腾讯云短信服务的SDK或使用API接口，编写代码调用接口发送短信。这需要先开通腾讯云短信服务并获取API密钥。
模拟人操作发送微信信息
VBA可以模拟打开微信、搜索联系人、打开联系人窗口、粘贴信息并发送等步骤来发送微信信息。这种方式较为复杂，需要模拟用户操作。
使用第三方插件发送邮件
如果需要更强大的邮件发送功能，可以考虑使用第三方插件来扩展VBA中发送邮件的能力。
使用CDO组件发送邮件
CDO（Component Object Model）是一种独立于Outlook的邮件发送方式，适用于不依赖于Outlook的情境。需要提供SMTP服务器的地址、端口、用户名和密码等信息。
示例代码
```vba
Sub SendEmail（）
Dim olApp As Outlook.Application
Dim olMail As Outlook.MailItem
Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem（olMailItem）
With olMail
.To = "fishbro@example.com"
.Subject = "VBA真好玩"
.Body = "鱼哥，我学会用VBA发邮件啦!"
.Send
End With
Set olMail = Nothing
Set olApp = Nothing
End Sub
```
建议
选择合适的方法：根据实际需求选择最合适的发送方式，例如，如果需要发送大量邮件，使用腾讯云短信服务或CDO组件可能更高效。
确保环境配置正确：在编写和运行VBA代码前，确保已正确安装和配置了所需的Office套件和第三方服务。
处理异常：在实际应用中，应添加适当的错误处理代码，以确保在发送邮件过程中出现问题时能够及时发现并处理。