【VBAリファレンス】Excel VBAで文字列から数値を抽出する：Val関数の全貌と実務での活用術

概要：Val関数とは何か

Excel VBAにおけるデータ処理の現場では、文字列として格納されたデータの中から「数値」のみを正確に抽出・変換する作業が頻繁に発生します。例えば、CSVファイルから読み込んだデータや、ユーザーフォームに入力された値、あるいは特定のフォーマットを持つセル内の文字列から、計算可能な数値部分だけを抜き出したいというケースです。

このような場面で最もシンプルかつ効率的に利用できるのが「Val関数」です。Val関数は、文字列の先頭から数値を読み取り、数値として認識できなくなる文字に到達するまでの部分を倍精度浮動小数点数型（Double）として返す関数です。一見すると非常に単純なツールですが、その特性と限界を正しく理解していないと、実務で思わぬバグを生む原因となります。本稿では、Val関数の仕組みから、他の変換関数との違い、そして実務で安全に使いこなすためのベストプラクティスを網羅的に解説します。

詳細解説：Val関数の挙動と注意点

Val関数の最大の特徴は、その「読み取りルール」にあります。関数に文字列を渡すと、VBAは以下の手順で処理を実行します。

1. 文字列の先頭から順に走査を開始する。
2. 数字（0-9）、小数点（.）、および正負の符号（+ -）を数値として認識する。
3. 数値として解釈できない文字（全角数字やカンマ、スペース、アルファベットなど）に遭遇した時点で処理を停止し、それまで読み取った数値を返す。
4. 文字列の先頭が数値ではない場合、0を返す。

ここで重要なのは、Val関数は「ローカル設定（言語設定）に依存しない」という点です。例えば、日本国内のExcelでは、数値の区切り文字としてカンマ（,）を使用することがありますが、Val関数はカンマを「数値の一部ではない」と判断し、そこで読み取りを終了します。つまり、”1,200″ という文字列に対してVal関数を実行すると、結果は「1」となります。この挙動は、多くの初心者が陥る罠の一つです。

また、Val関数は「＆H（16進数）」や「＆O（8進数）」といった接頭辞も解釈します。これは通常の数値変換にはない強力な機能ですが、データの中に偶然これらの文字列が含まれている場合、意図しない数値に変換されるリスクも孕んでいます。

サンプルコード：実践的な利用例

以下に、Val関数の基本的な使い方と、配列内のデータから数値のみを抽出する実用的なコード例を示します。

Sub ValFunctionExample()
    Dim sampleStr1 As String
    Dim sampleStr2 As String
    Dim sampleStr3 As String
    
    ' 基本的な数値抽出
    sampleStr1 = "123.45ABC"
    Debug.Print "結果1: " & Val(sampleStr1) ' 出力: 123.45
    
    ' 先頭に数値がない場合
    sampleStr2 = "No.999"
    Debug.Print "結果2: " & Val(sampleStr2) ' 出力: 0
    
    ' カンマを含む場合の挙動（注意点）
    sampleStr3 = "1,250円"
    Debug.Print "結果3: " & Val(sampleStr3) ' 出力: 1
    
    ' 複数データからの抽出処理
    Dim dataList As Variant
    Dim i As Long
    dataList = Array("100kg", "50.5m", "Total: 200", "No Data")
    
    For i = LBound(dataList) To UBound(dataList)
        Debug.Print "データ " & i & " の数値: " & Val(dataList(i))
    Next i
End Sub

実務アドバイス：Val関数の限界と代替手段

実務においてVal関数は強力ですが、万能ではありません。プロフェッショナルな現場では、データの性質に応じて以下の代替手段や補完テクニックを使い分ける必要があります。

1. カンマ区切りの数値を処理する場合
先述の通り、”1,250″ を正しく抽出したい場合は、Val関数ではなく「Replace関数」でカンマを取り除いてから、CDbl関数やCLng関数を使用してください。
例：CDbl(Replace(“1,250”, “,”, “”))

2. 全角数字が含まれる場合
Val関数は全角数字を数値として認識しません。StrConv関数を使用して、事前に全角を半角に変換する必要があります。
例：Val(StrConv(“１２３”, vbNarrow))

3. 数字以外の文字をすべて排除したい場合
文字列の中に数値が混在しており、それらをすべて結合して数値化したい場合は、RegExp（正規表現）を利用するのが最もスマートです。Val関数は「先頭から」という制約があるため、文字列の途中に数値がある場合に弱いという欠点があります。

4. 数値かどうかの判定を厳密に行いたい場合
IsNumeric関数と併用するのが定石です。Val関数は数値でない場合に「0」を返しますが、これは「入力値が0だったのか、そもそも数値ではなかったのか」の判別がつきません。データの妥当性を検証する際は、まずIsNumericでチェックし、その後に変換処理へ進むフローを構築してください。

まとめ：適材適所でVBAの処理を最適化する

Val関数は、処理速度が非常に高速であり、また「先頭から数値だけを切り出す」という特有の仕様を持つため、ログファイルの解析や、定型フォーマットのデータ抽出において極めて有効なツールです。しかし、その仕様を盲信して複雑な文字列処理に適用するのは避けるべきです。

プログラミングにおいて、「どの関数を使うか」という選択は、「どのようなデータが来る可能性があるか」というリスク管理と直結しています。Val関数は、データ形式が明確で、かつ「先頭に数値があることが保証されている」というケースにおいて、その真価を発揮します。

本記事で解説した特性と注意点を踏まえ、自身のコードを見直してみてください。Excel VBAのスキルアップにおいて最も重要なのは、各関数の持つ「性格」を深く理解し、状況に応じて最も堅牢な関数を選択する判断力です。今日から、より安全で効率的なデータ処理を実装していきましょう。