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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

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

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

: 配列の添字の最小値を「1」に設定する

Option Base ステートメントを使用する【書式】 Option Bas …

: Split 関数（文字列型の一次配列を作成）

Split 関数の使い方【書式】 myArray = Split ( expr …

: ユーザー設定リストを使って並べ替える（Sort）

VBAでリスト、テーブルを並べ替える（Sort） VBAで、ソートを行うには、S …

: 乱数を生成する（Rnd 関数）

Rnd 関数の使い方 Rnd 関数は、0 以上、1 未満の範囲の乱数を単精度浮動 …

: フォント太字・斜体（Bold, Italic, FontStyle プロパティ）

太字の設定（Bold プロパティ） Bold プロパティは、フォントを太字にする …

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

IsEmpty 関数の使い方【書式】 result = IsEmpty ( e …

: エラー（CVErr 関数・IsError 関数・Error 関数）

CVErr 関数（エラー番号をエラー値に変換する）の使い方【書式】 retur …

: VBA で正規表現を使う（RegExp オブジェクトのメソッド）

RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …

: ユーザー定義関数：自動再計算関数の設定（Volatile メソッド）

ユーザー定義関数で、自動再計算を行うかどうかを設定するワークシート上で使用する …

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