Excel VBA Trim関数で文字列の先頭と末尾の空白を取り除く方法

 

Excel VBA Trim関数は、文字列の先頭と末尾の空白を取り除くために使用します。入力された文字列の両端にある余分なスペースを削除し、きれいな文字列を取得するための関数です。使い方や注意点など、サンプルコードをもとに具体的に解説します。

 

2025年の目標は繰り返し作業に悩まされない年にしませんか? Excel VBAを活用した効率化がその第一歩
本サイト参考:Excel VBAで自動化するコードのベースを習得したい方におすすめの記事

 

Excel VBA Trimを利用

以下のようなシーンで利用されます。

・フォームやセルに入力されたデータの前後にある不要な空白を取り除く。

・データベースから取得したデータや外部ファイルから読み込んだデータの前後の空白を削除して、正確なデータ処理を行う。

 

使い方

Trim(文字列)

文字列を引数として渡すと、その文字列の先頭と末尾の空白を取り除いた結果を返します。

 

ポイント

・Trim関数は、文字列の中間にある空白は削除しません。中間の空白を削除したい場合は別のアプローチが必要です。

・Trim関数は、全角スペース(日本語などの全角文字)は対象外です。全角スペースを扱う場合は別の対処が必要です。

 

Excel VBA Trimのサンプルコード

Excel VBAで効率化の準備をしてみませんか?2025年をよりスムーズに過ごすための資格
基本的な文法やVBAの実践的な応用までを網羅的に学習できる方法は、ExcelVBAエキスパート資格の取得を目指すこと。学習を通して、より効率的に、着実に基礎を身につけることが可能です。資格取得すれば、スキルの証明にもなり、職場での評価アップにも繋がるため、勉強を進めるモチベーションにもなります。
本サイト参考:マクロ知識がないから「何から学べば良いのかわからない」という人におすすめの記事

セルに入力された文字列から前後の空白を削除する例
Option Explicit

Sub RemoveLeadingAndTrailingSpaces()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1")
    
    Dim originalText As String
    Dim cleanedText As String
    
    originalText = ws.Range("A1").Value
    cleanedText = Trim(originalText)
    
    ws.Range("B1").Value = cleanedText
End Sub

ユーザーフォームから入力されたデータの前後の空白を取り除く例

Option Explicit

Sub CleanUserInput()
    Dim userInput As String
    Dim cleanedInput As String
    
    userInput = InputBox("Enter some text with leading or trailing spaces:")
    cleanedInput = Trim(userInput)
    
    MsgBox "Cleaned Input: " & cleanedInput
End Sub

Trim関数を使うことで、データの前後にある不要な空白を簡単に取り除けます。データ入力やデータ処理を行う際に非常に有用な関数です。

Excel VBAで自動化するコードのベースを習得したい方におすすめ!

VBAエキスパート資格は、日常業務でExcelを多用し、手動作業を減らしたいと考えている方には価値あるものです。

ExcelVBAエキスパートベーシック
仕事の効率をあげるためにExcelVBAを利用する人が対象の問題集です。


ExcelVBAエキスパートスタンダード

ExcelVBAの開発を仕事にする人が対象の問題集です。

 

Excel  VBA エキスパート資格について知りたい方は、下記「Excel VBAスキルアップを目指すなら知っておきたいVBAエキスパート」をご確認ください。