ChatGPTを使って知識ゼロからExcelマクロを作成する

Fiveのブログ
ChatGPTを使って知識ゼロからExcelマクロを作成する

ChatGPTを使って知識ゼロからExcelマクロを作成する

公開日 | 2023.08.18 更新日 | 2026.01.07

近年、会話型AI「ChatGPT」は急速に普及し、今では多くのビジネスシーンで活用されるツールとして定着しつつありますが、

最初は試してみたものの、使いこなせずに利用しなくなった
期待した回答が得られないため、自分で調べたほうが早いと感じた

という理由から、いつしか使用されなくなってしまった方も少なくありません。

プロンプト(AIへの指示文)の最適な書き方に関する情報はインターネット上に数多くありますが、今回はその中でも、私が日常業務の中で実際に行っている活用方法をご紹介します。

なお、ChatGPTへの指示方法は、株式会社noteの深津貴之氏が提唱する「深津式プロンプト」が特にわかりやすく、私自身も日頃から参考にしています。

ご興味がある方は、こちらの解説動画もぜひご覧下さい。

レポート作成時短の為のVBA作成
終わりに

レポート作成時短の為のVBA作成

当社では、日々作成するレポートをExcel形式で提出していますが、提出後に誤操作によって数値が変わってしまうリスクを避けるため、CSVデータから抽出した値や数式で算出した数値を「値貼り付け」によって固定する作業が発生します。
タブ数が少ないレポートであれば比較的簡易な作業で済み、ミスもほとんどありません。

しかし、複数媒体の配信レポートなどでタブ数が増えると、値貼り付けの漏れなどのヒューマンエラーが起こりやすくなります。
このような背景から、「この作業を自動化できないか」という課題意識が生まれ、そこでChatGPTを活用しました。

やりたい事と自分の知識量

Excelのマクロ／VBAを活用すれば自動化が可能であることは理解している
具体的な作成手順やコードの書き方については全く把握していない状態

そのような状況下で、ChatGPTを活用しながらマクロの作成に取り組みました。

実際にやってみた

まずは、現在の業務フローと実現したい内容を、ChatGPTに伝えました。

ChatGPTからは以下の回答が得られました。

今回の質問内容には、マクロの作成手順や登録方法まで含めていませんでしたが、ChatGPTは意図を汲み取り、手順もあわせて提示してくれました。

実際にChatGPTが生成したコードは、以下のとおりです。

Sub 値のみ貼り付け()

    Dim ws As Worksheet
    Dim rng As Range

    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual

    For Each ws In ThisWorkbook.Worksheets
        For Each rng In ws.UsedRange
            If rng.HasFormula Then
                rng.Value = rng.Value
            End If
        Next rng
    Next ws

    Application.Calculation = xlCalculationAutomatic
    Application.ScreenUpdating = True

End Sub