硬柿子的秋日物语
文章主题：作者, 硬柿子, 更新主题
▲ 点击下方名片关注我，陪你一起成长 ▲
作者 / 我是硬柿子
排版 / 我是硬柿子文章字数/727字阅读时长 / 1min上一篇写到，废了老大劲，终于把ChatGPT注册下来了。（点击蓝色链接即可跳转）
这篇更新主题：
如何让ChatGPT和EXCEL擦出火花，把ChatGPT作为函数嵌入到EXCEL中。用 ChatGPT 的 API keys，生成自定义 VBS 函数，然后在 Excel 自动生成内容，目前可以直接在EXCEL中进行简单的问答和计算。可以和工作生活的应用场景结合起来，填入A列后，用chatgpt调用公式就可以自动生成B列内容，也可以填入C列/D列甚至更多。
首先要获取api key，网址：http://platform.openai.com（需用魔法工具打开）创建自己的API key，并复制出来。（一定要复制保存下来，且不要告诉别人你的API key，以免被滥用封号）然后我们就可以打开Excel建立新表格进行操作了。感兴趣的小伙伴可上网自行搜索，在csdn博客中有很多相关教程，下方链接是我的搜索结果，可参考：https://blog.csdn.net/My_ladyQuan/article/details/129855059简要概括下流程：在Excel中找到 “开发工具” ，点击后可以看到 “VBA编辑器”，点进去，进入到VBA编辑界面。
然后，在VBA编辑界面里，点击 “模块” ，“插入” 一个新的模块。
把vba源码复制粘贴到新建立的模块中去，将api key内容替换为你刚刚复制保存的key，关闭框框即可。
创建chatGPT函数的vba源码：————————————————Function ChatGPT(prompt As String) As StringDim url As String, apiKey As StringDim response As Object, re As StringDim midString As StringapiKey = “此处替换自己的api key”url = “https://api.openai.com/v1/engines/text-davinci-003/completions”Set response = CreateObject(“MSXML2.XMLHTTP”)response.Open “POST”, url, Falseresponse.setRequestHeader “Content-Type”, “application/json”response.setRequestHeader “Authorization”, “Bearer ” + apiKeyresponse.Send “{“”prompt””:””” & prompt & “””,””max_tokens””:1024, “”temperature””:0.1}”re = response.responseTextmidString = Mid(re, InStr(re, “””text””:”””) + 8)ChatGPT = Split(midString, “”””)(0)ChatGPT = Replace(ChatGPT, “\n”, “”)End Function——————————————
完成以上步骤，恭喜你拥有了属于自己的魔法Excel！在单元格内输入“=chatGPT()”,就可以调用GPT干活啦！
我的使用体验：
B列内容生成公式：=ChatGPT(A2&”的5个城市”)C列内容生成公式：=ChatGPT(“推荐一款”&A2&”的旅游景点，回答限制10个字符”)D列内容生成公式：=ChatGPT(“推荐一款”&A2&”的特色美食，回答限制10个字符”)能生成内容，说明已经能成功运转啦。最后一步，保存chatgpt魔法工具表格。选择【Excel 启用宏的工作薄】，后缀为.xlsm格式，点击保存即可。
word中嵌入ChatGPT同理，截图来自上方链接的博主王栯川博客内容：
感兴趣的小伙伴快去试起来吧。
历史文章
加我个人微信
一起来玩呀
你的每个赞和在看，我都喜欢！
AI时代，拥有个人微信机器人AI助手！AI时代不落人后！
免费ChatGPT问答，办公、写作、生活好得力助手！
搜索微信号aigc666aigc999或上边扫码，即可拥有个人AI助手！
相关文章
