実務でかなり多いのが 黄色セルだけ集計 赤セルだけ削除 色付きセルだけコピー です。 基本コード 黄色セルだけ処理 Sub ColorCellsOnly() Dim c As Range For Each c In Range("A1:A10") If c.Interior.Color = vbYellow Then Debug.Print c.Value End If Next cEnd Sub ポイント セル背景色取得 c.Interior.Color よく使う色 色 定数 赤 vbRed 黄 vbYellow 青 vbBlue RGB指定も可能 RGB(255, 200, 200) 色を…