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

関連記事

: 色を設定する（QBColor 関数）

QBColor 関数 QBColor 関数は、指定した色番号に対応するRGB コ …

: 変数がオブジェクト型かどうかをチェックする（ IsObject 関数）

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

: フォントの設定（Font プロパティ）

フォントの設定（Font プロパティ）指定されたオブジェクトのフォント情報（F …

: インプットボックスを表示する（InputBox関数・InputBoxメソッド）

「InputBox関数」と「InputBoxメソッド」の違い「InputBox …

: VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）

論理演算子論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …

: 配列の要素数を取得する（UBound 関数・LBound 関数）

UBound 関数・LBound 関数【書式】 result = UBound …

: 日付時刻：日付・時刻の間隔を取得（ DateDiff 関数）

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

: VBA で正規表現を使う（RegExp オブジェクト）

RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …

: XlThemeColor 列挙型

XlThemeColor 列挙定数値内容 xlThemeColorDark …

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

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

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