如何計算Excel中表格的總行數？

本文討論的是對Excel中指定表中的總行進行計數。 請執行以下操作。

使用VBA代碼對錶中的總行進行計數

---

使用VBA代碼對錶中的總行進行計數

下面的VBA代碼可以幫助您計算Excel中指定表中的行數。

1。 按 其他 + F11 鑰匙一起打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口，請點擊 插入 > 模塊。 然後將下面的VBA代碼複製並粘貼到“模塊”窗口中。

VBA代碼：計算Excel中表格的總行數

Sub CountTableRows()
'Updated by Extendoffice 2017/9/12
    Dim xTable As ListObject
    Dim xTName As String
    On Error Resume Next
    xTName = Application.InputBox("Please input the table name：", "KuTools For Excel", , , , , , 2)
    Set xTable = ActiveSheet.ListObjects(xTName)
    MsgBox "The table has total number of " & xTable.Range.Rows.Count & " rows.", vbInformation, "KuTools For Excel"
    Set xTable = Nothing
End Sub

3。 按 F5 鍵來運行代碼。

4.在開幕 Excel的Kutools 對話框中，請輸入您要計算其總行數的表名，然後單擊 OK 按鈕。 看截圖：

5.現在，另一個 Excel的Kutools 彈出對話框，向您顯示此指定表中存在多少行，請單擊 OK 按鈕完成。 

---

相關文章：

• 如何計算Excel中兩個值或日期之間的單元格數量？
• 如何在Excel中的選擇中對具有特定文本的單元格進行計數？
• 如何計算Excel中“是”或“否”答案的數量？
• 如何在Excel中計算單元格是否包含文本或部分文本？