ChatGPTに関数を作らせてExcel副業管理を高速化する｜指示テンプレとすぐ使える式サンプル

次のExcel台帳に入れる関数を作ってください。
【シート】台帳
【列】A:日付、B:区分、C:案件名、D:クライアント、E:明細、F:金額、G:税率、H:手数料、I:支払方法、J:請求No、K:月、L:カテゴリ
【要件】
1) K列「月」= 日付から "YYYY-MM" を返す式（テーブルでも通常範囲でも動く）
2) 月次の売上合計・経費合計・粗利（売上-経費-手数料）を別シート「集計」にSUMIFSで集計
3) E列の明細に含まれるキーワードをもとにカテゴリ自動判定（マスタは「マスタ!A:B」= キーワード/カテゴリ）
4) 日本語版Excelでも英語関数名でもOK。必要なら両対応版で
5) Excel 365以外でも動く代替式も提示（配列数式の場合は注記）
出力形式：説明→セルに入れる関数→（必要なら）注意点

=TEXT(A2,"yyyy-mm")

=TEXT([@日付],"yyyy-mm")

売上合計（B2）:
=SUMIFS(台帳!$F:$F, 台帳!$B:$B, "売上", 台帳!$K:$K, $A2)

経費合計（C2）:
=SUMIFS(台帳!$F:$F, 台帳!$B:$B, "経費", 台帳!$K:$K, $A2)

手数料合計（D2）:
=SUMIFS(台帳!$H:$H, 台帳!$K:$K, $A2)

粗利（E2）:
=IFERROR(B2 - C2 - D2, 0)

=LET(
  k, マスタ!$A$2:$A$200,
  c, マスタ!$B$2:$B$200,
  m, ISNUMBER(SEARCH(k, E2)),
  IF(COUNTIF(m, TRUE),
     INDEX(c, XMATCH(TRUE, m)),
     "未分類"
  )
)

=IFERROR(
  INDEX(マスタ!$B$2:$B$200,
    MATCH(1, --ISNUMBER(SEARCH(マスタ!$A$2:$A$200, E2)), 0)
  ),
"未分類")

=IFERROR(
  XLOOKUP(J2, 請求!$A:$A, 請求!$B:$B, ""),
  ""
)

=IFERROR(
  INDEX(請求!$B:$B, MATCH(J2, 請求!$A:$A, 0)),
"")

次の式を、【Excel 2016（日本語環境）】【通常範囲】【XLOOKUPなし】で動くように書き換え、
必要なら配列数式の注記も入れてください。式：◯◯（ここに式を貼る）

テーブル名や列名が異なるときに壊れないよう、範囲絶対参照（$）を適切に付けた通常範囲版を提示してください。対象シート：台帳、集計、マスタ。

「集計」シートの月次合計（売上・経費・手数料・粗利）と、
「台帳」から今月の売上上位3件、未入金案件（請求Noはあるが入金日空白）を
箇条書きと小さな表のレポートに整えてください。
Excelで再現できる見出し・表構成と、書き出し文（200字以内）を出力。

=LAMBDA(d, TEXT(d, "yyyy-mm"))

Sub 採番()
  Dim ws As Worksheet: Set ws = Worksheets("台帳")
  Dim r As Long, last As Long, base As String, seq As Long
  last = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
  seq = Application.WorksheetFunction.Max(ws.Range("J2:J" & last)) ' 数値のみ想定
  For r = 2 To last
    If ws.Cells(r, "J").Value = "" And ws.Cells(r, "B").Value = "売上" Then
      seq = seq + 1
      base = Format(ws.Cells(r, "A").Value, "yymm")
      ws.Cells(r, "J").Value = base & "-" & Format(seq, "000")
    End If
  Next r
End Sub