Excel добавление данных в ячейки

• Добавить значение в начало или конец ячеек формулой
• Добавить символ в конце каждой ячейки
• Как добавить символ в конце и начале ячеек столбца
• Добавить символы в начале каждой ячейки
• Добавить слово в каждую ячейку столбца
• Добавить символ к каждому слову

Периодически офисным специалистам, работающим с большими массивами данных, требуется такая операция, как добавление определенного текста во все ячейки столбца – в конце или начале каждой ячейки.

Добавить значение в начало или конец ячеек формулой

Можно решить задачу формулой “СЦЕПИТЬ” или простой конкатенацией через амперсанд (символ “&”). Но на это нужно много времени, т.к. нужно

• добавить дополнительный столбец рядом с исходным
• ввести формулу с функцией “СЦЕПИТЬ” или формулу с амперсандом в первую ячейку – здесь кому что больше нравится. =СЦЕПИТЬ(A1;” слово”) или A1&” слово”.
• протянуть формулу до конца нового столбца, убедившись, что она затронула весь диапазон
• заменить в нем формулы на значения
• скопировать данные из нового столбца в первый
• удалить новый столбец

Ниже пример с добавлением одного символа, в данном случае – знака вопроса. Вместо него можно вписать внутри кавычек любое значение.

Могут возникнуть сложности с добавлением кавычек (“) – поскольку формулы текстовые, аргумент указывается в кавычках, и во избежание ошибок одинарные кавычки обозначаются двойными, итого получается 4 знака подряд:

=""""&A1&"""" 

“заключит” значение ячейки A1 в кавычки.

Если данную операцию приходится производить часто, такой процесс порядком поднадоест. Однажды надоел и автору надстройки для Excel !SEMTools, поэтому процесс был автоматизирован. Ниже перечислены несколько примеров, как добавить текст в каждую ячейку в Excel с ее помощью.

Добавить символ в конце каждой ячейки

Выделяем диапазон ячеек, жмем макрос, вводим необходимый символ и жмем ОК. Так просто. Данные изменяются в том же столбце.

Как добавить символ в конце и начале ячеек столбца

Допустим, у нас есть названия ООО, но они без кавычек и без “ООО”.
Ниже пример, как ускорить процесс.
1. Добавления кавычек с обеих сторон ячейки – чтобы не производить две операции.

Добавить символы в начале каждой ячейки

2. Теперь добавим символы “ООО ” в начале каждой ячейки, чтобы завершить задачу.

Добавить слово в каждую ячейку столбца

Допустим, нужно добавить слово “выплатить” в начале каждой ячейки с ФИО определенного человека. Если исходные данные в именительном падеже, может быть также полезна процедура склонение по падежам.

Выделяем столбец, склоняем ФИО, и далее выбираем процедуру в меню и вводим слово в окошко, вместе с пробелом после него:

Добавить символ к каждому слову

Все описанные выше формулы и возможности добавят символы в ячейку вне зависимости от ее содержимого. Даже если она изначально пустая. Иначе говоря, являются способом изменения ячеек. Поэтому и находятся в этом разделе.

Когда нужно добавить символ перед или после каждого слова в ячейке, это уже является одним из вариантов изменить слова, а не ячейки. Ведь слов в ячейке может быть разное количество, а может и вовсе не быть. На этот случай у меня есть отдельная статья с формулами и функциями: добавить символ в Excel к каждому слову в ячейке.

Хотите так же быстро добавлять символы или текст в несколько ячеек одновременно?
!SEMTools существенно расширит возможности вашего Excel.

В процессе преподавания курсов Excel мне часто приходилось сталкиваться с некоторым непониманием начинающих пользователей особенностей ввода данных в таблицы Excel. Как правило, это касается не очень уверенных пользователей Windows. Впрочем, часто люди, считающие, что вполне умеют работать в Windows, на самом деле многого не знают, отчего и возникают проблемы при обучении работе с конкретными программами.

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

Всё, что я здесь описываю, разбирается на моих дистанционных курсах Excel по Skype. О преимуществах индивидуальных занятий по Skype вы можете прочитать в отдельной статье. Итак, приступим.

Здесь рассмотрены только способы ручного ввода. Автоматизированный ввод данных производится другими способами, например, при помощи Мастера импорта текста или подключении источников данных.

Первичный ввод и редактирование ячеек

Существует несколько способом ввода данных в ячейки. Все они очень простые, но, как правило, каждый из них эффективнее применять в определённых случаях. Также сразу стоит отметить, что некоторые способы характерны не только для Excel, но и для Windows в целом, о чём часто большинство пользователей и не догадываются, приписывая всё это лишь одной конкретной программе.

Стоит отметить одну важную особенность: признаком того, что можно редактировать данные ячейки, является мигающий в ней текстовый курсор. Курсор появляется при выполнении любого из нижеперечисленных действий. За исключением последнего указанного с списке случая, если курсор не появился, то значит вы что-то сделали не так.

Двойной щелчок на ячейке

Пожалуй, это самый распространённый способ отредактировать содержимое любой ячейки Excel. Способ подходит как для ввода данных в пустую ячейку, так и для редактирования существующего содержимого ячейки. Если вам нужно что-то ввести в ячейку или изменить в ней (текст, числа, формулы), то просто выполните двойной щелчок.

Если в ячейке уже есть текст, то вы можете щёлкать на соответствующей его части для того, чтобы курсор появился сразу там.

Клавиша F2 на клавиатуре

Про данный способ отредактировать содержимое ячейки листа Excel почему-то мало кто знает. Мой опыт проведения различных учебных курсов показывает, что это, прежде всего, связано с недостаточным знанием Windows. Дело в том, что наиболее распространённой функцией клавиши F2 в Windows является начало редактирования чего-либо. Excel тут не исключение. Данный способ работает независимо от того, есть данные в ячейке или нет.

Также вы можете использовать нажатие F2 для редактирования имён файлов и папок в Проводнике Windows — попробуйте и убедитесь сами, что способ достаточно универсален (файл или папка должны быть выделены).

Клавиша Backspace на клавиатуре

Хорошо подходит для случая, когда в ячейке уже есть данные, но их нужно удалить и ввести новые. Нажатие Backspace (не путать с Esc!) приводит к стиранию имеющихся в ячейке данных и появлению текстового курсора. Если вам нужно просто стереть данные ячейки, но вводить новые не требуется, то лучше нажать Delete.

Если у вас выделена группа ячеек, то нажатие Backspace приведёт к стиранию содержимого только левой верхней ячейки выделенного диапазона. Для удаления содержимого группы ячеек также лучше использовать Delete.

Редактирование в строке формул

Как правило применяется при редактировании больших формул, которые непосредственно в самой ячейке изменять просто неудобно. Однако можно использовать и для ввода простого текста или чисел. Чтобы начать редактирование содержимого ячейки в строке формул, выделите ячейку щелчком и установите курсор в строке формул, как показано на рисунке.

[нажмите на картинку для увеличения]

Справка: как сохранять фото с сайтов

Если нужно написать много текста или большую и сложную формулу, то строку формул можно расширить. Для этого есть специальная кнопка, показанная на рисунке ниже. Также не забывайте, что перенос строк в Excel делается через сочетание Alt + Enter.

[нажмите на картинку для увеличения]

Справка: как сохранять фото с сайтов

Щёлкнуть на ячейке и начать писать

Самый простой способ. Лучше всего подходит для ввода данных в пустую ячейку — выделите ячейку щелчком и начните вводить данные. Как только вы нажмёте первый символ на клавиатуре, содержимое ячейки очиститься (если там что-то было), а в самой ячейке появится текстовый курсор. Будьте внимательны — таким образом можно случайно(!) стереть нужные вам данные, нажав что-то на клавиатуре!

Подтверждение ввода данных в ячейку

Проводя курсы Excel, я наблюдал очень(!) распространённую проблему у начинающих пользователей Excel — многие, написав в ячейку данные, забывают подтвердить ввод. Обязательно подтверждайте ввод данных в ячейку одним из ниже указанных способов!

После подтверждения ввода данных, текстовый курсор в ячейке пропадает. Если курсор не пропал, значит ввод данных не подтверждён!

Клавиша Enter

Универсальный и самый распространённый способ подтверждения ввода данных куда-либо. Нажатие Enter завершает ввод данных в ячейку в любом случае, независимо от того, пишете ли вы там формулу или простой текст. Выделение переходит на ячейку ниже (если не настроить иное, чего обычно никто никогда не делает).

Щелчок мышкой на другую ячейку

Работает всегда, за исключением ввода формул. Особенности ввода формул в Excel уже разбирал ранее — рекомендую ознакомиться.

Использование стрелок на клавиатуре

Работает только в том случае, если это первый ввод данных в пустую ячейку. В противном случае, если вы просто редактируете ранее введённый текст, будет перемешаться текстовый курсор по тексту внутри ячейки.

Стоит иметь ввиду, что если вы пишете данные в ранее пустую ячейку и, допустив опечатку, нажимаете стрелку Назад для возврата текстового курсора к месту ошибки, то вместо возврата курсора получите незапланированное вами подтверждение данных и перескок выделения на другую ячейку слева! Довольно неприятная особенность Excel, которую необходимо учитывать, поэтому при первичном вводе данных в пустую ячейку для перевода текстового курсора используйте щелчки мышкой по написанному в ячейке тексту.

Использование кнопки в строке формул

Слева от строки формул есть кнопка в виде зелёной или серой галочки, нажатие на которую подтверждает ввод данных в ячейку. При этом неважно, писали ли вы данные (текст, число, формулу) непосредственно в строке формул или в самой ячейке. По правде сказать, применяется редко, поскольку нужно переносить руку с клавиатуры на мышку и целиться в довольно мелкую кнопку. Кнопка показана на самом первом рисунке.

Отмена ввода данных

Здесь можно выделить два принципиально разных случая. Много раз, проводя курсы Excel в Рыбинске, я замечал проблемы с обоими. Будьте внимательны!

Ввод данных в ячейку ещё не подтверждён

Если в ячейке по-прежнему мигает текстовый курсор, то ввод данных ещё не подтверждён. В этом случае работает универсальная отмена в виде нажатия клавиши Esc на клавиатуре (левая верхняя кнопка!). При нажатии Esc то, что вы ввели в ячейку, стирается, и возвращается предыдущее подтверждённое содержимое ячейки (в том числе «пусто», если там раньше ничего не было).

Помимо нажатия Esc можно воспользоваться крестиком слева от строки формул (см. первый рисунок).

Щелчок мышкой на другую ячейку

Если же вы уже успели подтвердить написанное в ячейке и текстовый курсор пропал, то нажатие Esc не поможет! В этом случае следует воспользоваться обычной отменой действия. Про отмену в Excel и вообще в программах Microsoft Office я уже писал здесь.

Подведём итоги

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

На моих онлайн курсах Excel Вы можете научиться эффективно использовать Excel, изучив все основные функции данной программы, необходимые для создания таблиц, графиков и прочего. Возможностей в Excel много, но далеко не все о них знают!

В Excel добавление текста или чисел в ячейки — очень распространенная задача. Например, добавление пробела между именами, добавление префикса или суффикса к ячейкам, добавление тире к номерам социальных сетей. Здесь, в этом руководстве, перечислены почти все сценарии добавления в Excel и предоставлены соответствующие методы для вас.

Навигация по этому руководству

1. Добавить в начало каждой ячейки 1.1 Добавить в начало ячеек с помощью формулы 1.2 Добавить в начало ячеек с помощью Flash Fill 1.3 Добавить в начало ячеек с помощью кода VBA

2. Добавить в конец каждой ячейки 2.1 Добавить в конец ячеек с помощью формулы 2.2 Добавить в конец ячеек с помощью Flash Fill 2.3 Добавить в конец ячеек с помощью кода VBA

3. Добавить в середину строки 3.1 Добавить после n-го символа строки по формуле 3.2 Добавить после n-го символа строки с помощью Flash Fill 3.3 Добавить после n-го символа строки с помощью кода VBA

4. Добавьте текст с помощью Kutools for Excel (добавьте символы в определенную позицию по мере необходимости) 4.1 Добавить текст перед первым символом или после последнего символа 4.2 Добавить текст в указанные позиции 4.3 Расширение утилиты «Добавить текст»

5. Добавьте текст до или после первого определенного текста 5.1 Добавить текст перед первым конкретным текстом 5.2 Добавить текст после первого определенного текста

6. Добавляйте символы до или после каждого слова. 6.1 Добавить символ(ы) до или после каждого слова по формуле 6.2 Добавляйте символы до или после каждого слова с помощью функции «Найти и заменить». 6.3 Добавить символ(ы) до или после каждого слова по коду VBA

7. Добавьте текст между символами 7.1 Добавьте текст между каждым символом/цифрой с помощью определяемой пользователем функции 7.2 Добавьте пробел между каждым числом с помощью формулы

8. Добавляйте символы между каждым словом

9. Добавьте символ между текстом и цифрой 9.1 Добавить символ между текстом и цифрой с помощью формулы 9.2 Добавляйте символы между текстом и цифрами с помощью Flash Fill

10. Добавьте тире к номерам телефонов/социальным номерам 10.1 Добавление тире к числам по формуле 10.2 Добавление тире к числам с помощью форматирования ячеек 10.3 Добавьте тире к номеру телефона с помощью команды Добавить текст Kutools for Excel

11. Добавьте ведущие нули в ячейки, чтобы зафиксировать длину 11.1 Добавление ведущих нулей в ячейки с помощью функции «Формат ячеек» 11.2 Добавление ведущих нулей к ячейкам с формулой

12. Добавляйте конечные нули к числам, чтобы зафиксировать длину

13. Добавьте пробел в конце текста

14. Добавьте кавычки/скобки вокруг текста или чисел 14.1 Добавление кавычек/скобок по формату ячеек 14.2 Добавьте кавычки/скобки вокруг формул 14.3 Добавление кавычек/скобок с помощью VBA

15. Добавить текст непосредственно в результат формулы

Внимание

В этом уроке я создаю несколько примеров для объяснения методов, вы можете изменить ссылки по своему усмотрению, когда используете приведенный ниже код или формулы VBA, или вы можете напрямую загрузить образцы для опробования методов.

Нажмите, чтобы загрузить образец файла

---

В этой части перечислены различные методы добавления символов в начало каждой ячейки, как показано ниже:

1.1 Добавить в начало ячеек с помощью формулы

---

Здесь вы можете выбрать одну из трех следующих формул:

Формула 1 Оператор конкатенации «&»

Соедините несколько текстов вместе с помощью символа амперсанда «&».

«текст»&ячейка

Формула2 СЦЕПИТЬ функцию

Функция СЦЕПИТЬ используется для объединения текстов.

СЦЕПИТЬ(«текст»,ячейка)

Формула3 Функция CONCAT

Это новая функция, которая появляется только в Excel 2019, Office 365 и Excel в Интернете.

СЦЕП («текст», ячейка)

В общих формулах: ячейка — это ссылка на ячейку с текстом, к которому вы хотите добавить префикс, а текст — это текст, который использовался для добавления в ячейку.

Используя приведенный выше пример, вы можете использовать формулы в строке формул следующим образом:

«&»

=$E$3&B3 or =»Айфон»&B3

СЦЕПИТЬ функция

=СЦЕПИТЬ($E$3,B3) or = СЦЕПИТЬ («Айфон», B3)

Функция CONCAT

=СЦЕП($E$3;B3) or = СЦЕП («Айфон», B3)

Нажмите Enter чтобы получить результат, затем перетащите маркер автозаполнения вниз, чтобы добавить текст в каждую ячейку диапазона B3:B6.

 Внимание: текст должен быть заключен в двойные кавычки, иначе формула возвращает значение ошибки #ИМЯ?. Если вы используете ссылку на ячейку для текста, не забудьте использовать абсолютную ссылку, вы можете нажать клавишу F4, чтобы изменить относительную ссылку на абсолютную ссылку.

1.2 Добавить в начало ячеек с помощью Flash Fill

---

Если вы используете Excel 2013 или более поздние версии, новая мощная функция, Вспышка заливки, может заполнить ячейки на основе указанных выше ячеек, которые вы ввели автоматически.

Выберите ячейку рядом с первыми исходными данными, вручную введите первые данные с текстом префикса, как показано ниже:

Затем в ячейке ниже продолжайте вводить вторые данные с текстом префикса, во время ввода будет отображаться список серого цвета, нажмите Enter чтобы разрешить Flash Fill автоматически заполнять данные.

Если список предварительного просмотра не создается, перейдите на вкладку Главная и нажмите Заполнять > Вспышка заливки чтобы запустить его вручную.

1.3 Добавить в начало ячеек с помощью кода VBA

---

Если вы знакомы с кодом VBA, здесь представлен код VBA для добавления текста в начало каждой ячейки в диапазоне.

1. Выберите диапазон ячеек, в который вы хотите добавить текст префикса, затем нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Затем во всплывающем окне нажмите Вставить > Модули чтобы вставить пустой новый модуль.

3. Скопируйте и вставьте ниже код VBA в новый модуль.

VBA: добавить в начало ячеек

Sub AppendToExistingOnLeft()
Dim c As Range
For Each c In Selection
If c.Value <> "" Then c.Value = "Iphone" & c.Value
Next
End Sub

 Внимание: в скрипте кода, Iphone это текст, который вы хотите добавить в начало выбранных ячеек, измените его по своему усмотрению.

4. Нажмите F5 ключ или щелкните Run кнопка  в окне для активации кода VBA.

Теперь во все выделенные ячейки был добавлен текст «Iphone» в начале.

---

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

2.1 Добавить в конец ячеек с помощью формулы

---

Здесь вы можете выбрать одну из трех следующих формул:

Формула 1 Оператор конкатенации «&»

Соедините несколько текстов вместе с помощью символа амперсанда «&».

Ячейка&»текст»

Формула2 СЦЕПИТЬ функцию

Функция СЦЕПИТЬ используется для объединения текстов.

СЦЕПИТЬ(ячейка,»текст»)

Формула3 Функция CONCAT

Это новая функция, которая появляется только в Excel 2019, Office 365 и Excel онлайн.

СЦЕП(ячейка,»текст»)

В общих формулах: ячейка — это ссылка на ячейку с текстом, к которому вы хотите добавить суффикс, а текст — это текст, который использовался для добавления в ячейку.

Используя приведенный выше пример, вы можете использовать формулы в строке формул следующим образом:

«&»

=B3&$E$3 or =B3&»кг»

СЦЕПИТЬ функция

= СЦЕПИТЬ (B3, $E$3) or =СЦЕПИТЬ(B3, «кг»)

Функция CONCAT

=СЦЕП(B3, $E$3) or =СЦЕП(B3, «кг»)

Нажмите Enter чтобы получить результат, затем перетащите маркер автозаполнения вниз, чтобы добавить текст в конец каждой ячейки диапазона B3:B6.

 Внимание: текст должен быть заключен в двойные кавычки, иначе формула возвращает значение ошибки #ИМЯ?. Если вы используете ссылку на ячейку для текста, не забудьте использовать абсолютную ссылку, вы можете нажать клавишу F4, чтобы изменить относительную ссылку на абсолютную ссылку.

2.2 Добавить в конец ячеек с помощью Flash Fill

---

Если вы используете Excel 2013 или более поздние версии, новая мощная функция, Вспышка заливки, может заполнить ячейки на основе указанных выше ячеек, которые вы ввели автоматически.

Выберите ячейку рядом с первыми исходными данными, вручную введите первые данные с текстом суффикса, как показано ниже:

Затем активируйте ячейку под первым результатом, нажмите Данные > Вспышка заливки, все ячейки ниже, включая активную ячейку, будут заполнены автоматически.

2.3 Добавить в конец ячеек с помощью кода VBA

---

Вот код VBA, который может добавлять текст в конце каждой ячейки в диапазоне.

1. Выберите диапазон ячеек, в которые вы хотите добавить текст суффикса, затем нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Затем во всплывающем окне нажмите Вставить > Модули чтобы вставить пустой новый модуль.

3. Скопируйте и вставьте ниже код VBA в новый модуль.

VBA: добавить в конец ячеек

Sub AppendToExistingOnRight()
Dim c As Range
For Each c In Selection
If c.Value <> "" Then c.Value = c.Value & "Kg"
Next
End Sub

Внимание: в скрипте кода, Kg это текст, который вы хотите добавить в конец выделенных ячеек, измените его по своему усмотрению. 

4. Нажмите F5 ключ или щелкните Run кнопка  в окне для активации кода VBA.

Теперь в конце каждой ячейки добавлен текст «Кг».

---

Для большинства из вас легко добавить текст в начало или конец ячейки, но добавить текст в середину ячейки может быть довольно сложно. Возьмем пример, как показано ниже, добавив разделитель, например двоеточие: в конце второго символа каждой ячейки в диапазоне B3:B7.

3.1 Добавить после n-го символа строки по формуле

---

Вот четыре формулы, предназначенные для выполнения этой работы, выберите одну для использования:

Formula1 Объедините функции LEFT и RIGHT

ВЛЕВО(ячейка, n) & «текст» & ВПРАВО(ячейка, ДЛСТР(ячейка) -n)

Formula2 COMBINE CONCATENATE(CONCAT), RIGHT и LEN функции

СЦЕПИТЬ(ВЛЕВО(ячейка, n), «текст», ВПРАВО(ячейка, ДЛСТР(ячейка) -n))

Or

СЦЕП(ЛЕВАЯ(ячейка, n), «текст», ПРАВАЯ(ячейка, ДЛСТР(ячейка) -n))

Формула3 ЗАМЕНИТЬ функцию

ЗАМЕНИТЬ(ячейка, n+1, 0, «текст»)

В общих формулах: ячейка — это ссылка на ячейку с текстом, который вы хотите добавить в середину, а текст — это текст, который использовался для добавления в ячейку, n — это число, определяющее, после какого символа в текстовой строке вы хотите добавить текст.

Для решения задачи, упомянутой выше, используйте следующие формулы:

Объедините функции ВЛЕВО и ВПРАВО

=ВЛЕВО(B3, 2) & «:» & ВПРАВО(B3, ДЛСТР(B3) -2) or =ВЛЕВО(B3, 2) & $E$3 & ВПРАВО(B3, ДЛСТР(B3) -2)

ОБЪЕДИНИТЬ СЦЕПИТЬ (СЦЕПИТЬ), ПРАВО и ДЛСТР функции

= СЦЕПИТЬ (ЛЕВО (B3, 2), «:», ПРАВО (B3, ДЛСТР (B3) -2)) or =СЦЕП (ЛЕВОЕ(B3, 2), «:», ПРАВОЕ(B3, ДЛСТР(B3) -2))

ЗАМЕНИТЬ функцию

=ЗАМЕНИТЬ(B3, 2+1, 0, «:») or =ЗАМЕНИТЬ(B3, 2+1, 0, $E$3)

Нажмите Enter чтобы получить результат, затем перетащите маркер автозаполнения вниз, чтобы добавить текст после второго символа каждой ячейки диапазона B3:B7.

 Внимание: текст должен быть заключен в двойные кавычки, иначе формула возвращает значение ошибки #ИМЯ?. Если вы используете ссылку на ячейку для текста, не забудьте использовать абсолютную ссылку, вы можете нажать клавишу F4, чтобы изменить относительную ссылку на абсолютную ссылку.

3.2 Добавить после n-го символа строки с помощью Flash Fill

---

Если вы используете Excel 2013 или более поздние версии, Вспышка заливки, может заполнить ячейки на основе указанных выше ячеек, которые вы ввели автоматически.

Выберите ячейку рядом с первыми исходными данными, вручную введите первые данные с двоеточием после второго символа, как показано ниже:

Затем активируйте ячейку под первым результатом, нажмите Ctrl + E ключи для активации Вспышка заливки команда, все ячейки ниже, включая активную ячейку, были заполнены автоматически.

Внимание: Если вы находитесь в системе MAC, нажмите клавиши Command + E. 

3.3 Добавить после n-го символа строки с помощью кода VBA

---

Код VBA также может выполнять эту работу.

1. Нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Затем во всплывающем окне нажмите Вставить > Модули чтобы вставить пустой новый модуль.

3. Скопируйте и вставьте ниже код VBA в новый модуль.

VBA: добавить в середину ячеек

Sub AddToMidduleOfString()
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        Rng.Value = VBA.Left(Rng.Value, 2 & ":" & VBA.Mid(Rng.Value, 3, VBA.Len(Rng.Value) - 1)
    Next
End Sub

Внимание: в скрипте кода, 2 это число определяет позицию, после которой вы хотите добавить текст, : это текст, который вы хотите добавить, 3 это сумма 2 и длины текста, который вы добавляете. Возьмем другой пример, чтобы добавить «и» после первого символа строки «AB», сценарий должен быть Rng.Value = VBA.Left(Rng.Value, 1) и «и» & VBA.Mid(Rng.Value, 4, VBA.Len(Rng.Value) — 1) 

4. Нажмите F5 ключ или щелкните Run кнопка  в окне для активации кода VBA. Появится диалоговое окно для выбора ячеек для добавления текста.

5. Нажмите OK. Теперь после второго символа каждой ячейки в диапазоне B19:B23 добавлен текст «:».

---

Если вы устали от формул и VBA, вы можете попробовать мощный и удобный инструмент, Kutools for Excel, который может помочь вам с его Добавить текст функцию.

Эта функция «Добавить текст» может:

• Добавить текст перед первым символом
• Добавить текст после последнего символа
• Добавить текст в указанные позиции
• Расширение
  Добавить текст перед заглавными буквами
  Добавить текст перед строчными буквами
  Добавить текст перед прописными/строчными буквами
  Добавить текст перед числовыми символами

Нажмите, чтобы получить 30-дневную бесплатную пробную версию прямо сейчас.

Выберите ячейки, в которые вы хотите добавить текст, затем примените команду «Добавить текст», щелкнув Кутулс > Текст > Добавить текст.

4.1 Добавить текст перед первым символом или после последнего символа

---

В разделе Добавить текст введите текст, который вы хотите добавить в ячейки в Текст текстовое поле, затем проверьте Перед первым персонажем в Позиция .

Нажмите Применить or Ok чтобы завершить добавление.

Чтобы добавить текст после последнего символа, введите текст, который вы хотите добавить в ячейки в Текст текстовое поле, затем проверьте После последнего символа в Позиция .

Нажмите Применить or Ok чтобы завершить добавление.

4.2 Добавить текст в указанные позиции

---

Иногда вам может понадобиться добавить текст в середину ячейки или добавить текст в несколько позиций ячейки. Предположим, добавлен разделитель «-» после третьей и седьмой цифр социального номера, как показано ниже:

В разделе Добавить текст диалоговое окно, введите текст в Текст текстовое поле и отметьте Указывать вариант, затем введите позиции, используя запятую для разделения в текстовое поле, а затем нажмите Ok or Применить.

4.3 Расширение утилиты «Добавить текст»

---

Помимо добавления текста в нормальные позиции (начало, конец и указанная позиция), Добавить текст утилита также поддерживает добавление текста

• Перед заглавными буквами
• Перед строчными буквами
• Перед прописными/строчными буквами
• Перед числовыми символами

В разделе Добавить текст диалоговое окно, введите текст в Текст текстовое поле и отметьте Только добавить к вариант, затем щелкните раскрывающееся меню ниже, чтобы выбрать операцию по своему усмотрению.

Кроме функции «Добавить текст», Kutools for Excel имеет более 300 других полезных функций, которые могут помочь вам в различных работах Excel, скачайте бесплатно прямо сейчас.

---

В этой части представлены формулы для добавления текста до или после первого появившегося определенного текста в Excel.

5.1 Добавить текст перед первым конкретным текстом

---

Например, вы хотите добавить текст «(продажа)» перед первым текстом «цена» в ячейке, как показано ниже:

В Excel эту задачу могут решить функции ЗАМЕНИТЬ и ПОДСТАВИТЬ.

ЗАМЕНИТЬ функцию

ЗАМЕНИТЬ(ячейка,НАЙТИ(«найти_текст»,ячейка),0,»добавить_текст»)

ЗАМЕНА функция

ПОДСТАВИТЬ(ячейка,»найти_текст»,»заменить_текст»,1)

В этом случае, пожалуйста, используйте приведенные выше формулы следующим образом:

=ЗАМЕНИТЬ(B4,НАЙТИ(«цена»,B4),0,»(продажа)»)

Or

=ПОДСТАВИТЬ(B4,»цена»,»(продажная)цена»,1)

Аргументы формулы в этом случае

Ячейка: B4,

Find_text: цена,

Add_text: (продажа),

Replace_text:(распродажа)цена.

Нажмите Enter чтобы получить первый результат добавления, затем перетащите маркер автозаполнения по ячейкам, которым нужна эта формула.

5.2 Добавить текст после первого определенного текста

---

Например, вы хотите добавить символ валюты «$» после первого двоеточия «:» в ячейке, как показано ниже:

В Excel эту задачу могут решить функции ЗАМЕНИТЬ и ПОДСТАВИТЬ.

ЗАМЕНИТЬ функцию

ЗАМЕНИТЬ(ячейка,НАЙТИ(«найти_текст»,ячейка),найти_длину_текста,»заменить_текст»)

ЗАМЕНА функция

ПОДСТАВИТЬ(ячейка,»найти_текст»,»заменить_текст»)

В этом случае, пожалуйста, используйте приведенные выше формулы следующим образом:

=ЗАМЕНИТЬ(B12,НАЙТИ(«:»,B12),1,»:$»)

Or

=ПОДСТАВИТЬ(B12,»:»,»:$»)

Аргументы формулы в этом случае

Ячейка: B12,

Найти_текст: :,

Заменить_текст::$.

Find_text_length:1

Нажмите Enter чтобы получить первый результат добавления, затем перетащите маркер автозаполнения по ячейкам, которым нужна эта формула.

---

В этой части руководства представлены три различных метода (формула, поиск и замена, VBA), которые помогут вам добавлять символы до или после каждого слова ячейки.

6.1 Добавить символ(ы) до или после каждого слова по формуле

---

Для решения этой задачи можно использовать функцию ПОДСТАВИТЬ, общие формулы такие:

Добавлять перед каждым словом

«символ»&ПОДСТАВИТЬ(строка, » «,» символ»)

Добавлять после каждого слова

ПОДСТАВИТЬ(строка,» «,»символ»)&»символ»

Предположим, вы добавляете «+» перед каждым словом в списке B3:B6, используйте следующую формулу:

=»+»&ПОДСТАВИТЬ(B3, » «,» +»)

Нажмите Enter чтобы получить первый результат, затем перетащите маркер автозаполнения вниз, чтобы получить все результаты.

Если добавить ($) после каждого слова списка B11:B14, используйте следующую формулу:

=ПОДСТАВИТЬ(B11,» «,»($) «)&»($)»

Нажмите Enter чтобы получить первый результат, затем перетащите маркер автозаполнения вниз, чтобы получить все результаты.

6.2 Добавляйте символы до или после каждого слова с помощью функции «Найти и заменить».

---

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

Добавлять перед каждым словом, исключая первое

Добавлять после каждого слова, исключая последнее

1. Выберите ячейки, в которые вы хотите добавить символы до или после каждого слова, затем нажмите Ctrl + H ключи для включения Найти и заменить Диалог.

2. Введите пробел в Найти то, что текстовое поле, затем введите новые символы с пробелом в Заменить текстовое поле и, наконец, щелкните Заменить все кнопку.

Эксплуатация	Общие	Пример
Добавляйте символы перед каждым словом	Добавить новые символы после пробела	Добавлять (продажа) перед каждым словом

Эксплуатация	Общие	Пример
Добавляйте символы после каждого слова	Новые символы с пробелом	Добавить — после каждого слова

Здесь представлены два кода VBA для добавления символов до или после каждого слова. Запустите код, выполнив следующие шаги.

1. Нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Во всплывающем окне нажмите Вставить > Модули чтобы вставить новый пустой модуль.

3. Скопируйте и вставьте приведенный ниже код VBA в модуль.

Добавлять перед каждым словом

Sub InsertCharBeforeWord()
'UpdateByExtendOffice
Dim ws As Worksheet
Dim xRg As Range
Dim xSRg As Range
Dim xCell As Range
Dim xInStr As String
Dim xArr As Variant
Dim xValue As String
    On Error Resume Next
   
    Set xSRg = Application.Selection
    Set xRg = Application.InputBox("Select cells(continuous):", "Kutools for Excel", xSRg.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xInStr = Application.InputBox("Type characters you want to add:", "Kutools for Excel", "", , , , , 2)
    If StrPtr(xInStr) = 0 Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xArr = Split(xCell.Text, " ")
        xValue = ""
        For Each xStr In xArr
            If Trim(xStr) <> "" Then
                If xValue = "" Then
                    xValue = xInStr & Trim(xStr)
                Else
                    xValue = xValue & " " & xInStr & Trim(xStr)
                    End If
            End If
        Next
        xCell.Value = xValue
    Next
    Application.ScreenUpdating = True
End Sub

Добавлять после каждого слова

Sub InsertCharAfterWord()
'UpdateByExtendOffice
Dim ws As Worksheet
Dim xRg As Range
Dim xSRg As Range
Dim xCell As Range
Dim xInStr As String
Dim xArr As Variant
Dim xValue As String
    On Error Resume Next
 
    Set xSRg = Application.Selection
    Set xRg = Application.InputBox("Select cells(continuous):", "Kutools for Excel", xSRg.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
   
    xInStr = Application.InputBox("Type characters you want to add:", "Kutools for Excel", "", , , , , 2)
    If StrPtr(xInStr) = 0 Then Exit Sub
   
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xArr = Split(xCell.Text, " ")
        xValue = ""
        For Each xStr In xArr
            If Trim(xStr) <> "" Then
                If xValue = "" Then
                    xValue = Trim(xStr) & xInStr
                Else
                    xValue = xValue & " " & Trim(xStr) & xInStr
                End If
            End If
        Next
        xCell.Value = xValue
    Next
    Application.ScreenUpdating = True
End Sub

4. Нажмите F5 ключ для запуска кода (или вы можете нажать Run кнопка   ), появится диалоговое окно с просьбой выбрать непрерывные ячейки для работы, щелкните OK.

5. Во втором всплывающем диалоговом окне введите символы, которые вы хотите добавить, нажмите OK.

Затем символы будут добавлены в начале или в конце каждого слова.

---

Иногда вам может понадобиться добавить текст между каждым символом. Здесь, в этой части, перечислены два сценария: один — добавить текст между каждым символом, другой — добавить пробел между каждым числом.

7.1 Добавьте текст между каждым символом/цифрой с помощью определяемой пользователем функции

---

Чтобы добавить символы между каждым символом в строке, вам может помочь пользовательская функция.

В этом случае мы добавляем пробел между каждым символом.

1. Нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Во всплывающем окне нажмите Вставить > Модули чтобы вставить новый пустой модуль.

3. Скопируйте и вставьте приведенный ниже код VBA в модуль.

Добавить текст между символами

Function AddText(Str As String) As String
    Dim i As Long
    For i = 1 To Len(Str)
        AddText = AddText & Mid(Str, i, 1) & " "
    Next i
    AddSpace = Trim(AddSpace)
End Function

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

=Добавитьтекст(B3)

B3 — это ячейка, содержащая строку, в которую вы хотите добавить пробел между символами.

5. Нажмите Enter чтобы получить результат, перетащите дескриптор автозаполнения по ячейкам, чтобы получить другие результаты, которые вам нужны.

7.2 Добавьте пробел между каждым числом с помощью формулы

---

Если вы хотите добавить пробел между цифрами строки, которая является числовым значением, вы можете использовать функцию ТЕКСТ.

Внимание: числа диапазона, между которыми вы хотите добавить пробел, должны быть одинаковой длины, иначе некоторые результаты могут быть неверными. 

Предположим, что это список 8-значных чисел в диапазоне B10:B12, выберите ячейку, в которую будет помещен результат, введите ниже формулу:

=ТЕКСТ(B10;»# # # # # # # #»)

Нажмите Enter , затем перетащите маркер автозаполнения на другие ячейки.

Если длина чисел равна 5, формула будет изменена как =ТЕКСТ(B10;»# # # # #»).

---

Если вы хотите добавить символ (символы) между каждым словом, предположив добавить пробел между именем, отчеством и фамилией, как показано на снимке экрана ниже, вы можете использовать определяемую пользователем функцию.

1. Нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Во всплывающем окне нажмите Вставить > Модули чтобы вставить новый пустой модуль.

3. Скопируйте и вставьте приведенный ниже код VBA в модуль.

Добавляйте символы между словами

Function AddCharacters(pValue As String) As String
'UpdatebyExtendoffice20160908
Dim xOut As String
xOut = VBA.Left(pValue, 1)
For i = 2 To VBA.Len(pValue)
xAsc = VBA.Asc(VBA.Mid(pValue, i, 1))
If xAsc >= 65 And xAsc <= 90 Then
xOut = xOut & " " & VBA.Mid(pValue, i, 1)
Else
xOut = xOut & VBA.Mid(pValue, i, 1)
End If
Next
AddCharacters = xOut
End Function

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

=Добавитьсимволов(B3)

B3 — это ячейка, содержащая строку, в которую вы хотите добавить пробел между словами.

5. Нажмите Enter чтобы получить результат, перетащите дескриптор автозаполнения по ячейкам, чтобы получить другие результаты, которые вам нужны.

 Внимание: в коде VBA вы можете изменить «» на другие тексты, как вам нужно, предположим, изменить его на «-« добавить — между словами.

---

Чтобы добавить определенные символы между текстом и цифрами, как показано на снимке экрана ниже, здесь представлены два метода.

9.1 Добавить символ между текстом и цифрой с помощью формулы

---

Если текст находится перед числами, общая формула

TRIM(REPLACE(string,MIN(FIND({1,2,3,4,5,6,7,8,9,0},string&»1234567890″)),0,»-«))

Используя приведенный выше случай в качестве примера, используйте следующую формулу:

=TRIM(REPLACE(B4,MIN(FIND({1,2,3,4,5,6,7,8,9,0},B4&»1234567890″)),0,»-«))

Нажмите Enter чтобы получить первый результат, затем перетащите маркер автозаполнения на другие ячейки, чтобы заполнить эту формулу.

Если цифры стоят перед текстом, общая формула

ВЛЕВО(строка,СУММ(ДЛСТР(строка)-ДЛСТР(ПОДСТАВИТЬ(строка,{0,1,2,3,4,5,6,7,8,9},»»))))&».»&ПРАВО (строка,ДЛСТР(B13)-СУММ(ДЛСТР(строка)-ДЛСТР(ПОДСТАВИТЬ(строка, {0,1,2,3,4,5,6,7,8,9}, «»))))

Используя приведенный выше случай в качестве примера, используйте следующую формулу:

=LEFT(B13,SUM(LEN(B13)-LEN(SUBSTITUTE(B13,{0,1,2,3,4,5,6,7,8,9},»»))))&».»&RIGHT(B13,LEN(B13)- SUM(LEN(B13)-LEN(SUBSTITUTE(B13, {0,1,2,3,4,5,6,7,8,9}, «»))))

Нажмите Enter чтобы получить первый результат, затем перетащите маркер автозаполнения на другие ячейки, чтобы заполнить эту формулу.

9.2 Добавляйте символы между текстом и цифрами с помощью Flash Fill

---

Если вы используете Excel 2013 или более поздние версии, Вспышка заливки также может помочь вам добавить символы между текстом и цифрами.

Рядом с исходными данными введите новые данные, в которые были добавлены символы между текстом и цифрами. Затем нажмите клавишу Enter, чтобы перейти к следующей ячейке первого результата.

И нажмите Ctrl + E клавиши, чтобы включить мгновенное заполнение.

Расширение

В этом руководстве также перечислены некоторые сценарии добавления текста, которые мы можем встретить в нашей повседневной жизни или на работе.

---

Иногда вам нужно добавить разделители, такие как тире, к серии телефонных номеров или номеров социальных сетей, как показано на снимке экрана ниже. Ввод вручную будет предпринят, если необходимо добавить сотни цифр. В этой части представлены три хитрости, как быстро справиться с этой задачей.

10.1 Добавление тире к числам по формуле

---

Вот две формулы, с помощью которых можно быстро добавлять тире к числам. Чтобы добавить тире после третьего и шестого числа в ячейке B3, используйте следующую формулу:

ЗАМЕНИТЬ функцию

=ЗАМЕНИТЬ(ЗАМЕНИТЬ(B3,4,0,»-«),8,0,»-«)

ТЕКСТ функция

=ТЕКСТ(B3,»???-???-???»)

Нажмите Enter чтобы получить первый результат, затем перетащите маркер автозаполнения на другие ячейки.

10.2 Добавление тире к числам с помощью форматирования ячеек

---

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

1. Выберите числа, к которым вы хотите добавить дефисы, затем нажмите Ctrl + 1 ключи для включения Формат ячеек Диалог.

2. в Формат ячеек диалог под Число , выберите На заказ из Категория .

3. Затем в правом Тип раздел, тип ###-###-### в текстовое поле щелкните OK.

Теперь к выделенным числам добавлены прочерки.

10.3 Добавьте тире к номеру телефона с помощью команды Добавить текст Kutools for Excel

---

Если у вас есть Kutools for Excel установленный в Excel, Добавить текст функция также может оказать вам услугу.

1. Выберите ячейки, содержащие числа, необходимые для добавления прочерков, нажмите Кутулс > Текст > Добавить текст.

2. в Добавить текст введите тире или другой разделитель в Текст текстовое поле, выберите Указывать , затем введите позиции, после которых вы хотите добавить тире, и разделите их запятыми в текстовое поле ниже.

3. Нажмите Ok или Применить. Затем к выбранным числам были добавлены прочерки.

Бесплатно скачать Добавить текст для 30-дневной пробной версии.

---

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

11.1 Добавление ведущих нулей в ячейки с помощью функции «Формат ячеек»

---

Вы можете использовать Формат ячеек функция для установки пользовательского формата для фиксации длины ячейки путем добавления начальных нулей.

1. Выберите ячейки, в которые вы хотите добавить ведущие нули, затем нажмите Ctrl + 1 ключи для включения Формат ячеек Диалог.

2. в Формат ячеек диалог под Число , выберите На заказ из Категория .

3. Затем в правом Тип раздел, тип 0000 в текстовое поле (чтобы зафиксировать длину числа до 4 цифр, введите 0000, вы можете изменить ее на другую длину, например 5 цифр, введите 00000), щелкните OK.

Затем к числам были добавлены начальные нули и такой же длины.

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

11.2 Добавление ведущих нулей к ячейкам с формулой

---

Если вы не хотите изменять исходные данные, вы можете использовать формулу для добавления ведущих нулей к числам в других местах.

Вот три функции могут помочь вам.

Формула1 ТЕКСТ функция

ТЕКСТ(число,»00…»)

Формула2 ПРАВАЯ функция

ВПРАВО(«00…»&число,длина)

Базовая функция Formula3

ОСНОВАНИЕ(число,10,длина)

Количество нулей в формуле равно длине числа.

Здесь вы устанавливаете 4 цифры в качестве длины чисел, пожалуйста, используйте формулы, как показано ниже:

= ТЕКСТ (B10; «0000»)

=ВПРАВО(«0000″&B10,4)

= ОСНОВА (B10,10,4)

Нажмите Enter и перетащите маркер автозаполнения вниз.

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

---

Если вы хотите добавить конечные нули к числам для создания фиксированной длины, предположим, добавив конечные нули к числам в ячейке B3: B7, чтобы сделать их 5-значными, как показано на снимке экрана ниже, вы можете применить формулу для работы с заданием .

Функция ПОВТОР

число&REPT(«0»,длина-LEN(число))

В формуле аргумент «число» представляет собой число или ссылку на ячейку, к которой вы хотите добавить конечные нули, а аргумент «длина» — это фиксированную длину, которую вы хотите.

Пожалуйста, используйте следующую формулу:

=B3&ПОВТОР(«0»,5-ДЛСТР(B3))

Нажмите Enter и перетащите дескриптор автозаполнения вниз к ячейкам, которым нужна эта формула.

---

Если вы хотите экспортировать или копировать данные с рабочего листа в блокнот, тексты могут быть размещены неаккуратно, поскольку значения ячеек имеют разную длину, чтобы они выглядели аккуратно, как показано на снимке экрана ниже, вам необходимо добавить завершающий пробел.

Для решения этой задачи функция REPT может оказать вам услугу.

ВЛЕВО(текст и ПОВТОР(» «,max_length),max_length)

В формуле аргумент «текст» — это текст или ссылка на ячейку, к которой вы хотите добавить завершающий пробел, а аргумент «max_length» — это фиксированная длина, которую вы хотите сделать текстами, которая должна быть длиннее или равна максимальная длина используемых текстов.

Чтобы добавить завершающий пробел к текстам в ячейке B3:C6, используйте следующую формулу:

=ВЛЕВО(B3 & ПОВТОР(» «,10),10)

Нажмите Enter , затем перетащите дескриптор автозаполнения во все ячейки, необходимые для этой формулы.

В этом случае, поскольку самый длинный из используемых текстов состоит из 9 символов, мы используем здесь 10.

---

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

14.1 Добавление кавычек/скобок по формату ячеек

---

Если вы хотите добавить кавычки вокруг текста в исходных данных, вам может помочь функция «Формат ячеек» в Excel.

1. Выберите ячейки, в которые вы хотите добавить кавычки, нажмите Ctrl + 1 ключи для включения Формат ячеек Диалог.

2. в Формат ячеек диалога под Число , выберите На заказ из списка Категория, затем перейдите в правый раздел, чтобы ввести «»» @ «»» в Тип текстовое окно. Нажмите OK.

Текст в выбранных ячейках был заключен в кавычки.

Если вы хотите добавить скобки вокруг текста, в текстовом поле «Тип» диалогового окна «Формат ячеек» используйте (@).

14.2 Добавьте кавычки/скобки вокруг формул

---

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

Использование и разъем

«»»»&текст&»»»»

Or

символ(34)&текст&символ(34)

В этом случае текст в ячейке B11, пожалуйста, используйте следующие формулы:

=»»»»&B11&»»»»

Or

=знак(34)&B11&символ(34)

Нажмите Enter и перетащите маркер автозаполнения вниз, чтобы заполнить ячейки.

Если вы хотите добавить скобки вокруг текста, используя формулу как «(«&текст&»)».

14.3 Добавление кавычек/скобок с помощью VBA

---

Если вам нужен код VBA для решения этой задачи, вот VBA.

1. Нажмите другой + F11 ключи для включения Microsoft Visual Basic для приложений окно.

2. Затем во всплывающем окне нажмите Вставить > Модули чтобы вставить пустой новый модуль.

3. Скопируйте и вставьте ниже код VBA в новый модуль.

VBA: добавьте кавычки вокруг текстов

Sub addquotationmarksorbrackets()
'UpdatebyExtendOffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = """" & Rng.Value & """"
Next
End Sub

 Внимание: в скрипте кода, «»»» & Rng.Value & «»»» указывает на добавление «» вокруг текста, если вы хотите добавить скобки () вокруг текста, измените его на «(» & Rng.Value & «)».

4. Нажмите F5 ключ или щелкните Run кнопка  в окне для активации кода VBA. Появится диалоговое окно для выбора ячеек для добавления кавычек.

5. Нажмите OK. Теперь вокруг текста в выделенных ячейках добавлены кавычки.

---

Иногда, чтобы помочь другим пользователям лучше понять данные, вам может потребоваться добавить текст в результаты формулы, как показано ниже. Чтобы включить текст в формулу, вы можете использовать кавычки, окружающие текст, и добавить соединитель &, чтобы объединить текст и формулу вместе.

Случай 1 добавить текст перед формулой

«Сегодня «&ТЕКСТ(СЕГОДНЯ(),»дддд, мммм дд»)

Случай 2 добавить текст после формула

ТЕКСТ(СЕЙЧАС(),»ЧЧ:ММ:СС»)&» — текущее время.»

Случай 3 добавить тексты с двух сторон формулы

«Сегодня продано &data&» кг.»

---

Дополнительные учебники по Excel:

Объединение нескольких рабочих книг/листов в одну Это руководство, в котором перечислены почти все сценарии объединения, с которыми вы можете столкнуться, и предоставлены относительно профессиональные решения для вас. Разделить текст, число и ячейки даты (разделить на несколько столбцов) Этот учебник разделен на три части: разделенные текстовые ячейки, разделенные числовые ячейки и разделенные ячейки даты. В каждой части представлены разные примеры, которые помогут вам понять, как справиться с задачей разделения при возникновении одной и той же проблемы.