Как подсчитать количество слов в ячейке или диапазоне ячеек в Excel?
Вы можете легко подсчитать количество слов в MS Word, но в Excel нет встроенного инструмента для подсчета количества слов на листе. Однако вы можете подсчитать количество слов в Excel следующими способами:
Подсчитайте количество слов по формуле
Подсчитайте количество слов в одной ячейке с помощью функций, определяемых пользователем
Подсчитать количество слов в указанном диапазоне с кодом VBA
Легко подсчитать количество слов с Kutools for Excel (несколько кликов)
Подсчитайте количество слов по формуле
Вот две формулы для подсчета слов в одной ячейке и в ячейках диапазона.
Подсчитайте слова в одной ячейке
Пожалуйста, введите эту формулу =IF(LEN(TRIM(A2))=0,0,LEN(TRIM(A2))-LEN(SUBSTITUTE(A2," ",""))+1) в Панель формул, а затем нажмите Enter .
Внимание: В формуле A2 - это ячейка, в которой вы будете подсчитывать количество слов.
Вы можете увидеть результат, как показано на скриншоте ниже:
Подсчет слов в диапазоне ячеек с помощью формулы массива
Если вы хотите подсчитать количество слов в диапазоне ячеек, введите формулу =SUM(IF(LEN(TRIM(A2:A3))=0,0,LEN(TRIM(A2:A3))-LEN(SUBSTITUTE(A2:A3," ",""))+1)) в строку формул, а затем нажмите Shift + Ctrl + Enter клавиши одновременно, чтобы получить результат. Смотрите скриншот:
Внимание: A2: A3 - это диапазон слов, которые вы будете считать.
Легко подсчитайте общее количество слов в ячейке или диапазоне ячеек в Excel:
Это Подсчитать общее количество слов полезности Kutools for Excel может помочь вам быстро подсчитать общее количество слов в ячейке или диапазоне ячеек в Excel, как показано в демонстрации ниже.
Скачайте и попробуйте прямо сейчас! (30-дневная бесплатная трасса)
Подсчитайте количество слов с помощью функций, определяемых пользователем
Кроме того, вы можете подсчитать количество слов в ячейке с помощью функций, определяемых пользователем, сделайте следующее:
1. Нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. В winodw нажмите Вставить > Модули, затем скопируйте и вставьте ниже код VBA в модуль. Смотрите скриншот:
Код VBA: подсчитать количество слов в ячейке.
Function intWordCount(rng As Range) As Integer
'Update by Extendoffice 2018/3/7
intWordCount = UBound(Split(Application.WorksheetFunction.Trim(rng.Value), " "), 1) + 1
End Function
2. нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений Winodw. Выберите пустую ячейку на листе, введите формулу «=intwordcount(A2)»В панель формул, а затем нажмите Enter ключ для получения результата. Смотрите скриншот:
Внимание: В формуле A2 - это ячейка, в которой вы будете подсчитывать количество слов.
Если вы хотите подсчитать количество слов в определенном диапазоне, примените следующий метод.
Подсчитать количество слов в указанном диапазоне с кодом VBA
Следующий код VBA может помочь вам быстро подсчитать количество слов в указанном диапазоне.
1. Нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. В winodw нажмите Вставить > Модули, затем скопируйте и вставьте ниже код VBA в модуль. Смотрите скриншот:
Код VBA: подсчитать количество слов в выбранном диапазоне.
Sub CountWords()
Dim xRg As Range
Dim xRgEach As Range
Dim xAddress As String
Dim xRgVal As String
Dim xRgNum As Long
Dim xNum As Long
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range:", "Kutools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
If Application.WorksheetFunction.CountBlank(xRg) = xRg.Count Then
MsgBox "Words In Selection Is: 0", vbInformation, "Kutools For Excel"
Exit Sub
End If
For Each xRgEach In xRg
xRgVal = xRgEach.Value
xRgVal = Application.WorksheetFunction.Trim(xRgVal)
If xRgEach.Value <> "" Then
xNum = Len(xRgVal) - Len(Replace(xRgVal, " ", "")) + 1
xRgNum = xRgNum + xNum
End If
Next xRgEach
MsgBox "Words In Selection Is: " & Format(xRgNum, "#,##0"), vbOKOnly, "Kutools For Excel"
Application.ScreenUpdating = True
End Sub
3. нажмите F5 ключ для запуска кода. В всплывающем Kutools for Excel в диалоговом окне выберите диапазон, в котором вы будете подсчитывать количество слов, а затем щелкните OK кнопка. Смотрите скриншот:
Затем другой Kutools for Excel диалоговое окно всплывает, чтобы показать вам общее количество слов в выбранном диапазоне. Смотрите скриншот:
Подсчитайте количество слов с Kutools for Excel (только клики)
Yты можешь попробовать Подсчитать слова в диапазоне полезности Kutools for Excel чтобы легко подсчитать количество слов в ячейке или диапазоне всего за несколько кликов.
Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.
1. Выберите ячейку для возврата результата, затем щелкните Кутулс > Формула Помощник > Формула Помощник.
2. в Помощник по формулам диалоговое окно, настройте следующим образом.
- В Выберите формулу выберите Подсчитать общее количество слов;
Tips: Вы можете проверить Фильтр поле введите ключевое слово, чтобы быстро отфильтровать формулу по мере необходимости. - В Диапазон поле укажите ячейку или диапазон, в котором вы хотите подсчитать общее количество слов;
- Нажмите OK кнопка. Смотрите скриншот:
Тогда вы получите количество слов в указанной ячейке или диапазоне.
Если вы хотите получить бесплатную пробную версию (30-день) этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.
Легко подсчитать количество слов с Kutools for Excel
Kutools for Excel включает более 300 мощных функций для Microsoft Excel. Бесплатно попробовать без ограничений в 30 дней. Скачать сейчас!
Лучшие инструменты для офисной работы
Усовершенствуйте свои навыки работы с Excel с помощью Kutools for Excelи испытайте эффективность, как никогда раньше. Kutools for Excel Предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Office Tab Добавляет в Office интерфейс с вкладками и значительно упрощает вашу работу
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!













