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

指定した文字列を数値に変換する（Val 関数）

2015/05/16

Val 関数の使い方

Val 関数は、指定した文字列に含まれる数字を数値として認識し、その値を適切なデータ型に変換してかえす関数です。

【書式】

result = Val ( expression )

引数・戻り値

expression ・・・任意の文字列・文字列式を指定します。
result ・・・引数 expression に含まれる数値を適切なデータ型に変換した値。

文字列中の数字以外の文字を見つけると Val 関数は読み込みを中止します。ただし、スペース、タブ、ラインフィード、キャリッジリターン等は無視されます。
例1：Val(“12 345”) ⇒ 12345（[スペース]は無視）
例2：Val(“99\123”) ⇒ 99（[\]以降は読み込み中止）

8 進数を表す &O や 16 進数を表す &H は、数値として認識します。
例：Val(“&H10”) ⇒ 16, Val(“&O10”) ⇒ 8 ）

ピリオド (.) は、小数点の記号として認識します。
例：Val(“123.55”) ⇒ 123.55

引数 expression が、Null 値の場合は、エラーになります。

引数 expression が、Empty 値の場合は、0 を返します。

Val 関数の使用例

サンプルVBAソース

　
Sub Sample_val()


    Debug.Print Val(123456)                  '数値
    
    Debug.Print Val("9\12")                  '「\」を含む

    Debug.Print Val("&H10")                  '16進数
    
    Debug.Print Val("&O10")                  '8進数

    Debug.Print Val("１２３abc")             '全角数値と文字列
    
    Debug.Print Val("123abc")                '半角数値と文字列

    Debug.Print Val("25.1")                  '小数点を含む数値

    Debug.Print Val(50 & Chr(9) & "11")      '水平タブ

    Debug.Print Val(60 & Chr(10) & 1)        'ラインフィード
    
    Debug.Print Val(70 & Chr(11) & 1)        '垂直タブ

    Debug.Print Val(80 & Chr(13) & 1)        'キャリッジリターン

    Debug.Print Val(90 & Chr(32) & 1)        'スペース
    

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

25

26

27

28

29

30

31

　

Sub Sample_val()

Debug.Print Val(123456) '数値

Debug.Print Val("9\12") '「\」を含む

Debug.Print Val("&H10") '16進数

Debug.Print Val("&O10") '8進数

Debug.Print Val("１２３abc") '全角数値と文字列

Debug.Print Val("123abc") '半角数値と文字列

Debug.Print Val("25.1") '小数点を含む数値

Debug.Print Val(50 & Chr(9) & "11") '水平タブ

Debug.Print Val(60 & Chr(10) & 1) 'ラインフィード

Debug.Print Val(70 & Chr(11) & 1) '垂直タブ

Debug.Print Val(80 & Chr(13) & 1) 'キャリッジリターン

Debug.Print Val(90 & Chr(32) & 1) 'スペース

End Sub

　

実行結果

- VBA基本 Val 関数, VBA基本, エクセルVBA, 数値取得, 文字列

Tweet

Message コメントをキャンセル

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

関連記事

: 文字列：文字列を指定した形式に変換する（StrConv 関数）

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

: 指定したセル範囲のサイズを変更（Resize プロパティ）

Resize プロパティ指定したセル範囲のサイズ（行数や列数）を変更します。 …

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

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

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

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

: 日付時刻：日付時刻から情報取得（ DatePart 関数）

DatePart 関数（日付・時刻の値から情報を取得）【書式】 result …

: カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）

カレントフォルダカレントフォルダとは、ブックを開いたり保存するときに既定で参照 …

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

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

: メッセージボックスを表示（MsgBox関数）

MsgBox関数【書式】 result = MsgBox ( Prompt [ …

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

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

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

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

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