如何在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)) 進入編輯欄，然後按 轉移 + 按Ctrl + Enter 同時獲得結果。 看截圖：

備註：A2：A3是您要計算的單詞範圍。

使用用戶定義的函數計算單詞數

另外，您可以使用“用戶定義的函數”對單元格中的單詞進行計數，請執行以下操作：

1。 按 其他 + F11 鑰匙一起打開 適用於應用程序的Microsoft Visual Basic 窗口。

2.在窗口中，單擊 插入 > 模塊，然後將下面的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 for Applications winodw。 在工作表中選擇一個空白單元格，輸入公式“=intwordcount(A2)”進入編輯欄，然後按 Enter 獲得結果的關鍵。 看截圖：

備註：在公式中，A2是您要計算內部單詞數的單元格。

如果要計算一定範圍內的單詞數，請使用以下方法。

使用VBA代碼計算指定範圍內的單詞數

以下VBA代碼可以幫助您快速計算指定範圍內的單詞數。

1。 按 其他 + F11 鑰匙一起打開 適用於應用程序的Microsoft Visual Basic 窗口。

2.在窗口中，單擊 插入 > 模塊，然後將下面的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 鍵來運行代碼。 在彈出 Excel的Kutools 對話框，請選擇要計算的單詞數範圍，然後單擊 OK 按鈕。 看截圖：

然後另一個 Excel的Kutools 彈出對話框，顯示選定範圍內的單詞總數。 看截圖：

用Kutools for Excel計算單詞數（僅點擊次數）

Y你可以試試 計算範圍內的單詞 Kutools for Excel的實用程序，只需單擊幾下即可輕鬆計算單元格或範圍內的單詞數。

1.選擇一個要返回結果的單元格，然後單擊 庫工具 > 公式助手 > 公式助手.

2。 在裡面 公式助手 對話框，請進行以下配置。

• 在 選擇一個公式 框中選擇 計算總字數;
  保養竅門：您可以檢查 篩選 框中，輸入關鍵字以根據需要快速過濾公式。
• 在 範圍 框，指定要計算總單詞數的單元格或範圍；
• 點擊 OK 按鈕。 看截圖：

然後，您將獲得指定單元格或範圍內的單詞數。

使用Kutools for Excel輕鬆計算單詞數

---

最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題，並將你的生產力提高了 80%

• 重用: 快速插入 複雜的公式，圖表 以及您以前使用過的任何東西； 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
• 超級公式欄 （輕鬆編輯多行文本和公式）； 閱讀版式 （輕鬆讀取和編輯大量單元格）； 粘貼到過濾範圍...
• 合併單元格/行/列 不會丟失數據； 拆分單元格內容； 合併重複的行/列...防止細胞重複； 比較範圍...
• 選擇重複或唯一 行; 選擇空白行 （所有單元格都是空的）； 超級查找和模糊查找 在許多工作簿中； 隨機選擇...
• 確切的副本 多個單元格，無需更改公式參考； 自動創建參考 到多張紙； 插入項目符號，複選框等...
• 提取文字，添加文本，按位置刪除， 刪除空間; 創建和打印分頁小計； 在單元格內容和註釋之間轉換...
• 超級濾鏡 （將過濾方案保存並應用於其他工作表）； 高級排序 按月/週/日，頻率及更多； 特殊過濾器 用粗體，斜體...
• 結合工作簿和工作表; 根據關鍵列合併表； 將數據分割成多個工作表; 批量轉換xls，xlsx和PDF...
• 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。

閱讀更多... 免費下載... 採購... 

---

Office選項卡為Office帶來了選項卡式界面，使您的工作更加輕鬆

• 在Word，Excel，PowerPoint中啟用選項卡式編輯和閱讀，發布者，Access，Visio和Project。
• 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
• 將您的工作效率提高 50%，每天為您減少數百次鼠標點擊！

閱讀更多... 免費下載... 採購...