如何在Excel 2010工作表名称中包含行数？

Question

是否可以在工作表名称中包含Excel工作表（包含数据）中的行数？目前名称看起来像＆＃34; Widgets＆＃34;，我希望它们看起来像：＆＃34; Widgets（n）＆＃34;第一行是标题，因此总行数为n-1。谢谢。

Answer 1

我建议的唯一方法是通过宏保存。这样你就可以得到行数（这里有各种各样的方法可以讨论）并创建一个追加行数的保存字符串。

唯一的缺点是它每次都会创建一个新文件（因为文件名会改变。）你可以使用相同的宏将旧文件移动到存档文件夹或删除它们 - 但这将是要记住的事情。

希望这有帮助

Answer 2

也许：

Sub range_reporter()
  Dim r As Range
  Dim nLastRow As Long
  ActiveSheet.UsedRange
  Set r = ActiveSheet.UsedRange

  nLastRow = r.Rows.Count + r.Row - 1
  ActiveSheet.Name = ActiveSheet.Name & "(" & nLastRow - 1 & ")"
End Sub

但是，计数将包括非空行中可能为空的行。