Excel VBA質問箱 IV

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

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


41882 / 76732 ←次へ | 前へ→

【39926】Re:カレンダーの作り方
発言  ハト  - 06/7/4(火) 13:28 -

引用なし
パスワード
   ▼taka さん:
>フォーム上combobox1とlabel1〜31(1行目)と32〜62(2行目)が貼り付けてあります。label1〜31は日付なので1〜31の数字を打ってあります。comboboxから月を選択すると、label32〜62に曜日が出るようにし、土曜は薄い青、日曜は薄い赤にしたいのですが、どういうコードを記入すればよいですが?
>是非よろしくお願い致します。
>又、他にこうした方が良いというのがあれば教えて下さい。


----------------------------------------------
ラベルの文字色を変える

  Me.Label1.ForeColor = vbRed

----------------------------------------------
曜日の判定

  i = Weekday(Now)

  If i = 1 Then
    MsgBox "日曜"
  ElseIf i = 7 Then
    MsgBox "土曜"
  Else
    MsgBox "平日"
  End If
----------------------------------------------
  
0 hits

【39924】カレンダーの作り方 taka 06/7/4(火) 13:07 質問
【39926】Re:カレンダーの作り方 ハト 06/7/4(火) 13:28 発言
【39931】Re:カレンダーの作り方 taka 06/7/4(火) 14:04 質問
【39933】Re:カレンダーの作り方 ハト 06/7/4(火) 14:22 発言

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