日付が入力されているか判定する

トップページ（目次）

516.日付が入力されているか判定する

＜実行前後＞

→

Sub 日付が入力されているか判定する()
    
    日付 = Range("A1")
    
    If IsDate(日付) = True Then
        
        MsgBox "A1は日付です"
        
    Else
        
        MsgBox "A1は日付ではありません"
        
    End If
    
End Sub