ExcelVBAで日付の比較をする方法 プロジェクト管理をExcelで行っています。 開始日と終了日

ExcelVBAで日付の比較をする方法

プロジェクト管理をExcelで行っています。
開始日と終了日を比較して、開始日が後だったらエラーになるようにするには、どうしたらいいでしょうか？

単純な表で、開始日がＡ列、終了日がＢ列です。

よろしくお願いいたします。

No.1 ベストアンサー 回答者： fujillin 回答日時： 2017/03/16 16:58

こんにちは

開始日、終了日が日付型で入力されているなら、そのままシリアル値を比較できます。
例えば、r行目を比較するものとして…

If Cells(r, 1).Value > Cells(r, 2).Value Then
　' 開始日 ＞ 終了日の場合
　' すなわち、エラーの場合の処理
Else
　' 正常な場合の処理
End If

みたいにしても判別可能です。

この回答へのお礼

難しく考えてました。ありがとうございました。

お礼日時：2017/03/19 06:27

No.2 回答者： yokomaya 回答日時： 2017/03/17 17:13

VBAじゃ無いですが、

Ｂ列を選択して、条件付き書式で
数式を使用して書式設定するセルを決定を選び
数式に
=AND(B1<>"",A1>B1)
書式は塗りつぶしの赤とかしておけば
エラーではないですが否応なく気づくと思います。

この回答へのお礼

Excelの機能をもう少し勉強します。ありがとうございました。

お礼日時：2017/03/19 06:26