【VBA】日付かどうか判定する方法(型が一致しませんエラー対策)

2023年4月2日

今回はVBAで文字列が日付かどうかをチェックする方法を紹介します。

例えばExcelシート上に書かれた日付をCDate関数で日付型に変換する処理があったとします。

このとき、文字列が日付に変換できないとCDate関数がエラーとなってしまいます。

エラー回避のためこういった処理をするときは事前に文字列が日付かどうかをチェックするようにしましょう。

《CDate関数については下記記事をご覧ください》

文字列が日付かどうか判定する方法(IsDate関数)

Sub CheckDate()
    '''文字列が日付かどうか判定
    
    Dim str As String, dt As Date
    str = "20230401" 'エラーになる文字列
    
    'IsDate関数で判定
    If IsDate(str) Then
        dt = CDate(str)
    Else
        MsgBox "文字列が日付ではありません"
    End If
End Sub

文字列が日付かどうか判定するには「IsDate関数」を使います。

まずはサンプルコードを実行してみてください。「文字列が日付ではありません」のメッセージボックスが表示されるはずです。