ChatGPT接入Word，是需要使用OpenAI的API的，所以我们需要接入前，需要准备两件事：

1、获取openAI的API

2、需要魔法上网

对于上面准备的两件事，这里只对1来罗列操作，至于2魔法上网，这个家人们自行处理。

一、获取openAI的API

1、登录openAI：https://platform.openai.com/；

2、进入后，右上角“Personal”，点击“view API keys”

3、进入后，点击“+create new secret key”，系统为你生成一条密匙，复制下来作为后面使用。

二、Word接入ChatGPT

以WPS的word为例，对应的vba源码：

Sub ChatGPT()Dim selectedText As StringDim apiKey As StringDim response As Object, re As StringDim midString As StringDim ans As StringIf Selection.Type = wdSelectionNormal ThenselectedText = Selection.TextselectedText = Replace(selectedText, ChrW$(13), “”)apiKey = “把之前获取到的chatGPT的API key复制粘贴到这里”url = “https://api.openai.com/v1/chat/completions”Set response = CreateObject(“MSXML2.XMLHTTP”)response.Open “POST”, url, Falseresponse.setRequestHeader “Content-Type”, “application/json”response.setRequestHeader “Authorization”, “Bearer " + apiKey
response.Send “{”“model””:““gpt-3.5-turbo””, ““messages””:[{““role””:““user””,““content””:“”" & selectedText & “”“}], ““temperature””:0.7}”re = response.responseTextmidString = Mid(re, InStr(re, “”“content”“:”“”) + 11)ans = Split(midString, “”“”)(0)ans = Replace(ans, “\n”, “”)Selection.Text = selectedText & vbNewLine & ansElseExit SubEnd If
End Sub

1、在Word中找到 “开发工具” ，点击后可以看到 “VBA编辑器” ，点进去，进入到VBA编辑界面，点击“模板”，“插入”一个新的模板

将上述的vba源码复制粘贴进去，注意：将api key替换为第一步中复制的内容，然后保存。

再进入 “开发工具” ，点击 “VB宏”，你就可以看到有个宏名为“chatGPT”的宏了，将“宏的位置”设置为“所有活动模版和文档”；

2、通过“文件”，“选项”，“自定义功能区”，通过“宏”，将“模块1：ChatGPT”添加到你想要调用的工具栏里就可以了。

3、如何使用

只需选中问题，然后点击添加的ChatGpt按钮即可，至此就设置完毕了

PS：因公众号平台更改了推送规则，如果不想错过内容，记得读完点一下“在看”，加个“星标”，这样每次新文章推送才会第一时间出现在你的订阅列表里。
点“在看”支持，谢谢啦