Excel VBA質問箱 IV

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

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


44201 / 76732 ←次へ | 前へ→

【37552】Re:コマンドボタン色変え2.&メール送信方法
発言  ハト  - 06/5/11(木) 15:45 -

引用なし
パスワード
   申し訳ありません
一部訂正です
>      c = Switch(d < DateAdd("m", 1, Date), vbRed, d < DateAdd("m", 5, Date), vbYellow, d > DateAdd("m", 5, Date), vbGreen)

の部分は
      c = Switch(d < DateAdd("m", 1, Date), vbRed, d < DateAdd("m", 5, Date), vbYellow, d >= DateAdd("m", 5, Date), vbGreen)

でした(最後の比較演算子の間違い)

ちなみにこの関数は

  Select Case d
    Case Is < DateAdd("m", 1, Date)
      c = vbRed
    Case Is < DateAdd("m", 5, Date)
      c = vbYellow
    Case Is >= DateAdd("m", 5, Date)
      c = vbGreen
  End Select

と同じ意味です
0 hits

【37462】コマンドボタン色変え2.&メール送信方法 たけし 06/5/8(月) 19:43 質問
【37464】Re:コマンドボタン色変え2.&メール送信方法 たけし 06/5/8(月) 20:01 質問
【37528】Re:コマンドボタン色変え2.&メール送信方法 ハト 06/5/10(水) 11:12 発言
【37533】Re:コマンドボタン色変え2.&メール送信方法 たけし 06/5/10(水) 19:58 発言
【37547】Re:コマンドボタン色変え2.&メール送信方法 ハト 06/5/11(木) 14:40 発言
【37552】Re:コマンドボタン色変え2.&メール送信方法 ハト 06/5/11(木) 15:45 発言
【37564】Re:コマンドボタン色変え2.&メール送信方法 たけし 06/5/11(木) 23:11 お礼
【37558】Re:コマンドボタン色変え2.&メール送信方法 わさび 06/5/11(木) 19:59 発言

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