Excelのセルから複数のスペースを単一のスペースに置き換える方法は？

複数のスペースを含むテキスト文字列のリストがあるとすると、次のスクリーンショットのように、これらのスペースをテキスト文字列内のXNUMXつのスペースに置き換えて、単語を区切る必要があります。 複数のスペースをXNUMXつずつ削除せずに、一度にXNUMXつのスペースに置き換えるにはどうすればよいですか？

式を使用して、複数のスペースを単一のスペースに置き換えます

VBAコードを使用して、複数のスペースを単一のスペースに置き換えます

Kutools for Excelを使用して、複数のスペースを単一のスペースに置き換えます

式を使用して、複数のスペースを単一のスペースに置き換えます

Excelでは、通常の検索と置換機能がこの問題を解決するのにうまく機能しない可能性があるため、簡単な数式を適用して問題を処理できます。 このようにしてください：

1。 次の式を入力します。 = TRIM（SUBSTITUTE（A2、CHAR（32）、 ""）） セル値以外の空白のセルに、スクリーンショットを参照してください。

2。 次に、 入力します キーを押して結果を取得し、セルB2を選択してから、この数式を適用する範囲セルに塗りつぶしハンドルをドラッグすると、余分なスペースがすべてテキスト文字列から削除され、XNUMXつのスペースのみが保持されます。テキスト。 スクリーンショットを参照してください：

VBAコードを使用して、複数のスペースを単一のスペースに置き換えます

VBAコードに興味がある場合は、複数のスペースをXNUMXつのスペースに置き換えるためのコードを作成できます。次のようにしてください。

1。 押し続けてください Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2。 次に、をクリックします インセット > モジュール、次のコードをに貼り付けます モジュール 窓。

VBAコード：複数のスペースを単一のスペースに置き換えます

Sub replace_multiplespaces()
'Updateby Extendoffice
Dim x As Range
Dim Workx As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set Workx = Application.Selection
Set Workx = Application.InputBox("Range", xTitleId, Workx.Address, Type:=8)
    For Each x In Workx
        x = WorksheetFunction.Trim(x)
    Next x
End Sub

3。 次に、 F5 このコードを実行するためのキーを押すと、余分なスペースを削除するデータ範囲を選択するように促すプロンプトボックスが表示されます。スクリーンショットを参照してください。

4。 そして、 OK ボタンをクリックすると、余分なスペースはすべてテキスト内のXNUMXつのスペースに置き換えられます。

Kutools for Excelを使用して、複数のスペースを単一のスペースに置き換えます

先頭のスペース、末尾のスペース、テキストのすべてのスペースを削除するなど、他の種類のスペースを削除する必要がある場合は、強力なツールをお勧めします-Excel用のKutools、 そのと スペースを削除する ユーティリティでは、先頭のスペース、末尾のスペース、すべてのスペースなど、必要に応じて任意のスペースを削除できます。

インストールした後 Kutools for Excel、次のようにしてください。

1。 余分なスペースを削除するデータ範囲を選択します。

2に設定します。 OK をクリックします。 クツール > テキスト > スペースを削除する、スクリーンショットを参照してください：

3。 の中に スペースを削除する ダイアログボックスで、 すべての余分なスペース スペースタイプ セクション、およびあなたはからの結果を見ることができます プレビュー ペイン、スクリーンショットを参照してください：

4。 そして、 Ok or 申し込む ボタンをクリックすると、余分なスペースがすべてセルから削除され、テキスト内にXNUMXつのスペースだけが残ります。

このスペースの削除機能の詳細については、クリックしてください。

クリックしてKutoolsfor Excelと無料トライアルを今すぐダウンロードしてください！

デモ：Kutools for Excelを使用して、複数のスペースを単一のスペースに置き換えます