Как да пренаредите текст в клетка в Excel?

Да предположим, че имате електронна таблица с дълъг списък с имена, всички форматирани като „Фамилно име Първо име“, и сега трябва да пренаредите всички имена на „Име, Фамилия“. Как да го постигнем? Тази статия ще представи три метода, които да ви помогнат да разрешите проблема.

Пренареждане на текст в клетка с формула
Пренареждане на текст в клетка с VBA код
Бързо пренаредете текст в клетка с Kutools за Excel

Пренареждане на текст в клетка с формула

Формулата по-долу може да ви помогне да обърнете фамилното и собственото име в клетка в Excel. Моля, направете следното.

1. Изберете празна клетка, за да изведете пренаредения текст, въведете формулата по-долу в нея и след това натиснете Въведете ключ.

=ПОДРИЗВАНЕ(СРЕДА(b2,ТЪРСЕНЕ(" ",b2)+1,250))&" "&НАЛЯВО(b2,ТЪРСЕНЕ(" ",b2)-1)

Забележка: във формулата B2 е клетката, която съдържа името, което ще пренаредите. Моля, променете го според вашите нужди.

2. Продължете да избирате клетката с резултати, плъзнете манипулатора за попълване надолу, за да обърнете всички имена, както е показано на екранната снимка по-долу.

Пренареждане на текст в клетка с VBA код

Освен това можете да приложите по-долу кода на VBA, за да обърнете всички имена в списък наведнъж в Excel. Моля, направете следното.

1. Натисни Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

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

VBA код: Пренареждане на текст в клетка

Sub RearrangeText() 
'Updated by Extendoffice 20180503
Dim xRg As Range, yRg As Range 
Dim LastRow As Long, i As Long 
Dim strTxt As String, strFs As String 
Dim strLs As String, N As Integer 
On Error Resume Next 
Set xRg = Application.InputBox(Prompt:="Range Selection:", _ 
Title:="Kutools for excel", Type:=8) 
For Each yRg In xRg 
On Error Resume Next 
strTxt = yRg.Value 
Trim (strTxt) 
N = InStr(strTxt, " ") 
strLs = Left(strTxt, N - 1) 
strFs = Right(strTxt, Len(strTxt) - N) 
yRg.Value = strFs & " " & strLs 
Next 
End Sub

3. След това a Kutools за Excel се появи диалогов прозорец, моля, изберете списъка с имена, който искате да пренаредите, и след това щракнете върху OK бутон. Вижте екранна снимка:

Тогава всички „Фамилно име Първо име“ в избрания списък се обръщат незабавно.

Бързо пренаредете текст в клетка с Kutools за Excel

Този раздел ще представи Обратен ред на текста полезност на Kutools за Excel за да ви помогне да пренаредите текст в клетка.

1. Изберете списъка с имена, който ще обърнете на „Фамилия Име“, след което щракнете Kutools > Текст > Обратен ред на текста. Вижте екранна снимка:

2. В Обратен текст диалогов прозорец, изберете Космос и след това кликнете върху OK бутон. Вижте екранна снимка:

Тогава всички имена в избрания списък се пренареждат наведнъж.

Още по темата:

• Как да разменям или обръщам ден и месец от датата в Excel?
• Как да разменяте или превключвате текст в една клетка в Excel?

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

🤖	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% и намалява стотици кликвания на мишката за вас всеки ден!

Прочети повече ... Безплатно сваляне...