Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1291 / 76734 ←次へ | 前へ→

【81095】適用範囲
質問  T-K  - 19/10/17(木) 1:13 -

引用なし
パスワード
   windows10
EXCEL 2016

休日を条件付き書式で色付けしたいのですが、
シート数も多く、表の大きさも違うため、シートごとの設定が大変です。
VBAを作成しましたが、適用範囲設定で分からず
こまっています。
どなたかわかる方いらしたらおしえてください。


Sub fmcdtn()

Dim sh As Worksheet
Dim fc As FormatCondition


For Each sh In Sheets
  sh.Cells.FormatConditions.Delete


   Set fc = sh.Cells.FormatConditions. _
   Add(xlExpression, , "=COUNTIF(祝日データ,A$2)=1")
 fc.Interior.Color = RGB(204, 255, 255)
 
 Next
 

End Sub

7 hits

【81095】適用範囲 T-K 19/10/17(木) 1:13 質問[未読]
【81096】Re:適用範囲 γ 19/10/17(木) 9:31 発言[未読]
【81098】Re:適用範囲 T-K 19/10/18(金) 1:02 質問[未読]
【81099】Re:適用範囲 γ 19/10/18(金) 17:18 発言[未読]
【81100】Re:適用範囲 T-K 19/10/19(土) 19:37 お礼[未読]
【81101】Re:適用範囲 γ 19/10/19(土) 22:23 発言[未読]

1291 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free