Похожие вопросы

Как удалить пробелы между словами с помощью VBA пластине

Я был бы очень признателен за некоторую помощь в выяснении, как удалить пробелы между словами. Мне нужно будет только нацелить все, что находится в ячейке "A1", например, если у меня есть "следующий Ex" в ячейке, я хочу, чтобы макрос изменил его на "NextEx". Я буду запускать это на нескольких листах, поэтому формула не будет моим лучшим вариантом.

5
задан Eric
источник

3 ответов

считаем:

Sub NoSpace()
    Dim sh As Worksheet
    For Each sh In Sheets
        sh.Range("A1").Replace what:=" ", replacement:=""
    Next sh
End Sub
2
отвечен Gary's Student 2017-07-26 16:09:23
источник

VBA:

Dim cellText As String
cellText = [Get Cell Text From Worksheet]
cellText = Replace(cellText," ", "")

Формула:

=SUBSTITUTE(A1," ","")
1
отвечен Kaz 2017-07-26 16:09:18
источник

VBA:

Join(Split(Range("A1").Value, " "), "")

Split (doc) строку в массив с помощью "" (пробел) в качестве разделителя; Join (doc) массив в строку, используя "" (пустая строка) в качестве разделителя.

1
отвечен Yorik 2017-07-26 16:16:34
источник

Другие вопросы microsoft-excel microsoft-excel-2010 vba