VBA的功能虽然强大，但并不能直接调用微信程序进行操作。实际上，它是通过VBS脚本模拟键盘的按键操作来实现与微信的交互。
关于表格式样：
在VBA中，语句如`ws.SendKeys “^%w”`是通过模拟键盘输入实现的。在这个例子中，”^”代表CTRL键，”%”代表ALT键，”w”代表W键。当它们组合在一起时，就形成了Ctrl+Alt+W的组合键，这是微信的默认快捷键。如果你更改过这个快捷键，那么相应的操作也需要调整。”+”代表Shift键，而”^%”则代表同时按下CTRL键、ALT键和空格键。
以下是一段代码示例：
`ws.Run “mshta vbscript:ClipboardData.SetData(“”Text””, &Cells(i, 1).Value)&”(close)”` 这行代码的作用是将单元格`Cells(i, 2)`中的文本内容发送到剪贴板。我们通常在`Cells(i, 1)`中存储微信昵称。这里的`SetData(“”Text””)`中的参数是文本，所以它只能处理文本信息，无法处理图片等媒体内容。
再比如，`ws.SendKeys “^f”`会发送Ctrl+F的组合键，这是微信中用于快速查找联系人的快捷键。代码中还使用了`Sleep`函数来实现延时，这是为了给微信足够的响应时间。`ws.SendKeys “^v”`则是将`Cells(i, 1)`中的微信昵称粘贴到查找窗。
按下”`{ENTER}`”键后，光标会跳转到微信的信息输入框。随后，将`Cells(i, 2)`中的信息发送到剪贴板，再粘贴到微信的信息输入框中，最后按下回车键完成信息的发送。由于`ClipboardData.SetData`只能处理文本数据，因此`Cells(i, 2)`只能是一个单独的单元格，不能是多个单元格组成的区域。
可以根据实际情况动态调整变量`i`的最大值。例如，通过`Cells(Rows.Count, 1).End(xlUp).Row`可以获取到某一列的最后一行非空行的行号。
