Как форсировать интервал между отдельными словами (в идеале в Excel, может быть, Notepad++?)

Question

Пожалуйста, будьте уверены, я потратил неделю на поиски ответа на мой вопрос без успеха.

У меня есть таблица Excel, которая случайным образом генерирует строку слов в каждой ячейке из списка слов. Проблема в том, что мне нужно, чтобы между каждой ячейкой был только один интервал между словами при копировании и вставке из электронной таблицы. Я провел неделю, пытаясь заставить Excel сделать это без успеха, есть идеи?

Если нет, надеюсь, если я вставлю в Notepad++, есть способ выделить вставленные данные, а затем заставить их иметь только один пробел между каждым словом?

Спасибо!

Answer 1

Если вы хотите удалить несколько пробелов между словами, попробуйте этот короткий макрос:

Sub SingleWordSpacing()
    Dim r As Range

    For Each r In ActiveSheet.UsedRange.SpecialCells(2)
        If InStr(1, r.Text, " ") > 0 Then
            With Application.WorksheetFunction
                r.Value = .Trim(r.Text)
            End With
        End If
    Next r
End Sub