Вопрос: Как сцепить ячейки в Excel с пробелами?

Автор Анонимный вопрос задал интересный вопрос в категории Excel, Инструменты ms office, Компьютерная грамотность. Он спрашивает: Как сцепить ячейки в Excel с пробелами?. Среди полученных ответов он выбрал самый точный и полный ответ.

Самый полезный ответ для автора Анонимный вопрос

Если используете Excel 2019 или Office 365, то можно функцией ОБЪЕДИНИТЬ. Формула будет такая (для диапазона A1:A10):=ОБЪЕДИНИТЬ(» «;ИСТИНА;A1:A10)Если Excel более старый, то либо ручная сцепка с указанием пробелов, то есть:=СЦЕПИТЬ(A1;» «;A2;» «;A3)Либо использьовать UDF (функцию на языке VBA). Например такую:Public Function ОБЪЕДИНЕНИЕ(delim As String, ParamArray rng() As Variant) Dim cll1 As Variant, cll2 As Variant Dim Res As String For Each cll1 In rng For Each cll2 In cll1 If cll2 <> «» Then Res = Res & cll2 & delim Next cll2 Next cll1 ОБЪЕДИНЕНИЕ = Left(Res, Len(Res) — Len(delim))End Function

Кроме этого другие посетители написали Ещё 1 ответ

Если используете Excel 2019 или Office 365, то можно функцией ОБЪЕДИНИТЬ. Формула будет такая (для диапазона A1:A10):=ОБЪЕДИНИТЬ(» «;ИСТИНА;A1:A10)Если Excel более старый, то либо ручная сцепка с указанием пробелов, то есть:=СЦЕПИТЬ(A1;» «;A2;» «;A3)Либо использьовать UDF (функцию на языке VBA). Например такую:Public Function ОБЪЕДИНЕНИЕ(delim As String, ParamArray rng() As Variant) Dim cll1 As Variant, cll2 As Variant Dim Res As String For Each cll1 In rng For Each cll2 In cll1 If cll2 <> «» Then Res = Res & cll2 & delim Next cll2 Next cll1 ОБЪЕДИНЕНИЕ = Left(Res, Len(Res) — Len(delim))End Function

Функции Excel 2016 СЦЕП (CONCAT) и ОБЪЕДИНИТЬ (TEXTJOIN)https://statanaliz.info/excel/funktsii-i-formuly/novye-funktsii-excel-2016-stsep-i-textjoin/