No.1ベストアンサー
- 回答日時:
>難しい操作でもやってみたい
では次の通りに行います。
ALT+F11を押す
現れた画面で挿入メニューから標準モジュールを挿入する
現れたシートに下記をコピー貼り付ける
private function CountWhite(byval Target as excel.range) as variant
dim h as range
application.volatile
for each h in target
if h.interior.colorindex = xlnone then
countwhite = countwhite + 1
end if
next
end function
B7セルに
=countwhite(B2:B6)
と記入、右にコピーする。
#ただし関数はセルの「塗りつぶしなし」を数えます。「白く塗りつぶした」のとは違うので、しっかり区別してください。
#この方法に限らず「セルの書式を数える」全てのやり口は、「書式を塗り替えた直後」には反応する方法はありません。
F9を押すとか、必ず明示的に再計算を行わせる必要があるので注意してください。
#別の方法
範囲のセルはすべて灰色で塗りつぶしておく
範囲を選び、条件付き書式▼から「セルの強調表示ルール」で「指定の値に等しい」を開始する
左欄に数字の 1 を記入、書式としてユーザー設定の書式から
塗りつぶしタブでセルの塗色を無しに
さらに表示形式タブでユーザー定義の書式設定を選び
;;;
と設定してOKする。
B7には
=SUM(B2:B6)
と記入する。
出勤するB2,B3,C3などのセルに数字の1を記入する。
この回答へのお礼
お礼日時:2014/02/05 23:33
keithinさんの標準モジュールからの操作で見事出来ました!ありがとうございました。質問なのですがこのような知識がのっていますオススメなExcelの書籍などありますか?ご存知でしたら教えてほしいのですが、宜しくお願いします。
No.2
- 回答日時:
一般関数には、セルの色を認識する関数はないのですよ。
ところが、古い古い機能ですが、4.0マクロ という機能がエクセルには
残っています。
http://miyahorinn.fc2web.com/faq/faq030.html#1b
を参考にしてみてください。
各セルの色番号がでますので、音は CountIF関数で合計
作業列が必要になりそうですが。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル 条件に合う日付に入力された時間数の合計したい 4 2022/06/17 22:18
- Excel(エクセル) エクセルの早退時間を計算したいです。計算はうまくいっているようですが… 1 2022/12/26 16:22
- Excel(エクセル) 関数を教えてください 2 2022/12/29 21:01
- Excel(エクセル) 列を自動で追加したい 3 2022/07/11 12:58
- Excel(エクセル) Excel 記入欄に網掛けして、文字が入力されたら網掛けが消える設定 5 2023/02/05 11:00
- Excel(エクセル) 指定した数字まで累計する方法や文字例の抽出について教えてください 4 2022/10/05 21:19
- その他(Microsoft Office) 従業員増減対応で当番種類の増減対応な当番表 21 2022/07/19 07:30
- Visual Basic(VBA) Excel VBA ユーザーフォーム内のラベルにテキストボックスの小計を出す方法 5 2022/08/17 14:27
- Excel(エクセル) Excel(エクセル)でフィルター抽出後、非表示の行を計算しないで、合計を算出する方法 【内容】 添 4 2023/01/30 17:17
- Excel(エクセル) エクセル/列追加時、合計行の計算式 7 2023/03/15 11:14
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
E列のセルに数値が入れば(空白...
-
互換性チェック
-
Excel にて条件付き書式の色に...
-
条件付き書式で、結果が1行ずれる
-
条件付書式で「=#N/A」に色を付...
-
エクセルの枠の中の文字が青文...
-
Excelの条件付き書式にて空白セ...
-
エクセルで特定の数字等を表示...
-
エクセルで一定期間が経過した...
-
条件付き書式で太罫線を引く方法
-
【エクセル】シフトで○が6個以...
-
エクセル 条件付き書式で色をつ...
-
ピボットテーブルオプション「...
-
エクセルからワードへの差し込...
-
セルの値が空白じゃないなら色...
-
エクエルで隣のセルの文字が赤...
-
Excel 条件付書式 今日より3日...
-
セル結合させてるときの 条件...
-
【エクセル】今日の日付に赤枠...
-
文字を二重線で消す
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
E列のセルに数値が入れば(空白...
-
Excel にて条件付き書式の色に...
-
条件付書式で「=#N/A」に色を付...
-
条件付き書式で、結果が1行ずれる
-
Excelの条件付き書式にて空白セ...
-
エクセルの枠の中の文字が青文...
-
エクセルで特定の数字等を表示...
-
条件付き書式で太罫線を引く方法
-
互換性チェック
-
エクセル 条件付き書式で色をつ...
-
エクセルで一定期間が経過した...
-
エクセルで1以上は全て1にするには
-
エクセル内で複数の文字(50個ぐ...
-
セル結合させてるときの 条件...
-
Excelについて あるセルに文字...
-
セルの値が空白じゃないなら色...
-
Excelで2つのファイルを比較し...
-
ピボットテーブルオプション「...
-
【エクセル】シフトで○が6個以...
-
1行テキストをエクセルの複数行...
おすすめ情報