本書の内容に誤りがございました。次のとおり訂正してお使いください。

お手元の書籍の刷数は、奥付でご確認ください。

訂正箇所 訂正内容
p123
手順③のコードの1行目

(誤)Private Sub ChatGPTに質問()

(正)Sub ChatGPTに質問()

◎該当する版:初版1刷

p300
先頭行

(誤)ユーザーフォームの作成と実行確認はできましたか?

(正)ユーザーフォームの作成はできましたか?
 ※実行確認は次の章で行います

◎該当する版:初版1刷

p342
手順①のコードの4行目~7行目

(誤)

'シークレットキーを取得する
If strApiKey = "" Then 'キャンセルまたは入力無しなら終了
 Exit Sub
End If

(正)

'シークレットキーを取得する
strApiKey = GetSecretKey()
If strApiKey = "" Then 'キャンセルまたは入力無しなら終了
 Exit Sub
End If

◎該当する版:初版1刷

p342
手順①のコードの17行目~22行目

(誤)

'入力用ダイアログボックスを表示する
InputDialog.Show
If InputDialog.Tag = "Cancel" Or InputDialog.Tag = "Exit" Then
 blExitFlag = True
 Exit For
End If

(正)

'入力用ダイアログボックスを表示する
InputDialog.Show
If InputDialog.Tag = "Exit" Or InputDialog.Tag = "Cancel" Then
 blExitFlag = True
 Exit For
End If

◎該当する版:初版1刷

以上、お詫びして訂正いたします。