

DZ91129340025 轮边端盖
如果你使用 Microsoft Excel,可以使用 VBA 代码来统计一个 Excel 工作簿中有多少个工作表。
Sub CountSheets()
Dim wb As Workbook
Dim ws As Worksheet
Dim sheetCount As Integer
sheetCount = 0
Set wb = ThisWorkbook
For Each ws In wb.Worksheets
sheetCount = sheetCount + 1
Next ws
MsgBox "工作表数量:" & sheetCount
End Sub
请注意,上面的代码仅适用于 Microsoft Excel,并不适用于其他电子表格软件。