私がよく作るのが、参加者確認みたいに「参加」「不参加」「未定」の3つの表へ“クリック＋ボタン”で振り分けるExcelマクロです。手で切り取り→貼り付けを繰り返すとミスしやすいので、ボタン化すると一気に楽になります。 ■やりたいこと（検索意図の整理） ・選択したセル（例：名前）を、指定した表の末尾へ移動 ・移動後は元のセルを削除して上に詰める ・ボタン（図形）を押すだけで実行したい ■事前準備：表の形をそろえる 私の場合、見出しが1〜2行目にあって、データは3行目以降に並ぶ形にしています（マクロ側で「3行目以上」の条件を付けると誤操作を防げます）。 ・B列：未定 ・D列：参加 ・F列：不参加 のように“移動先の列”を決めておくと管理しやすいです。 ■VBAの基本ロジック（考え方） ポイントは2つだけです。 1) ActiveCell（いま選択しているセル）を取得 2) 移動先列の最終行（末尾）を探して、そこへ値を入れてから元セルを削除 例：参加（D列）へ移動する考え方 ・LRow = Cells(Rows.Count, "D").End(xlUp).Row ・Cells(LRow + 1, "D").Value = ActiveCell.Value ・ActiveCell.Delete Shift:=xlUp ※「未定」「不参加」も列記号（B/Fなど）を変えるだけで同じです。 ■誤操作防止の条件（ここが“確認”の肝） ボタンで何でも消せる状態は怖いので、私は最低限これを入れます。 ・選択セルが3行目以上か（見出しを消さない） ・対象列だけ反応するか（例：B/D/F列以外は動かない） これで、間違って別の場所を選んだまま押しても事故りにくいです。 ■ボタン（図形）にマクロを割り当てる手順 1) [挿入] → [図形] で四角形などを配置 2) 図形の文字を「参加」「不参加」「未定」にする 3) 図形を右クリック → [マクロの登録] 4) それぞれ対応するマクロ（Sub 参加(), Sub 不参加(), Sub 未定() など）を選択 これで「名前を選択 → クリック → 移動」が完成します。 ■うまく動かない時のチェック ・ファイル形式：.xlsm で保存（マクロ有効ブック） ・セキュリティ：マクロが無効だとボタンを押しても動きません ・結合セル：削除（上に詰める）が崩れやすいので、できれば表は結合なしが安心 この仕組みを一度作ると、参加者確認だけじゃなく、ステータス管理（対応中/完了/保留）みたいな表にもそのまま流用できて便利でした。