deepseek怎么接入excel_deepseek接入excel教程

deepseek怎么接入excel？用户想要在excel中接入deepseek，可通过获取代码和创建按钮等方式进行接入，具体的操作有小伙伴可能不知道，下面就是deepseek接入excel教程，有需要的玩家快来看看吧。

deepseek怎么接入excel

一、接入方法

1、首先需要获取deepseek的KPI，然后前往deepseek官网并点击右侧的【API平台】。

2、跳转界面后找到左侧的【APIcase】，之后点击【创建】，并任意填入一个名字。

3、之后依次点击【创建】和【复制】按钮。

4、将其放入文档下面后，再次复制VBA代码。

5、进入excel表格后点击左上方的【开发工具】，然后依次点击下方箭头指向的位置。

6、将代码放到excel表格中后，继续复制一下API。

7、然后回到excel表格中，将【你的API】替换为刚才复制的API。

8、关闭当前界面后，需要创建按钮进行激活。

9、依次点击下方的按钮。

10、出现弹框后选择第一个代码，然后输入一个问题后点击一下后方的按钮。

11、下方显示问题的答案后即可设置成功。

二、VBA代码

Sub CallDeepSeekAPI()

Dim question As String

Dim response As String

Dim url As String

Dim apiKey As String

Dim http As Object

Dim content As String

Dim startPos As Long

Dim endPos As Long

question = ThisWorkbook.Sheets(1).Range("A1").Value

url = "https://api.deepseek.com/v1/chat/completions" ´ 替换为实际的 API URL

apiKey = "你的API" ´ 替换为你的 API 密钥

Set http = CreateObject("MSXML2.XMLHTTP")

http.Open "POST", url, False

http.setRequestHeader "Content-Type", "application/json"

http.setRequestHeader "Authorization", "Bearer " & apiKey

Dim requestBody As String

requestBody = "{""model"":""deepseek-chat"",""messages"":[{""role"":""user"",""content"":""" & question & """}]}"

http.send requestBody

If http.Status = 200 Then

response = http.responseText

startPos = InStr(response, """content"":""") + Len("""content"":""")

endPos = InStr(startPos, response, """")

content = Mid(response, startPos, endPos - startPos)

ThisWorkbook.Sheets(1).Range("A2").Value = content

Else

ThisWorkbook.Sheets(1).Range("A2").Value = "Error: " & http.Status & " - " & http.statusText

End If

End Sub

以上就是deepseek怎么接入excel的全部内容了，只需按照上述方法操作即可，想了解更多内容就在ca42网。