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

関連記事

: 引数の整数部分を取得する（Fix 関数・Int 関数）

Fix 関数・Int 関数の使い方【書式】 number_fix = Fix …

: 文字列：文字列の指定した位置から指定文字数取得（Mid 関数,MidB 関数）

Mid 関数・MidB 関数の使い方【書式】 result_mid = Mi …

: 文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）

InStrRev 関数任意の文字列の中で、指定した文字列を最後から検索して、見 …

: 文字列：文字列変数内の一部を置き換える（Mid・MidB ステートメント）

Mid・MidB ステートメントの使い方【書式】 { Mid | MidB } …

: フォントサイズ（Size プロパティ・StandardFontSize プロパティ）

フォントサイズを取得・設定する（Size プロパティ） Size プロパティは、 …

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

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

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

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

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

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

: 四捨五入・切り上げ・切り捨て・丸め（Round 関数他）

Round 関数（丸め）の使い方【書式】 value = Round ( ex …

: 日付時刻：経過時間を取得（ Timer 関数）

Timer 関数の使い方【書式】 result = Timer () 【戻り値 …

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