【Excel】VBAでChatGPT(GPT-API)と連携する方法を割と詳しく解説

わちょんのゆっくりIT

Подписаться 170 тыс.

Просмотров 21 тыс.

50% 1

Видео Поделиться Скачать Добавить в

Опубликовано:

30 июл 2024

Ссылка:

Скачать:

Готовим ссылку...

Добавить в:

Мой плейлист

Посмотреть позже

Комментарии : 15

@kwkm2000 Год назад

これは便利！ API呼び出しをVBAで作るのしんどいので、参考になりますあとは、使用モデルの指定や、system role リクエストの指定もできるようにするともっといいかなーって思いました。修正イメージ：例えば・B1セルをSystemメッセージ入力セル・D6を、モデル名入力セル（"gpt-3.5-turbo"、"gpt-4"、"gpt-3.5-turbo-16k"など）とした場合、 Dim systemText As String systemText = ws.Range("B1").Value Dim model As String model = ws.Range("D6").Value text = "{""model"": """ & model & """, ""temperature"": " & temperature & ", ""max_tokens"": 2000" & ", ""messages"": [{""role"": ""system"", ""content"": """ & systemText & """},{""role"": ""user"", ""content"": """ & text & """}]}" こんな感じですね。ちなみに、この修正コードもchatGPTが創ってくれました😆😆

@r4unit 5 месяцев назад

むちゃくちゃ参考になりました。動画ありがとうございます。

@pikarin7401 Год назад

面白いことしてますね、vbaでapi呼び出すと複雑なことなりますね。xlwingsでPython呼び出したらシンプルに済みそう

@origami3847 Год назад

安心してくださいで、はいてます🫣のあの人が出てたのが笑えた😊

@user-yr6fr2dl7v Год назад

影響されて、GPT-4登録しました！仕事でよく使うんですけど、プロンプトの管理してないと、どんどん増えてくので4〜5つに絞りたいですね、、

@THEpurple5-mt5fb 4 месяца назад

❶3/15Excelの活用レベルを今年1年間で格段に向上させたい。現段階ではほとんど利用できないから頑張る🔥

@HM-cv2mp Год назад

わたしもb5に正しく表示されないです。解決策をおしえていただけたら幸いです。

@hiroshisakata413 Год назад

SERIESSUM関数やってみてください

@shutak7157 Год назад

すみません。なぜかマクロを実行してもB5に :{ が表示されるだけになってしまいます。もし解決策がわかるなら教えていただければ嬉しいです。

@kwkm2000 Год назад

（何度かコメントしましたが、コメント投稿されていないようなので再コメントします。） API_URL の値が最後まで（completions で終わるまで）正しく入力されているか確認してみてください。それで動くと思いますよ。

@user-hc6qv5cu2b Год назад

@@kwkm2000 なんでかrだけしか表示されなくなった

@kwkm2000 Год назад

@@user-hc6qv5cu2b このコードは、データの送受信処理が超簡略化されているので、特殊文字（たとえば、ダブルクォート(")やバックスラッシュ(/)など）が質問文や回答に含まれると、正しく表示されないんですよね。改善するには、VBA-JSONなどのライブラリを使って、JSONの文字列生成とパース処理を正しく組み込む必要があるみたいです。

@user-bw1bb1ey8r Год назад

質問文の途中に改行が含まれるとrしか表示されないようです。対策としては「sendAPIRequest」の一番上（Dim request As Objectの上の行あたり）に以下のコードを追加するといいようです。 text = Replace(text, Chr(10), " ") '改行文字を変換する