Excel VBA LTrim、RTrim関数で先頭と末尾のスペースを削除する

VBA関数

VBA関数のLTrim関数RTrim関数について、使い方のご説明です。

LTrim関数は指定した文字列の、先頭のスペースを削除した結果を返します。

RTrim関数は指定した文字列の、末尾のスペースを削除した結果を返します。

Replace関数」でスペースの削除をした方が早いようにも感じますが、前後のスペースのみ削除した結果を取得したい場合には、Replace関数では一工夫必要なためLTrim関数やRTrim関数を使用すると非常に便利です。

前後のスペースをまとめて削除する「Trim関数」や「Replace関数」の使い方は下記記事をご覧ください。

1.LTrim関数とRTrim関数の使い方

LTrim関数は指定した文字列から先頭のスペースを削除した結果を返し、RTrim関数は末尾のスペースを削除した結果を返します。

次のように記述します。

LTrim(String)

RTrim(String)

String」にはスペースを削除したい文字列を指定します。

「String」にNull値が含まれている場合は、Nullを返します。

2.サンプルコード

半角スペースでも、全角スペースでも前後それぞれのスペースは削除されます。

以下サンプルコードは半角スペースです。

Sub Sample1()

Dim MyStr As String

MyStr = " ABC "

Debug.Print LTrim(MyStr)
Debug.Print RTrim(MyStr)

End Sub

以下サンプルコードは全角スペースです。

Sub Sample2()

Dim MyStr As String

MyStr = " ABC "

Debug.Print LTrim(MyStr)
Debug.Print RTrim(MyStr)

End Sub

次は前後以外にスペースが存在するサンプルコードです。

Sub Sample3()

Dim MyStr As String

MyStr = " A B C "

Debug.Print LTrim(MyStr)
Debug.Print RTrim(MyStr)

End Sub

あくまで前後のみスペースが削除されました。

タイトルとURLをコピーしました