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

Excel премахва знаци, думи, числа от текстови низове

Автор: Xiaoyang Последна промяна: 2022-12-07

Да предположим, че имате дълъг списък от текстови низове, които съдържат знаци, числа или други специфични символи. В някои случаи може да се наложи да премахнете някои знаци въз основа на позиция, като например от дясно, ляво или средно от текстовите низове, или да изтриете някои нежелани знаци, числа от списъка с низове. Намирането на решенията едно по едно ще ви причини главоболие, този урок събира всички видове методи за премахване на знаци, думи или числа в Excel.

Съдържание:

1. Премахнете знаците отляво, отдясно или от средата на текстовите низове

2. Премахнете нежеланите / специални знаци от текстовите низове

3. Премахнете символи / текст преди или след конкретен знак

4. Премахване на думи от текстови низове


Премахнете знаците отляво, отдясно или от средата на текстовите низове

За повечето от нас може да е обичайна работа да премахваме някои знаци отляво, отдясно или от средата на текстовите низове в работните листове на Excel. Този раздел ще представи някои бързи и лесни трикове за решаване на тази задача.

1.1 Премахнете първите n знака от текстови низове

Ако трябва да премахнете първите n знака от списък с текстови низове, следните методи може да ви направят услуга.

 Чрез използване на формули

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

Функция REPLACE за премахване на първите N знака:

=REPLACE(string, 1, num_chars, "")
  • низ: Текстовият низ, от който искате да премахнете символи;
  • брой_символи: Броят знаци, които искате да премахнете.

Например, за да премахнете първите 2 знака от клетките, моля, използвайте формулата по-долу и след това плъзнете манипулатора за попълване, за да копирате формулата в други клетки, вижте екранната снимка:

=REPLACE(A4, 1, 2, "")

Функции RIGHT и LEN за премахване на първите N знака:

=RIGHT(string, LEN(string) - num_chars)
  • низ: Текстовият низ, от който искате да премахнете символи;
  • брой_символи: Броят знаци, които искате да премахнете.

За да премахнете първите 2 знака от клетките, моля, приложете следната формула:

=RIGHT(A4,LEN(A4)-2)


 Чрез използване на дефинирана от потребителя функция

За да премахнете първите n знака от клетките, можете също да създадете дефинирана от потребителя функция за решаване на тази задача. Моля, направете следните стъпки:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахнете първите n знака от текстови низове

Function removeFirstx(rng As String, cnt As Long)
'Updateby Extendoffice
removeFirstx = Right(rng, Len(rng) - cnt)
End Function

3. След това се върнете към работния лист и след това въведете тази формула: =премахнипървоx(A4,2) в празна клетка и след това плъзнете манипулатора за попълване надолу, за да получите нужните резултати, вижте екранната снимка:

Забележка: В тази формула: A4 е клетката, от която искате да премахнете символи; Броя 2 показва броя знаци, които искате да премахнете от началото на текстовия низ.


1.2 Премахване на последните n знака от текстови низове

За да премахнете определен брой знаци от дясната страна на текстовите низове, можете също да използвате формула или дефинирана от потребителя функция.

 С помощта на формула

За да премахнете последните n знака от текстовите низове, можете да използвате формула, базирана на функциите LEFT и LEN.

Функции LEFT и LEN за премахване на последните N знака:

=LEFT(string, LEN(string) - num_chars)
  • низ: Текстовият низ, от който искате да премахнете символи;
  • брой_символи: Броят знаци, които искате да премахнете.

За да изтриете 3 знака от края на текстовите низове, моля, използвайте тази формула и след това плъзнете манипулатора за попълване, за да копирате формулата в други клетки, вижте екранната снимка:

=LEFT(A4, LEN(A4) - 3)


 Чрез използване на дефинирана от потребителя функция

Тук дефинирана от потребителя функция също може да ви помогне да премахнете последните n знака от списък с клетки, моля, направете следното:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахнете последните n знака от текстови низове

Function removeLastx(rng As String, cnt As Long)
'Updateby Extendoffice
removeLastx = Left(rng, Len(rng) - cnt)
End Function

3. След това се върнете към работния лист и въведете тази формула: =removelastx(A4,3) в празна клетка и след това плъзнете манипулатора за попълване надолу, за да получите нужните резултати, вижте екранната снимка:

Забележка: В тази формула: A4 е клетката, от която искате да премахнете символи; Броя 3 показва броя знаци, които искате да премахнете от края на текстовия низ.


1.3 Премахнете първите, последните n знака или определени позиционни знаци, като използвате мощна функция

Може да е болезнено за вас да помните различни формули, да премахвате знаци отляво, отдясно или от конкретна позиция на текстовите низове, Kutools за Excel поддържа мощна функция – Премахване по позиция. С този малък инструмент можете да се справите с тези задачи с няколко щраквания, без да помните формули.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете клетките, от които искате да премахнете знаци, и след това щракнете Kutools > Текст > Премахване по позиция, вижте екранна снимка:

2. В Премахване по позиция диалогов прозорец, моля, извършете следните операции:

2.1 Премахнете първите n знака от клетките:

  • In численост текстово поле, въведете броя знаци, които искате да премахнете от низове. В този пример ще премахна първите 2 знака.
  • Изберете Отляво опция в Позиция в компанията раздел.
  • След това кликнете върху Ok or Добавете Обява бутон, за да получите резултата, както е показано на екранната снимка по-долу.

2.2 Премахнете последните n знака от клетките:

  • In численост текстово поле, въведете броя знаци, които искате да премахнете от низове. В този пример ще премахна последните 3 знака.
  • Изберете Отдясно опция в Позиция в компанията раздел.
  • След това кликнете върху Ok or Добавете Обява бутон, за да получите резултата, както е показано на екранната снимка по-долу.

2.3 Премахване на n знака от определена позиция на клетки:

Ако трябва да премахнете определен брой знаци от определена позиция на текстовите низове, например, премахването на 3 знака започва от третия знак на низовете.

  • In численост текстово поле, въведете броя знаци, които искате да премахнете от низове. В този пример ще премахна 3 знака от определена позиция.
  • Изберете Посочете и въведете номера, от който искате да премахнете започващите знаци, в текстовото поле на Позиция в компанията раздел. Тук ще премахна знаци от третия знак.
  • След това кликнете върху Ok or Добавете Обява бутон, за да получите резултата, както е показано на екранната снимка по-долу.

Изтеглете и безплатна пробна версия Kutools за Excel сега!


1.4 Премахнете както първите n, така и последните n знака от текстови низове с формула

Когато трябва да премахнете някои знаци от двете страни на текстови низове в Excel, можете да комбинирате функциите MID и LEN, за да създадете формула за справяне с тази задача.

=MID(string, left_chars + 1, LEN(string) - (left_chars + right_chars)
  • низ: Текстовият низ, от който искате да премахнете символи;
  • леви_символи: Броят знаци за премахване отляво;
  • десни_символи: Броят знаци за премахване отдясно.

Например, трябва да премахнете първите 7 знака и последните 5 знака от текстови низове едновременно, моля, въведете следната формула в празна клетка:

=MID(A4, 7+1, LEN(A4) - (7+5))

Забележка: В тази формула: A4 е клетката, от която искате да премахнете символи; Броя 7 е броят знаци, които искате да премахнете от лявата страна; Броя 5 е броят знаци, които искате да премахнете от дясната страна.

И след това плъзнете манипулатора за запълване надолу до мястото, където искате да приложите тази формула, и ще получите резултата, както е показано на екранната снимка по-долу:


Премахнете нежеланите / специални знаци от текстови низове

Когато импортирате данни от някъде другаде в Excel, много специални или нежелани знаци може да бъдат поставени във вашия работен лист. За да премахнете тези нежелани знаци като #@$%^&, интервали, числа, нецифрови числа, нови редове и т.н., този раздел ще предостави някои полезни методи, които да ви помогнат.

2.1 Премахнете някои специални символи от текстови низове

Ако има някои специални знаци като %^&*() в рамките на текстовите низове, за да премахнете този тип знаци, можете да приложите следните три трика.

 Премахнете няколко специални символа от текстови низове с функцията SUBSTITUTE

Обикновено в Excel можете да вложите няколко функции SUBSTITUTE, за да замените всеки конкретен знак с нищо, общият синтаксис е:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(string_cell, char1, ""), char2, ""), char3, "")
  • клетка_низ: Клетката съдържа текстовия низ, от който искате да премахнете специални знаци;
  • char1, char2, char3: Нежеланите символи, които искате да премахнете.

Сега, моля, копирайте или въведете формулата по-долу в празна клетка:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2, "#", ""), "&", ""), "*", ""), "%", "")

И след това плъзнете манипулатора за попълване надолу към клетките, където искате да приложите тази формула, и всички нежелани знаци, които сте посочили, ще бъдат премахнати наведнъж, вижте екранната снимка:

Съвети: Ако има още знаци, които искате да премахнете, просто трябва да вложите още функции SUBSTITUTE във формулата.


 Премахнете множество специални символи от текстови низове с дефинирана от потребителя функция

Горните вложени функции SUBSTITUTE работят добре, ако има малко специални знаци за премахване, но ако имате десетки знаци за премахване, формулата ще стане твърде дълга и трудна за управление. В този случай следната дефинирана от потребителя функция може да ви помогне да завършите тази задача бързо и лесно.

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахнете множество специални символи от текстови низове

Function RemoveUnwantedChars(Str As String, xchars As String)
'Updateby Extendoffice
    For Index = 1 To Len(xchars)
        Str = Replace(Str, Mid(xchars, Index, 1), "")
    Next
    RemoveUnwantedChars = Str
End Function

3. След това затворете прозореца с код и се върнете към работния лист, въведете тази формула =Премахване на нежелани знаци(A2, $D$2) в празна клетка, където да изведете резултата, и след това плъзнете манипулатора за попълване надолу, за да получите резултатите, както ви е необходимо, вижте екранната снимка:

Забележка: В горната формула: A2 е клетката, от която искате да премахнете символи; $D$2 съдържа специалните знаци, които искате да премахнете (можете да въведете други специални знаци, от които се нуждаете).


 Премахнете множество специални символи от текстови низове с невероятна функция

Ако сте инсталирали Kutools за Excel, Със своята Премахване на символи можете да премахнете всички видове знаци, като цифрови знаци, буквени знаци, непечатаеми знаци...от списък с клетки, колкото ви е необходимо.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете диапазона от клетки, от който искате да премахнете специални знаци, и след това щракнете Kutools > Текст > Премахване на символи, вижте екранна снимка:

2. В Премахване на символи диалогов прозорец:

  • Проверка Custom вариант по Премахване на символи раздел.
  • След това въведете специалните символи в текстовото поле, които искате да премахнете.
  • След това кликнете върху Ok or Добавете Обява бутон за премахване на посочените от вас знаци наведнъж. Вижте екранна снимка:

Изтеглете и безплатна пробна версия Kutools за Excel сега!


2.2 Премахнете всички числа от текстови низове

Ако имате списък с текстови низове, които се смесват с цифри, букви и специални знаци, и сега просто искате да премахнете всички числа и да запазите други знаци. Този раздел ще предостави някои удобни начини да ви помогнем.

 Премахнете числата от текстови низове с функцията SUBSTITUTE

В Excel вложената функция SUBSTITUTE може да помогне да се заменят всички числа с нищо, така че можете да използвате формулата по-долу, за да премахнете всички числа от клетките:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,1,""),2,""),3,""),4,""),5,""),6,""),7,""),8,""),9,""),0,"")

След това плъзнете манипулатора за попълване надолу към клетките, където искате да приложите тази формула, и всички числа ще бъдат изтрити от списъка с текстови низове, вижте екранната снимка:


 Премахнете числата от текстови низове с функцията TEXTJOIN

Ако имате Excel 2019, 2021 или 365, новата функция TEXTJOIN също може да помогне за премахване на числа от текстови низове.

Моля, копирайте следната формула в празна клетка и след това натиснете едновременно клавишите Ctrl + Shift + Enter, за да получите първия резултат:

=TEXTJOIN("", TRUE, IF(ISERR(MID(A2, ROW(INDIRECT( "1:"&LEN(A2) )), 1) *1), MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1), ""))

След това копирайте формулата в други клетки по-долу, където искате да приложите тази формула, вижте екранната снимка:

Забележка: Този TEXTJOIN е наличен само в Excel 2019, 2021 и Office 365.


 Премахнете числа от текстови низове с дефинирана от потребителя функция

Освен горните две формули, дефинирана от потребителя функция също може да ви направи услуга, моля, направете следните стъпки:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахване на числа от текстови низове

Function RemoveNumbers(Txt As String) As String
'Updateby Extendoffice
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
RemoveNumbers = .Replace(Txt, "")
End With
End Function

3. След това затворете и излезте от прозореца с код, върнете се в работния лист и въведете тази формула: =Премахване на числа(A2) в празна клетка, след което плъзнете манипулатора за запълване надолу до клетките, където искате да приложите тази формула, вижте екранната снимка:


 Премахнете числата от текстови низове с удобна опция

Ако сте уморени от сложните формули, нека ви покажа един лесен инструмент – Kutools за ExcelЕ Премахване на символи. С тази удобна функция можете да изпълните тази задача само с няколко кликвания.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете диапазона от клетки, където искате да премахнете числата, и след това щракнете Kutools > Текст > Премахване на символи.

2. В Премахване на символи диалогов прозорец, моля, извършете следните операции:

  • Проверка Numeric вариант по Премахване на символи раздел.
  • След това кликнете върху Ok or Добавете Обява бутон за незабавно премахване на числата. Вижте екранна снимка:

Изтеглете и безплатна пробна версия Kutools за Excel сега!


2.3 Премахване на нецифрови знаци от текстови низове

За премахване на всички нецифрови знаци и запазване само на числа от текстови низове, този раздел ще говори за някои начини за решаване на тази задача в Excel.

 Премахване на нецифрови знаци от текстови низове с формула в Excel 2016 и по-стари версии

Ако използвате Excel 2016 или по-ранни версии, трябва да приложите сложна формула, за да постигнете тази задача, моля, копирайте или въведете формулата по-долу в празна клетка:

=SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1)) * ROW(INDIRECT("1:"&LEN(A2))), 0), ROW(INDIRECT("1:"&LEN(A2))))+1, 1) * 10^ROW(INDIRECT("1:"&LEN(A2)))/10)

След това копирайте формулата в други клетки по-долу, където искате да приложите тази формула, вижте екранната снимка:

Забележка: Ако числата в текстов низ започват с 0, 0 ще бъде загубена.


 Премахване на нецифрови знаци от текстови низове с функцията TEXTJOIN в Excel 2019, 2021, 365

Горната формула може да е твърде трудна за разбиране за повечето от нас. Ако имате Excel 2019, 2021 или 365, има добра формула, която може да ви помогне.

Моля, копирайте или въведете следната формула в празна клетка и натиснете Ctrl + Shift + Enter ключове заедно, за да получите първия правилен резултат:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,ROW(INDIRECT("1:100")),1)+0,""))

След това плъзнете манипулатора за попълване надолу към клетките, където ще приложите тази формула, и ще получите резултата, както е показано на екранната снимка по-долу:

Забележка: С тази формула можете да видите, че водещите нули ще бъдат запазени, тъй като числата се връщат като текст.


 Премахнете нецифрови знаци от текстови низове с дефинирана от потребителя функция

Разбира се, можете също да създадете своя собствена дефинирана от потребителя функция с по-прост синтаксис, моля, направете следното:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахване на нецифрови знаци от текстови низове

Function Removenonnumeric(str As String) As String
'Updateby Extendoffice
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[^0-9]"
        Removenonnumeric = .Replace(str, "")
    End With
End Function

3. След това затворете и излезте от прозореца с код, върнете се в работния лист и въведете тази формула: =Премахваненечислово(A2) в празна клетка, след това плъзнете манипулатора за запълване надолу към клетките, където искате да приложите тази формула, само числата ще бъдат извлечени, както е показано на екранната снимка по-долу:


 Премахнете нецифрови знаци от текстови низове с проста функция

За да изтриете директно нецифрови знаци в диапазон от клетки, Kutools за ExcelЕ Премахване на символи помощната програма може да го направи само с няколко кликвания.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете диапазона от клетки, от който искате да премахнете нецифрови знаци, и след това щракнете Kutools > Текст > Премахване на символи.

2. В Премахване на символи диалогов прозорец, моля, задайте следните операции:

  • Проверка Нечислови вариант по Премахване на символи раздел.
  • След това кликнете върху Ok or Добавете Обява бутон за незабавно премахване на всички нецифрови знаци. Вижте екранна снимка:

Изтеглете и безплатна пробна версия Kutools за Excel сега!


2.4 Разделете текста и числата от една клетка в две колони

Понякога може да искате да извлечете текста и числата от текстови низове в две отделни колони, с помощта на следните методи можете да завършите тази задача бързо и лесно.

 Разделете текст и числа от една клетка в две колони с дефинирана от потребителя функция

Като използвате следната дефинирана от потребителя функция, можете да извлечете текста и числата наведнъж, моля, направете следните стъпки:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Разделете текста и числата от текстовите низове в две колони

Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String
'Updateby Extendoffice
Dim xLen As Long
Dim xStr As String
xLen = VBA.Len(pWorkRng.Value)
For i = 1 To xLen
    xStr = VBA.Mid(pWorkRng.Value, i, 1)
    If ((VBA.IsNumeric(xStr) And pIsNumber) Or (Not (VBA.IsNumeric(xStr)) And Not (pIsNumber))) Then
        SplitText = SplitText + xStr
    End If
Next
End Function

3. След това затворете и излезте от прозореца с код, върнете се в работния лист и въведете тази формула: = Разделен текст (A2, FALSE) в празна клетка и след това плъзнете манипулатора за попълване надолу към клетките, които искате да попълните с тази формула, за да получите целия текст, вижте екранната снимка:

4. И след това продължете да въвеждате тази формула: =Разделен текст(A2,ВЯРНО) в друга клетка и плъзнете манипулатора за попълване надолу към клетките, които искате да попълните с тази формула, за да получите числата, вижте екранната снимка:


 Разделете текста и числата от една клетка в две колони с лесна функция

Ако имате Kutools за Excel, неговата Разделени клетки помощната програма може да ви помогне да разделите клетки на множество колони или редове въз основа на всякакви разделители, зададена ширина или текст и число.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете диапазона от клетки, които искате да разделите, и след това щракнете Kutools > Обединяване и разделяне > Разделени клетки, вижте екранна снимка:

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

3, След това кликнете върху Ok бутон и друг Разделени клетки ще се появи диалогов прозорец, изберете клетка за извеждане на разделения текст и числа и след това щракнете върху OK бутон. Сега можете да видите, че текстът и числата в избраните клетки са разделени на две колони едновременно, както е показано в демонстрацията по-долу:

Изтеглете и безплатна пробна версия Kutools за Excel сега!


2.5 Премахнете знаците за нов ред от текстови низове

Прекъсването на ред е нещо, което ви позволява да имате няколко реда в една и съща клетка в Excel. Понякога, когато копирате данни от уебсайта или отделяте съдържанието на клетката си с Alt + Enter клавиши ръчно, ще получите нов ред или връщане на каретка. В някои случаи може да искате да изтриете прекъсванията на редовете, за да направите съдържанието на клетката един ред, както е показано на екранната снимка по-долу. Тук ще представя някои начини за решаване на тази задача в Excel.

 Премахнете знаците за нов ред от текстови низове с функцията за намиране и замяна

В Excel можете да използвате Търсене и заместване функция за премахване на нови редове, моля, направете следното:

1. Изберете диапазона от данни, от който искате да премахнете прекъсванията на редовете.

2, След това кликнете върху Начало > Търсене и избор > Сменете (или натиснете Ctrl + H ключове), за да отидете на Търсене и заместване диалогов прозорец, вижте екранна снимка:

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

  • Поставете курсора в Намерете това, поле и натиснете Ctrl + J на клавиатурата, може да не видите нищо, но символът за прекъсване на реда е вмъкнат.
  • в Заменете със поле, оставете това поле празно, за да изтриете просто прекъсванията на редовете или натиснете Пространство баr веднъж, за да замените прекъсванията на редовете с празни места.

4, След това кликнете върху Замести всички всички нови редове в избраните клетки ще бъдат изтрити или заменени с празни наведнъж. Вижте екранна снимка:


 Премахнете знаците за нов ред от текстови низове с функцията SUBSTITUTE

Можете също да създадете формула, базирана на функциите SUBSTITUTE и CHAR, за да премахнете нов ред от текстовите низове.

Моля, приложете формулата по-долу, за да получите резултата:

=SUBSTITUTE(A2,CHAR(10),"")

Съвети: Функцията SUBSTITUTE намира и замества символа CHAR(10), който представлява символа за нов ред с нищо. Ако искате резултатът да бъде разделен със запетая и интервал, можете да използвате формулата по-долу:

=SUBSTITUTE(A2,CHAR(10),", ")


 Премахнете знаците за нов ред от текстови низове с VBA код

Ако ви е удобно да използвате VBA код, тук също така предоставя код за вас, моля, изпълнете следните стъпки:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахнете прекъсванията на редовете от текстовите низове

Sub RemoveCarriage()
'Updateby Extendoffice
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 = Replace(Rng.Value, Chr(10), "")
Next
End Sub

3. След това натиснете F5 за да стартирате този код и ще се появи поле за подкана, изберете диапазона, който искате да премахнете прекъсванията на редовете, вижте екранната снимка:

4. И след това щракнете OK всички нови редове ще бъдат изтрити от избрания диапазон от данни.


 Премахнете знаците за нов ред от текстови низове с интелигентна опция

Тук Kutools за ExcelЕ Премахване на символи функцията също така може да ви помогне да премахнете новия ред с лекота.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете диапазона от клетки, където искате да премахнете прекъсванията на редовете, и след това щракнете Kutools > Текст > Премахване на символи.

2. В Премахване на символи диалогов прозорец, моля, задайте следните операции:

  • Проверка Непечатаем вариант по Премахване на символи раздел.
  • След това кликнете върху Ok or Добавете Обява бутон за премахване на всички нови редове от избрания диапазон от данни. Вижте екранна снимка:

Изтеглете и безплатна пробна версия Kutools за Excel сега!


2.6 Премахване на интервали (начални, завършващи, допълнителни или всички интервали) от текстови низове

Справянето и поставянето на текст от външен източник в работен лист на Excel често носи някои досадни остатъци от бели интервали, ще бъде досадно да премахвате началните, крайните или други допълнителни интервали ръчно. За щастие Excel предоставя някои лесни трикове за справяне с тази задача.

 Премахнете излишните интервали (начални, завършващи, излишни) от текстови низове с функция TRIM

В Excel, за да изтриете водещите, крайните и допълнителните интервали от текстови низове, простата функция TRIM може да ви помогне. Тази функция изтрива всички интервали с изключение на единичните интервали между думите.

Моля, въведете формулата по-долу в празна клетка:

=TRIM(A2)

И след това плъзнете манипулатора за попълване надолу, за да копирате формулата за други клетки, сега можете да видите, че всички водещи, завършващи интервали и допълнителни интервали сред думите са премахнати наведнъж от екранната снимка:


 Премахнете всички интервали от текстови низове

Ако искате да премахнете всички бели интервали от текстови низове, следната функция SUBSTITUTE и функцията Find & Replace могат да ви направят услуга.

С помощта на функцията SUBSTITUTE

Можете да използвате функцията SUBSTITUTE, за да замените всички интервали с нищо, моля, приложете формулата по-долу в празна клетка:

=SUBSTITUTE(A2," ","")

След това плъзнете манипулатора за попълване надолу, за да копирате тази формула в други клетки, от които се нуждаете, и всички интервали ще бъдат изтрити, както е показано на екранната снимка по-долу:


С помощта на функцията за намиране и замяна

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

1. Изберете диапазона от данни, от който искате да премахнете всички интервали.

2, След това кликнете върху Начало > Търсене и избор > Сменете (или натиснете Ctrl + H ключове), за да отидете на Търсене и заместване диалогов прозорец, в отворения Търсене и заместване диалогов прозорец, моля, направете следните операции:

  • Натискане Интервал в Намерете това, поле;
  • в Заменете със поле, оставете това поле празно.

3. И след това щракнете Замести всички всички бели интервали в избраните клетки ще бъдат изтрити наведнъж. Вижте екранна снимка:


 Премахнете всички видове интервали от текстови низове с мощна функция

Kutools за Excel има мощна функция - Премахване на интервали, с тази помощна програма можете не само да премахвате начални интервали, завършващи интервали, излишни интервали, но също и всички интервали от избрани диапазони в един диалогов прозорец, което ще подобри вашата работна производителност.

След инсталиране Kutools за Excel, моля, направете следното:

1. Изберете диапазона от данни, от който ще премахнете интервали, и след това щракнете Kutools > Текст > Премахване на интервали. Вижте екранна снимка:

2. В Премахване на интервали изберете един тип пространство, който искате да премахнете от Тип пространства:

  • Премахнете водещите интервали, моля, изберете Водещи пространства опция;
  • Премахнете крайните интервали, моля, изберете Завършващи интервали опция;
  • Премахнете водещите и крайните интервали наведнъж, моля, изберете Водещи и завършващи интервали опция;
  • Премахнете всички допълнителни интервали, моля, изберете Всички излишни пространства опция;
  • Премахнете всички интервали, моля, изберете Всички пространства опция.

3, След това кликнете върху Ok or Добавете Обява бутон, ще получите желания резултат.

Изтеглете и безплатна пробна версия Kutools за Excel сега!


Премахнете знаци / текст преди или след конкретен знак

В този раздел ще представя някои операции за премахване на текста или знаците преди или след първото, последното или n-тото появяване на конкретен знак.

3.1 Премахване на текст преди или след първия специфичен знак

Ако искате да премахнете текста преди или след първия конкретен знак, като интервал, запетая от списък с текстови низове, както е показано на екранната снимка по-долу, тук ще публикувам два метода за вас.

 Премахване на текст преди първия конкретен знак с формула

За да премахнете текст или знаци преди първия специфичен знак, можете да създадете формула, базирана на функциите RIGHT, LEN и FIND, общият синтаксис е:

=RIGHT(cell, LEN(cell)-FIND("char", cell))
  • клетка: Референтната клетка или текстов низ, от който искате да премахнете текст;
  • овъглявам: Конкретният разделител, въз основа на който искате да премахнете текст.

Например, за да премахнете всичко преди първата запетая от низовете в списъка, трябва да приложите следната формула в празна клетка и след това да я плъзнете надолу до клетките, от които се нуждаете, вижте екранната снимка:

=RIGHT(A2,LEN(A2)-FIND(",",A2))

Забележка: В горната формула: A2 е клетката, от която искате да премахнете текст; , е конкретният знак, въз основа на който искате да премахнете текст, можете да го промените на други знаци, както ви е необходимо.


 Премахване на текст след първия специфичен знак с формула

За да премахнете всичко след първия специфичен знак, можете да използвате функциите LEFT и FIND, за да получите резултата, общият синтаксис е:

=LEFT(cell,FIND("char",cell)-1)
  • клетка: Референтната клетка или текстов низ, от който искате да премахнете текст;
  • овъглявам: Конкретният разделител, въз основа на който искате да премахнете текст.

Сега, моля, въведете формулата по-долу в празна клетка и след това плъзнете манипулатора за попълване надолу към други клетки, където искате да приложите тази формула, и всички знаци след първата запетая ще бъдат премахнати наведнъж, вижте екранната снимка:

=LEFT(A2,FIND(",",A2)-1)


3.2 Премахване на текст преди или след N-тото появяване на знак

Понякога текстовите низове съдържат множество екземпляри на конкретен разделител, може да искате да премахнете всички знаци преди или след конкретен екземпляр, като втори, трети или четвърти, според нуждите. За да се справите с този тип премахване, можете да използвате следните трикове:

 Премахване на текст преди N-то срещане на знак с формула

За да премахнете текста преди N-тото появяване на конкретен знак, следната формула може да ви помогне, общият синтаксис е:

=RIGHT(cell,LEN(cell)-FIND("#",SUBSTITUTE(cell,"char","#",N)))
  • клетка: Референтната клетка или текстов низ, от който искате да премахнете текст;
  • овъглявам: Конкретният разделител, въз основа на който искате да премахнете текст;
  • N: Появата на знака, преди която да се премахне текст.

Например, за да премахнете всичко преди втората запетая от текстовите низове, трябва да приложите формулата по-долу:

=RIGHT(A2,LEN(A2)-FIND("#",SUBSTITUTE(A2,",","#",2)))

Забележка: В горната формула: A2 е клетката, от която искате да премахнете текст; , е конкретният знак, на базата на който искате да премахнете текст, можете да го промените на други знаци, както ви е необходимо; 2 показва n-тата запетая, пред която искате да премахнете текст.

И след това плъзнете манипулатора за попълване, за да копирате формулата в други клетки, вижте екранната снимка:


 Премахване на текст след N-то срещане на знак с формула

За да премахнете текста след N-тото появяване на определен разделител, функциите LEFT, SUBSTITUTE и FIND могат да ви направят услуга. Общият синтаксис е:

=LEFT(cell, FIND("#", SUBSTITUTE(cell, "char", "#", N)) -1)
  • клетка: Референтната клетка или текстов низ, от който искате да премахнете текст;
  • овъглявам: Конкретният разделител, въз основа на който искате да премахнете текст;
  • N: Поява на знака, след което да се премахне текст.

След като разберете основния синтаксис, моля, копирайте или въведете формулата по-долу в празна клетка:

=LEFT(A2, FIND("#", SUBSTITUTE(A2, ",", "#", 2)) -1)

Забележка: В горната формула: A2 е клетката, от която искате да премахнете текст; , е конкретният знак, на базата на който искате да премахнете текст, можете да го промените на други знаци, както ви е необходимо; 2 показва n-та запетая, след която искате да премахнете текст.

След това плъзнете манипулатора за попълване, за да копирате формулата в други клетки, и всички знаци след втората запетая ще бъдат изтрити наведнъж, вижте екранната снимка:


 Премахване на текст преди или след N-тото появяване на знак с дефинирана от потребителя функция

Както можете да видите, можете да решите случаите за премахване на текст преди или след N-то срещане на знак, като използвате собствените функции на Excel в различни комбинации. Проблемът е, че трябва да запомните тези трудни формули. В този случай ще създам дефинирана от потребителя функция, за да покрия всички сценарии, моля, направете следното:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахване на текст преди или след N-то срещане на знак

Function RemoveTextOccurrence(Str As String, Delimiter As String, Occurrence As Integer, IsAfter As Boolean)
Dim xStr As String
Dim xStrLen, xF, xIntStart As Integer
xStr = Str
xStrLen = Len(xStr)
xIntStart = 1
For xF = 1 To Occurrence
xIntStart = InStr(xIntStart + 1, xStr, Delimiter, vbTextCompare)
If (xIntStart = 0) Or (xIntStart < 0) Then
    If IsAfter Then
    RemoveTextOccurrence = xStr
    Else
    RemoveTextOccurrence = ""
    End If
    Exit Function
End If
Next
If IsAfter Then
    RemoveTextOccurrence = Mid(Str, 1, xIntStart - 1)
Else
    RemoveTextOccurrence = Mid(Str, xIntStart + 1)
End If
End Function

3. След това затворете и излезте от прозореца с код, върнете се в работния лист и използвайте следните формули:

Премахване на текст преди второто появяване на запетая:

=RemoveTextOccurrence(A2, ", ", 2, FALSE)

Премахване на текст след второто появяване на запетая

=RemoveTextOccurrence(A2, ", ", 2, TRUE)


3.3 Премахване на текст преди или след последното появяване на знак

Ако трябва да премахнете целия текст преди или след последния конкретен знак и да оставите само поднизовете след или преди последния конкретен знак, както е показано на екранната снимка по-долу, този раздел ще говори за някои формули за решаване на този проблем.

 Премахване на текст преди последното срещане на знак с формула

За да премахнете всички знаци преди последното срещане на знак, общият синтаксис е:

=RIGHT(cell,LEN(cell)-SEARCH("#",SUBSTITUTE(cell,"char","#",LEN(cell)-LEN(SUBSTITUTE(cell,"char","")))))
  • клетка: Референтната клетка или текстов низ, от който искате да премахнете текст;
  • овъглявам: Конкретният разделител, въз основа на който искате да премахнете текст;

Сега, ако трябва да премахнете текста преди последното появяване на запетая, моля, копирайте или въведете формулата по-долу в празна клетка:

=RIGHT(A2,LEN(A2)-SEARCH("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",","")))))

Забележка: В горната формула: A2 е клетката, от която искате да премахнете текст; , е конкретният знак, въз основа на който искате да премахнете текст, можете да го промените на други знаци, както ви е необходимо.

След това плъзнете манипулатора за попълване, за да копирате формулата в други клетки, и всички знаци преди последната запетая ще бъдат изтрити, както е показано на екранната снимка по-долу:


 Премахване на текст след последното срещане на знак с формули

Ако стойностите на клетките са разделени с променлив брой разделители, сега искате да изтриете всичко след последното копие на този разделител, общият синтаксис е:

=LEFT(cell,FIND("#",SUBSTITUTE(cell,"char","#",LEN(cell)-LEN(SUBSTITUTE(cell,"char",""))))-1)
  • клетка: Референтната клетка или текстов низ, от който искате да премахнете текст;
  • овъглявам: Конкретният разделител, въз основа на който искате да премахнете текст;

Моля, копирайте или въведете формулата по-долу в празна клетка и след това плъзнете манипулатора за попълване надолу, за да получите други резултати, от които се нуждаете, вижте екранната снимка:

=LEFT(A2,FIND("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",",""))))-1)

Забележка: В горната формула: A2 е клетката, от която искате да премахнете текст; , е конкретният знак, въз основа на който искате да премахнете текст, можете да го промените на други знаци, както ви е необходимо.


3.4 Премахнете текста между скобите

Ако имате списък с текстови низове с част от знаците, затворени в скобите, сега може да искате да премахнете всички знаци в скобите, включително самите скоби, както е показано на екранната снимка по-долу. Този раздел ще говори за някои трикове за решаване на тази задача в Excel.

 Премахнете текста между скобите с функцията за намиране и замяна

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

1. Изберете списъка с данни, който искате да премахнете текстовете между скобите.

2, След това кликнете върху Начало > Търсене и избор > Сменете (или натиснете Ctrl + H клавиши), за да отидете в диалоговия прозорец Намиране и замяна, в Търсене и заместване диалогов прозорец, направете следните операции:

  • в Намерете това, поле, тип (*) в текстовото поле;
  • в Заменете със поле, оставете това поле празно.

3, След това кликнете върху Замести всички всички знаци в скобите (включително скобите) в избраните клетки ще бъдат изтрити наведнъж. Вижте екранна снимка:

Съвети: Най- Търсене и заместване Функцията работи и за две или повече двойки скоби в текстовите низове.


 Премахнете текста между скоби с формула

Освен функцията за намиране и замяна, можете също да използвате формула за решаване на тази задача в Excel, общият синтаксис е:

=SUBSTITUTE(text,MID(LEFT(text,FIND(")",text)),FIND("(",text),LEN(text)),"")
  • текст: Текстовият низ или препратката към клетка, от която искате да премахнете знаци.

Сега, моля, копирайте или въведете следната формула в празна клетка, където искате да получите резултата:

=SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),"")

След това плъзнете манипулатора за попълване надолу към клетките, където искате да приложите тази формула, и всички текстове в скобите, включително скобите, ще бъдат премахнати наведнъж, вижте екранната снимка:

Съвети: Ако няма скоби в стойността на клетката, ще се покаже грешка след прилагане на горната формула, за да игнорирате грешката, моля, използвайте формулата по-долу:

=IFERROR(SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),""),A2)


 Премахнете текста между скоби с дефинирана от потребителя функция

Горната формула работи добре за премахване на текст от една двойка скоби, ако трябва да премахнете текстовете от няколко двойки скоби в текстовите низове, формулата няма да работи правилно. Тук ще създам проста дефинирана от потребителя функция за решаване на тази задача.

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахнете текста между скобите

Function remtxt(ByVal str As String) As String
'Updateby Extendoffice
  While InStr(str, "(") > 0 And InStr(str, ")") > InStr(str, "(")
    str = Left(str, InStr(str, "(") - 1) & Mid(str, InStr(str, ")") + 1)
  Wend
  remtxt = Trim(str)
End Function

3. След това се върнете към работния лист и въведете тази формула в празна клетка: =remtxt(A2), след което плъзнете манипулатора за попълване надолу към клетките, където искате да приложите тази формула, всички текстове във всички скоби, включително скобите, ще бъдат премахнати, както е показано на екранната снимка по-долу:


Премахване на думи от текстови низове

В някои случаи може да искате да премахнете някои думи от списък с клетки, като например първа или последна дума, дублирани думи от клетка. За разрешаване на тези видове премахване, този раздел ще ви представи някои методи.

4.1 Премахнете първата или последната дума от текстов низ

За да премахнете първата или последната дума от списък с текстови низове, следните формули може да ви направят услуга.

 Премахнете първата дума от текстов низ с формула

Премахнете първите думи от списък с текстови низове, можете да създадете проста формула, базирана на функциите RIGHT, LEN и FIND, общият синтаксис е:

=RIGHT(text,LEN(text)-FIND(" ",text))
  • текст: Текстовият низ или препратката към клетка, от която искате да премахнете първата дума.

Сега, моля, въведете или копирайте следната формула в празна клетка:

=RIGHT(A2,LEN(A2)-FIND(" ",A2))

И след това плъзнете манипулатора за попълване надолу, за да приложите формулата към други клетки, вижте екранната снимка:

Съвети: Ако трябва да премахнете първите N думи от клетките, моля, използвайте формулата по-долу:

=MID(TRIM(text),1+FIND("~",SUBSTITUTE(TRIM(text)," ","~",N)),255)
  • текст: Текстовият низ или препратката към клетка, от която искате да премахнете първите n думи;
  • N: Показва колко думи искате да премахнете от началото на текстовия низ.

Например, за да премахнете първите две думи от клетките, моля, копирайте или въведете формулата по-долу в празна клетка, за да получите желания резултат, вижте екранната снимка:

=MID(TRIM(A2),1+FIND("~",SUBSTITUTE(TRIM(A2)," ","~",2)),255)


  Премахнете последната дума от текстов низ с формула

За да премахнете последната дума от текстови низове, можете също да използвате формула за решаване на тази задача, общият синтаксис е:

=LEFT(TRIM(text),FIND("~",SUBSTITUTE(text," ","~",LEN(TRIM(text))-LEN(SUBSTITUTE(TRIM(text)," ",""))))-1)
  • текст: Текстовият низ или препратката към клетка, от която искате да премахнете последната дума;

Моля, използвайте формулата по-долу в празна клетка и след това плъзнете манипулатора за попълване надолу, за да приложите формулата към други клетки, вижте екранната снимка:

=LEFT(TRIM(A2),FIND("~",SUBSTITUTE(A2," ","~",LEN(TRIM(A2))-LEN(SUBSTITUTE(TRIM(A2)," ",""))))-1)

Съвети: За да премахнете последните N думи от списък с клетки, общият синтаксис е:

=LEFT(text,FIND("~",SUBSTITUTE(text," ","~",LEN(text)-LEN(SUBSTITUTE(text," ",""))-(N-1))))
  • текст: Текстовият низ или препратката към клетка, от която искате да премахнете последните n думи;
  • N: Показва броя на думите, които искате да премахнете от края на текстовия низ.

Да предположим, че за да изтриете последните 3 думи от списък с клетки, моля, използвайте формулата по-долу, за да върнете резултата, вижте екранната снимка:

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",LEN(A2)-LEN(SUBSTITUTE(A2," ",""))-(3-1))))


4.2 Премахване на дублирани знаци или думи в клетка

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

 Премахнете дублиращи се знаци в клетка с помощта на дефинирана от потребителя функция

Ако имате множество срещания на един и същи знак в клетка, за да премахнете дублиращите се знаци в клетка и да запазите само първите срещания, както е показано на екранната снимка по-долу, можете да използвате следната дефинирана от потребителя функция.

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахване на дублиращи се знаци в клетка

Function RemoveDupeschars(pWorkRng As Range) As String
'Updateby Extendoffice
Dim xValue As String
Dim xChar As String
Dim xOutValue As String
Set xDic = CreateObject("Scripting.Dictionary")
xValue = pWorkRng.Value
For i = 1 To VBA.Len(xValue)
    xChar = VBA.Mid(xValue, i, 1)
    If xDic.Exists(xChar) Then
    Else
        xDic(xChar) = ""
        xOutValue = xOutValue & xChar
    End If
Next
RemoveDupeschars = xOutValue
End Function

3. След това затворете прозореца с код, върнете се в работния лист и въведете тази формула =Премахване на Dupeschars(A2) в празна клетка освен вашите данни и след това плъзнете манипулатора за запълване към клетките, към които искате да приложите тази формула, вижте екранната снимка:

ЗабележкаA2 е клетката с данни, от която искате да премахнете дублирани знаци.

тип: Функцията е чувствителна към малки и големи букви, така че третира малките и главните букви като различни знаци.


 Премахнете дублиращите се думи в клетка с помощта на дефинирана от потребителя функция

Ако приемем, че имате същите думи или текстови низове в клетка и бихте искали да премахнете всички същите думи от клетката, както е показано на екранната снимка по-долу. Можете да използвате следната дефинирана от потребителя функция, за да решите тази задача в Excel.

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Премахване на дублирани думи в клетка

Function RemoveDupeswords(txt As String, Optional delim As String = " ") As String
'Updateby Extendoffice
    Dim x
    With CreateObject("Scripting.Dictionary")
        .CompareMode = vbTextCompare
        For Each x In Split(txt, delim)
            If Trim(x) <> "" And Not .exists(Trim(x)) Then .Add Trim(x), Nothing
        Next
        If .Count > 0 Then RemoveDupeswords = Join(.keys, delim)
    End With
End Function

3. След това затворете прозореца с код, върнете се към работния лист и въведете тази формула =Премахване на Dupeswords(A2,", ") в празна клетка освен вашите данни и след това плъзнете манипулатора за запълване към клетките, към които искате да приложите тази формула, вижте екранната снимка:

Забележка: A2 е клетката, от която искате да изтриете дублиращите се думи, и запетаята и интервала (, ) са разделителите за разделяне на текстовите низове, можете да ги промените на други разделители според вашите нужди.

тип: Тази функция не е чувствителна към малки и големи букви, малките и главните букви се третират като едни и същи знаци.


4.3 Подрязване на текстов низ до N думи

Ако имате дълъг текстов низ в клетка, понякога може да искате да отрежете текстовия низ до определен брой думи, което означава да запазите само първите n думи и да изрежете останалите думи. Този раздел ще говори за някои трикове, които да ви помогнат да постигнете тази задача в Excel.

 Изрежете текстов низ до N думи с формула

За да изрежете текстов низ до N думи, можете да създадете формула, базирана на функциите LEFT, FIND и SUBSTITUTE, общият синтаксис е:

=LEFT(text,FIND("~",SUBSTITUTE(text," ","~",N))-1)
  • текст: Текстовият низ или препратката към клетка, която искате да отрежете;
  • N: Броят думи, които искате да запазите от лявата страна на дадения текстов низ.

За да се справите с тази работа, моля, копирайте или въведете формулата по-долу в празна клетка:

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",B2))-1)

И след това плъзнете манипулатора за попълване надолу, за да приложите тази формула към други клетки, вижте екранната снимка:


 Изрежете текстов низ до N думи с дефинирана от потребителя функция

Освен горната формула, можете също да създадете дефинирана от потребителя функция за решаване на тази задача, моля, направете следното:

1. Задръжте натиснат Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA код: Изрежете текстов низ до N думи

Function GetNWords(StrWords As String, Num_of_Words As Integer) As String
'Updateby Extendoffice
Dim xArr
Dim xRes As String
Dim xF As Integer
xStr = StrWords
If (Num_of_Words < 1) Then
    GetNWords = ""
    Exit Function
End If
xArr = Split(xStr, " ")
xRes = ""
On Error Resume Next
For xF = 0 To UBound(xArr)
    If Trim(xArr(xF)) <> "" Then
    Num_of_Words = Num_of_Words - 1
        If xRes = "" Then
            xRes = Trim(xArr(xF))
        Else
            xRes = xRes & " " & Trim(xArr(xF))
        End If
    End If
    If Num_of_Words = 0 Then Exit For
Next
If Num_of_Words = 0 Then
    GetNWords = xRes & "..."
Else
    GetNWords = xRes & "..."
End If
End Function

3. След това затворете и излезте от прозореца с код, върнете се в работния лист и въведете тази формула: =GetNWords(A2,B2) в празна клетка и след това плъзнете манипулатора за попълване надолу, за да приложите тази формула към други клетки, само първият определен брой думи се запазват, както е показано на екранната снимка по-долу:


  • Супер Формула Бар (лесно редактиране на няколко реда текст и формула); Оформление за четене (лесно четене и редактиране на голям брой клетки); Поставяне във филтриран диапазон...
  • Обединяване на клетки/редове/колони и съхраняване на данни; Съдържание на разделени клетки; Комбинирайте дублиращи се редове и сума/средно... Предотвратяване на дублиращи се клетки; Сравнете диапазони...
  • Изберете Дублиран или Уникален редове; Изберете Празни редове (всички клетки са празни); Super Find и Fuzzy Find в много работни тетрадки; Произволен избор...
  • Точно копие Множество клетки без промяна на референтната формула; Автоматично създаване на препратки към множество листа; Вмъкване на куршуми, квадратчета за отметка и други...
  • Любими и бързо вмъкнати формули, диапазони, диаграми и снимки; Шифроване на клетки с парола; Създаване на пощенски списък и изпращайте имейли...
  • Извличане на текст, Добавяне на текст, Премахване по позиция, Премахване на пространството; Създаване и отпечатване на междинни суми за пейджинг; Конвертиране на съдържание и коментари между клетки...
  • Супер филтър (запазване и прилагане на филтърни схеми към други листове); Разширено сортиране по месец/седмица/ден, честота и други; Специален филтър с удебелен шрифт, курсив...
  • Комбинирайте работни тетрадки и работни листове; Обединяване на таблици въз основа на ключови колони; Разделете данните на няколко листа; Пакетно конвертиране на xls, xlsx и PDF...
  • Групиране на обобщена таблица по номер на седмицата, ден от седмицата и други... Показване на отключени, заключени клетки с различни цветове; Маркирайте клетки, които имат формула/име...
kte tab 201905
  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
officetab отдолу
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations