Yakuzaqbw

 エクセル色付きセルを数える Excel（エクセル） 10 （EXCEL）CELLの条件付き書式で色をつけたセルをカウントする。 Excel（エクセル） ユーザー定義関数> 色付きセルの件数をカウントする CountColor ｜ ｜ ユーザー定義関数COUNTIF｜ 前回記事 色付きセルのみを合計する SUMIFのように動かしたSumColorですが、今度はCOUNTIF版を作ってみます。 もともとこの定義関数を作るきっかけになったのは、次年度の勤務表を作成する為に休日日数をカウントしたい。 というのが目的でした。 色付きセルをカウント 以下のマクロを実行すると、 色付きのセルを数えます。 Sub セルの色をカウント() Dim Rng As Range Dim Red_cnt As Long Dim yellow_cnt As Long Dim Green_cnt As Long For Each Rng In Range("G6") Select Case RngInteriorColorIndex '赤色 Case 3 Red_cnt = Red_cnt 1 '黄色 Case 6 yellow_cnt = yellow_cnt 1 '緑色 Case 43 Green_cnt = Excel一般機能 色付きセルを計算する２ Excel 色付きセル カウント vba