Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

変数が日付型かどうかをチェックする（ IsDate 関数）

2015/04/25

IsDate 関数の使い方

【書式】

result = IsDate( expression )

【引数・戻り値】

expression ・・・調べる変数や式
result ・・・引数 expression が、日付型（ Date 型）に変換できる（日付として解釈）できるかどうかを調べた結果（ブール型：日付型に変換可能な場合は、True ／それ以外の場合は、False ）。

IsDate 関数の使用例

サンプルVBAソース

　
Sub Sample_isdate()

    '以下、True を返す
    Debug.Print IsDate(#4/1/2015#)
    Debug.Print IsDate(#6/21/2013 7:02:23 PM#)
    Debug.Print IsDate(DateSerial(2012, 1, 1))
    Debug.Print IsDate(Now)
    Debug.Print IsDate("2000,4,11")
    Debug.Print IsDate("1:20")
    Debug.Print IsDate("2005/9/1 11:30 AM")
    Debug.Print IsDate("昭和60年7月20日 1時30分")
    
        
    '以下、False を返す
    Debug.Print IsDate("おはよう！")
    Debug.Print IsDate(42005)
    Debug.Print IsDate(0)
    Debug.Print IsDate("")
    Debug.Print IsDate(Empty)
    Debug.Print IsDate(Null)

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

　

Sub Sample_isdate()

'以下、True を返す

Debug.Print IsDate(#4/1/2015#)

Debug.Print IsDate(#6/21/2013 7:02:23 PM#)

Debug.Print IsDate(DateSerial(2012, 1, 1))

Debug.Print IsDate(Now)

Debug.Print IsDate("2000,4,11")

Debug.Print IsDate("1:20")

Debug.Print IsDate("2005/9/1 11:30 AM")

Debug.Print IsDate("昭和60年7月20日 1時30分")

'以下、False を返す

Debug.Print IsDate("おはよう！")

Debug.Print IsDate(42005)

Debug.Print IsDate(0)

Debug.Print IsDate("")

Debug.Print IsDate(Empty)

Debug.Print IsDate(Null)

End Sub

　

実行結果

- VBA基本 IsDate 関数, VBA基本, エクセルVBA, 変数, 日付型, 調査

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 日付時刻：年・月・日を取得（Year、Month、Day 関数）

日付から年・月・日を取得する関数【書式】 date_year = Year ( …

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: xlFileFormat 列挙型

xlFileFormat 列挙型 Workbook.SaveAs メソッドの引 …

: 色の設定（Color プロパティ・RGB 関数）

Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …

: 変数のデータ型・宣言（Dim ステートメント）

変数の宣言一般的な方法【書式】 Dim varname [ As type, …

: 引数が省略されたかどうかをチェックする（ IsMissing 関数）

IsMissing 関数の使い方【書式】 result = IsMissing …

: Join 関数（配列の要素を結合）

Join 関数 1次元配列の各要素を指定した区切り文字で連結します。【書式】 …

: 指定した値を16進数で表記した文字列に変換する（Hex 関数）

Hex 関数の使い方【書式】 result = Hex ( expressi …

: コレクション（Collection）オブジェクト「連想配列」

コレクション（Collection）オブジェクトの使い方【書式】 Dim my …

: 変数が数値型かどうかをチェックする（ IsNumeric 関数）

IsNumeric 関数の使い方【書式】 result = IsNumeric …

PREV: 変数が配列かどうかをチェックする（ IsArray 関数）
NEXT: 変数が数値型かどうかをチェックする（ IsNumeric 関数）