Прескочи на основното съдържание

Как да замените запетаи с нови редове (Alt + Enter) в клетки в Excel?

Автор: Силувия Последна промяна: 2020-05-29

Както е показана лявата екранна снимка, как да замените запетаи с нови редове в клетките в Excel? Методите в тази статия могат да ви помогнат.

Заменете запетаите с нови редове с функцията за намиране и замяна
Заменете запетаите с нови редове с VBA код


Заменете запетаите с нови редове с функцията за намиране и замяна.

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

1. Изберете клетките, в които ще замените всички запетаи с нови редове. След това щракнете Начало > Търсене и избор > Сменете. Вижте екранна снимка:

Забележка: Можете също да натиснете Ctrl + H ключове заедно, за да отворите Търсене и заместване диалогов прозорец.

2. В откриването Търсене и заместване диалогов прозорец и под Сменете раздел, трябва да:

2.1 Въведете запетая в Намерете това, кутия;
2.2 Щракнете върху Сменете с кутия, след което натиснете Ctrl + Превключване + J ключове едновременно;
2.3 Кликнете върху Замести всички бутон. Вижте екранна снимка:

3. След това a Microsoft Excel изскача поле за подкана, моля, щракнете върху OK бутон.

4. Затворете Търсене и заместване диалогов прозорец.

Сега всички запетаи се заменят с нови редове в избраните клетки.


Заменете запетаите с нови редове с VBA код

Този раздел ще въведе VBA код за замяна на всички запетаи в избраните клетки с нови редове. Моля, направете следното стъпка по стъпка.

1. Изберете клетките, съдържащи запетаите, които трябва да замените с нови редове, след което натиснете Друг + F11 клавиши едновременно, за да отворите Microsoft Visual Basic за приложения прозорец.

2. В Microsoft Visual Basic за приложения прозорец, кликнете Поставете > Модули. След това копирайте и поставете VBA код в прозореца на кода. Вижте екранна снимка:

VBA код: Заменете всички запетаи в избраните клетки с нови редове

Sub ReplaceComma()
Dim rngCell As Range
  For Each rngCell In Selection
    rngCell.Value = Replace(rngCell, ",", vbLf)
  Next
End Sub

3. Натисни F5 или щракнете върху бутона Изпълнение, за да изпълните кода. Тогава всички запетаи в избраните клетки се заменят незабавно с нови редове.


Лесно разделяйте многоредово съдържание на клетки в редове или колони в Excel:

Kutools за Excel's Разделени клетки помощната програма ви помага лесно да разделяте съдържанието на клетка чрез интервал, запетая, нов ред или други разделители в отделни редове или колони в Excel. Вижте екранна снимка: Изтеглете и опитайте сега! (30-дневна безплатна пътека)

документ екстракт текст1


Свързана статия:

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hai Team
i am not able to search the "," or "." in the below case in a cell.

000.460.50.48,001.460.15.48,001.460.16.48 - this is in General format, - Tried with "2. In the opening Find and Replace dialog box and under the Replace tab, you need to:" didn't work.

My requirement is to convert "000.460.50.48,001.460.15.48,001.460.16.48" to

000.460.50.48
001.460.15.48
001.460.16.48

in a cell. Any idea?
This comment was minimized by the moderator on the site
Awesome tip
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations