![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
日曜日始まりのボックス型の万年カレンダーを作成しています。各月ごとに稼働日と休日の日数を出したいのですが、思うようにできません。
西暦を入れると自動で日にちが出てきます。
前の月と次の月の日にちは文字がグレーになるよう条件付き書式を設定してます。
また、別シートに祝日一覧があり、祝日は赤字のピンク塗りつぶしになるよう条件付き書式を設定してます。
元々、日曜は赤字、土曜は水色時にしています。
各月ごとに稼働日と休日の日数を出したいのですが、
(4月は稼働日数をC10に休日日数をG10に)
例えば4月の休日日数のセルに[=CountColorA(B4:H9)]を入れ、
標準モジュールには
Function CountColorA(Rng As Range) As Long
Dim myRng As Range
Dim Col_cnt As Long
Application.Volatile
Col_cnt = 0
For Each myRng In Rng
If myRng.Interior.ColorIndex > 0 Then
Col_cnt = Col_cnt + 1
End If
Next myRng
CountColorA = Col_cnt
End Function
を入れています。
これだと自分でピンクに塗りつぶした分は更新すればカウントされますが、
条件付き書式で設定したピンク部分はカウントされません。
条件付き書式で設定した分もカウントされるよう、また、稼働日の日数をカウント(前の月と次の月とピンク塗りつぶしを除いた)されるようにするには
どうすれば、良いでしょうか。
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
こんにちは
祝祭日一覧がきちんとできているなら、カレンダーの色表示などとは関係なく、稼働日等を計算可能です。
日付や日にちは全てシリアル値とします。
求めたい月は決まっているのですから、計算手順として
① その月の全日数を求める
「翌月1日」-「当月1日」
https://www.tschoolbank.com/excel/function-eomon …
② 当月の稼働日を求める
NETWORKDAY(当月1日, 当月月末日, 祭日一覧)
https://dekiru.net/article/16390/
③ 当月の休日数を求める
「全日数」 - 「稼働日数」 (= ③ - ① )
といった感じでできるでしょう。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBでエクセル出力の文字を太字...
-
POIを使った書式設定
-
【VBA】計算結果に小数点第2位...
-
スリープ状態とロック状態の違...
-
静電容量測定法について質問で...
-
T1ケーブルってなんですか?
-
スイッチングハブのIPアドレス
-
blackjumbodogでメールサーバー...
-
ethtoolでリンク速度変更できない
-
ASIO4ALL(v2.9)の出力デバイ...
-
DHCP Clientサービスが勝手に停...
-
Cisco 製品の電源ケーブル抜け...
-
fedora linux 34 MATE における...
-
DL途中で途切れてしまう。途中...
-
(^_^) DirectXとは? ...
-
WindowsXPにはコントロールパネ...
-
UPS(無停電電源)のコンセント...
-
デスクトップなどの画像キャプ...
-
WindowsServer2008でタスク実行
-
Apache起動エラー
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VBA】計算結果に小数点第2位...
-
MsgBoxの中にある数字や日付の...
-
チェックボックスのある行を非...
-
VBA 条件付き書式で空欄は適用...
-
クリスタルレポートの改ページ...
-
マイナス記号を▲で表す方法
-
spread6.0(セル連結)
-
【VBA】 VBAを使ってExcelにSen...
-
PEAR::Pagerにアンカーリンクを...
-
POIを使った書式設定
-
AccessのVBAで、パラメータを使...
-
VBでエクセル出力の文字を太字...
-
VBA コンボボックスの表示(日...
-
MSAccessでODBCを介してDB接続...
-
VBAの繰り返し処理について教え...
-
grep で複数条件を指定
-
JAVAのCalendarについて質問です
-
時間表示で0:48:17と入力すると...
-
エクセル元データの#N/Aを非表...
-
『"』に『\\』がついてしまう
おすすめ情報