如何在 Excel 中計算儲存格內的行數（換行字元）？

作者Siluvia修改日期2025-08-08

處理 Excel 資料時，您是否常遇到儲存格內包含多行文字（以換行符分隔）的情況？例如，匯入的地址、產品清單或問卷回覆，可能因使用 Alt+Enter 或來源格式設定，而顯示為單一儲存格中的多行內容。掌握儲存格內究竟包含多少行文字，對於數據分析、資料清理與報表製作至關重要。本文將介紹在 Excel 中計算儲存格內行數（即換行符數量）的實用技巧，助您更高效地管理此類資料，並大幅簡化工作流程。

輕鬆將 Excel 中的多行儲存格內容拆分為列或欄

使用公式計算儲存格中的行數
VBA 巨集可計算所選儲存格中的換行符數量，並顯示各行數

使用公式計算儲存格中的行數

Excel 並未提供直接計算儲存格內換行符數量的功能，但您可透過內建函數輕鬆實現。以下公式能幫您計算儲存格中的行數（即換行符數量加一），特別適合用於分析問卷回覆、多項目註解欄位，或儲存在單一儲存格中的地址資料。

1. 選取一個空白儲存格以顯示計數結果，輸入下方公式後按下 Enter 鍵。請務必將儲存格參照調整為您要分析的範圍（例如使用）A2）。

=LEN(A2)-LEN(SUBSTITUTE(A2,CHAR(10),""))+1

顯示 Excel 中用於計算儲存格內行數公式的螢幕截圖

說明：此公式會計算儲存格中換行符（由）CHAR(10) 表示）的數量，並加 1 得出總行數。

注意：在此公式中，A2 為您要計算行數的儲存格。若您的資料位於其他儲存格，只需調整參照即可。

2. 輸入公式後，請保持選取結果儲存格。若要將公式套用至同欄的其他儲存格，只需向下拖曳填滿控點，系統便會自動計算對應儲存格的結果，如下方截圖所示。

顯示在 Excel 中使用公式計算儲存格內換行數結果的螢幕截圖

實用提示與注意事項：

1. 對於看似空白的儲存格（空白儲存格），您仍會得到結果 1. 若您希望公式對完全空儲存格或無內容的儲存格傳回 0，請考慮使用下方的變體公式。

2. 若您希望公式對空白儲存格傳回 0，請使用下列替代公式：

=LEN(A2)-LEN(SUBSTITUTE(A2,CHAR(10),""))+(LEN(A2)>1)

當您在資料集中包含空儲存格，且希望區分真正空白與單行項目時，此方法尤其適用。

3. 這些公式計算的是實際的換行符（Alt+Enter 換行結尾）。若使用「自動換行」功能但未明確插入換行符，結果將為 1. 為確保結果準確，請確認輸入資料確實以換行符（Alt+Enter）分隔。

公式提供了一種快速且非破壞性的方式來計算換行符，適用於大多數常規數據分析情境。然而，在處理大型範圍或針對多重選取取得結果時，公式方法的效率可能不及其他方式。

Kutools for Excel 的分割儲存格工具，可協助您輕鬆依空格、逗號、換行或其他分隔符，將儲存格內容拆分為獨立的列或欄，如下方截圖所示。在識別換行符後，您還能進一步轉換與分析多維文字資料，大幅簡化工作流程！

顯示 Kutools for Excel 的「分割儲存格」功能，將內容分割為多列或多欄的螢幕截圖

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

VBA 巨集可計算所選儲存格中的換行符數量，並顯示各行數

處理大型資料集，或需一次計算多個儲存格中的行數（換行符）時，使用 VBA 巨集比手動輸入公式更有效率且更具彈性。以下解決方案非常適合用於批次處理任務，例如彙總回覆內容、準備資料以供匯出，或對匯入的文字執行品質檢查。

以下是運用 VBA 巨集快速計算每個所選儲存格所在行數的絕佳方法！結果將立即顯示於訊息方塊中，讓您一目了然掌握計數，同時完全不會更動工作表中的任何資料。

1. 按一下開發人員工具＞Visual Basic，即可開啟 Microsoft Visual Basic for Applications 視窗。在 VBA 編輯器中，按一下插入＞模組，並將下列程式碼貼到新建立的模組中：

Sub CountLinesInSelection()
    Dim rng As Range
    Dim cell As Range
    Dim lineCount As Long
    Dim result As String
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the range to count line breaks in:", xTitleId, rng.Address, Type:=8)
    
    If rng Is Nothing Then Exit Sub
    
    result = ""
    
    For Each cell In rng
        If Not IsEmpty(cell.Value) Then
            lineCount = Len(cell.Value) - Len(Replace(cell.Value, Chr(10), "")) + 1
        Else
            lineCount = 0
        End If
        
        result = result & "Cell " & cell.Address(False, False) & ": " & lineCount & " line(s)" & vbCrLf
    Next cell
    
    MsgBox result, vbInformation, "Line Break Counts"
End Sub

2. 輸入程式碼後，點擊執行按鈕以執行巨集。系統將彈出對話方塊，請選取要分析的儲存格範圍——支援連續或非連續區域。
3. 巨集會自動計算每個所選儲存格中的換行符數量，並顯示摘要視窗，列出各儲存格及其對應的行數；若儲存格為空白，則傳回行數為 0.

提示與疑難排解：

此巨集不會修改現有工作表資料，因此當您需要快速取得摘要或執行診斷檢查，又不想變更資料或新增額外欄位時，格外適用。
執行巨集時若出現權限錯誤，請確認您的活頁簿已儲存為啟用巨集的檔案（*.xlsm），並已在 Excel 的安全性設定中啟用巨集。
將此方法套用至極大的選取範圍時，訊息方塊內容可能過長；建議縮小儲存格範圍，以提升閱讀體驗。

VBA 特別適合用於批次分析、報表製作，或當您需要一次性快速掌握多個工作表區域概況時。此方法為進階使用者提供高度靈活性，但不像公式般能在儲存格數值變更時自動更新，因此編輯後需視情況重新執行。

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多