Bootstrap

如何基于VBA在word中嵌入AI模型实现实时问答(Siliconflow&&DeepSeek)

目录

前言

第一步:点击开发工具

第二步:启用宏命令

第三步:创建VB宏命令

点击菜单【开发工具】下的VB编辑器【Visual Basic】

3.1 创建DeepSeek模块

3.1.1 复制代码到DeepSeek模块

3.1 创建Silicon模块

设置接入模型和API

保存VB脚本并关闭窗口

新建宏命令组

配置VBA引用库

开始测试

调用CallSilicon

调用DeepSeek

​编辑



前言

关于将AI模型通过API接入Word,以便直接在word中进行问答式对话,最终以文本形式输出在Word中。个人建议,以实际需求为准,因为各有优劣。个人尝试了多种AI接入,效果各有差别,取决于:

  1. 各AI模型API的调用效率
  2. VBA熟练程度

本文会面向硅基流动Siliconflow和DeepSeek两种,详细介绍具体操作流程和VBA代码。当然也可以自己基本提供的VBA修改成自己期望接入的AI模型。

第一步:点击开发工具

打开Word,依次点击:文件>更多>选项>自定义功能区,勾选开发工具

图片

图片

第二步:启用宏命令

依次点击:文件>更多>选项>信任中心>信任中心设置>宏设置,点击启用所有宏

图片

图片

第三步:创建VB宏命令

点击菜单【开发工具】下的VB编辑器【Visual Basic】

图片


由于DeepSeek访问量、服务器资源、网络攻击等各种因素,DeepSeek API调用效率相对其他几款AI而言,效率比较低,但是比app和网页又快。因VBA自身限制问题,综合考虑采用异步方案,同时增加故障机制。

3.1 创建DeepSeek模块

点进去后,选择菜单左侧的【Normal】鼠标右键【插入】>【模块】,命名为【Deepseek】

图片

3.1.1 复制代码到DeepSeek模块

VBA代码可以在另一篇资源中,可以自取:

Link:Word中直接接入DeepSeek,通过API调用DeepSeek AI模型,实现word自动问答

或者评论区留言发送资源。

3.1 创建Silicon模块

如下所示,将Siliconflow的VBA代码复制到模块中。

VBA代码可以在另一篇资源中,可以自取:

Link:Word中接入Siliconflow,调用DeepSeek AI模型,实现word自动问答

或者评论区留言发送资源。

异步调用和非异步均可正常使用。


代码写完后一定要点击左上角【文件】>【保存Normal(S)】,这样才能将新建的VBA 模块保存到默认模板 Normal.dotm 中。

设置接入模型和API

在上述VBA中录入自己的API信息和想要接入的AI模型,可以从各AI模型供应商获取。


保存VB脚本并关闭窗口

再依次点击:【文件】>【更多...】>【选项】>【自定义功能区】,选择这里的“宏”,即可看到刚才创建的宏命令

图片

新建宏命令组

再依次点击:【文件】>【更多】>【选项】>【自定义功能区】,选择开发工具,右键 【添加新组】,重命名组为【AI

将通过VBA创建的宏命令添加到这个组"AI"下面,分别对应Siliconflow和DeepSeek,如下图所示:

配置VBA引用库

在VBA菜单栏“工具”,“引用”下添加以下配置,因为VBA调用office自带库函数,如下图所示:

开始测试

点击【开发工具】即可看到我们刚才添加的宏。

在word中输入文字,选中这段文字,点击我们宏,等待一段时间,就可以得到结果:

调用CallSilicon

调用DeepSeek

当前设定以Markdown格式输出,如下图所示:

文档关闭时一定要点击保存,保存为【启用宏的word模板(*dotm)】,这样下次打开word时依旧可以用deepseek


;