実務で外部システムからデータを抽出したり、ユーザーが手入力したデータを取り扱う際、意図しない「空白」がデータの先頭や末尾に紛れ込んでいることはありませんか？
この余計なスペースを放置したままVLOOKUP関数やIf文の判定を行うと、「データは合っているのに一致しない」という原因不明のバグを生む原因になります。今回は、VBAで文字列の端にある空白をきれいに掃除するための、LTrim、RTrim、Trim関数の使い方を解説します。
基礎知識：各関数の役割を理解しよう
VBAには、文字列の空白を整理するための関数が3つ用意されています。
LTrim関数：文字列の左側（先頭）にある空白だけを削除します。
RTrim関数：文字列の右側（末尾）にある空白だけを削除します。
Trim関数：文字列の両端（先頭と末尾）にある空白を削除します。
ここで重要なのは、これらの関数は「文字列の途中にある空白」には一切影響を与えないという点です。「A B」のように単語の間に意図的に入っている空白を消したくない場合には最適ですが、もし途中の空白も全て消したい場合は、Replace関数など別の手法が必要になります。
実装：サンプルプログラム
以下のコードを標準モジュールに貼り付けて実行してみてください。それぞれの関数の挙動が明確に分かります。
Sub CleanSpacesSample()
‘ テスト用の文字列（先頭と末尾にスペースを含んでいます）
Dim myStr As String
myStr = ” VBA実務テクニック ”
‘ (1) LTrim: 先頭のスペースを除去
Debug.Print “LTrim結果: [” & LTrim(myStr) & “]”
‘ (2) RTrim: 末尾のスペースを除去
Debug.Print “RTrim結果: [” & RTrim(myStr) & “]”
‘ (3) Trim: 両端のスペースを除去
Debug.Print “Trim結果: [” & Trim(myStr) & “]”
‘ 実務での活用例：セルの値から空白を除いて比較する際などに有効です
If Trim(Range(“A1”).Value) = “ID_001” Then
MsgBox “空白を除去して判定しました！”
End If
End Sub
応用・注意点：現場で陥りやすい罠
実務において注意すべきポイントが2つあります。
1. ワークシート関数のTrimとの違い
Excelのワークシート関数にも「TRIM関数」がありますが、VBAのTrim関数とは挙動が全く異なります。
ワークシート関数のTRIMは「文字列の先頭と末尾の削除」だけでなく、「文字列中の連続する空白を1つにまとめる」という機能を持っています。もしVBA上でワークシート関数の挙動を再現したい場合は、`Application.WorksheetFunction.Trim(myStr)` を使用してください。
2. 全角と半角の扱い
VBAのLTrim/RTrim/Trim関数は、半角スペースだけでなく全角スペースも削除対象として扱います。これは非常に便利ですが、もし全角と半角を厳密に区別して処理する必要がある場合は、正規表現（RegExp）など別のロジックを検討する必要があります。
まずは、データの取り込み処理の直後に `Trim` を通す癖をつけるだけで、データ不一致によるエラーを大幅に減らすことができます。ぜひ日々の開発に取り入れてみてください。
