2つの日付間のExcelセルの複数の検証とセルが空白でない場合

Question

セルを2回検証する必要があります。第1に、ユーザが時刻（B5）を入力したが日付（A5）を入力しなかった場合には、A5に日付を要求するポップアップが現れるはずである。日付を入力するときは、開始日（B1）から終了日（B2）の間でなければなりません。ここで

Answer 1

あなたの細胞は、すべてのハードコードされているので、シンプルなものです。より多くの機能を搭載し、より堅牢に見えるように、マクロを編集することができます。

Sub doubleValidate() 
    If ActiveSheet.Cells("B5") <> "" And ActiveSheet.Cells("A5") = "" Then 
     MsgBox ("Please Enter Date!") 
     End 
    End If 

    If ActiveSheet.Cells("A5") <= ActiveSheet.Cells("B2") And ActiveSheet.Cells("A5") >= ActiveSheet.Cells("B1") Then 
     MsgBox ("All good.") 
    End If 

    If ActiveSheet.Cells("A5") > ActiveSheet.Cells("B2") Or ActiveSheet.Cells("A5") < ActiveSheet.Cells("B1") Then 
     MsgBox ("Date not in range.") 
    End If 

End Sub 

次回は、確かな答えを得るためにあなた自身の仕事の一部を示してください。