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

関連記事

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

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

: 文字列：文字列の長さを取得（ Len 関数、LenB 関数）

Len 関数（文字列の長さを取得）【書式】 result_len = Len …

: 文字列：指定した数の空白（スペース）からなる文字列を返す（Space 関数）

Space 関数【書式】 result = Space ( number ) …

: ショートカットメニュー（CommandBar オブジェクト）

ショートカットメニュー（コンテキストメニュー）右クリックで表示されるメニューの …

: Math 関数（ Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan ）

Abs 関数【書式】 value = Abs ( number ) 【引数・戻 …

: ポイント単位の値に変換（CentimetersToPoints,InchesToPoints）

CentimetersToPoints メソッドセンチメートル単位の値をポイン …

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

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

: テキストファイル（UTF-8）を読み込み、書き出し（ADODB.Stream）

Stream オブジェクト ADO（ActiveX Database Objec …

: セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）

TextToColumns メソッド TextToColumns メソッドを使用 …

: VBA で正規表現を使う（RegExp オブジェクトのプロパティ）

RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …

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