- ベストアンサー
vbaカレンダーコントロール
エクセルsheet上にカレンダーを作成しました。 D F G H ・ ・ ・ AH 5 6/1 6/2 6/3 6/4 ・ ・ ・ 6 ・ ・ 24 カレンダーコントロールを使って土日のセル（５行から２４行まで）に色をつけたいのですがコードの記述がわかりません。教えてください。イメージとしては、カレンダーコントロールの６月１３日をクリックしたらセルに色がつく、です。 よろしくお願いします。
- nan30
- お礼率100% (4/4)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
クリックした日が日曜のときセルを赤にするコードです。 If Weekday(Calendar1.Value) = 1 Then With Range(Cells(5, Calendar1.Day + 3), Cells(24, Calendar1.Day + 3)).Interior .ColorIndex = 3 .Pattern = xlSolid End With End If
お礼
うまくいきました。 ありがとうございました。