0

我试图弄清楚如何在 Excel 中自动增加一个十进制值,并为下一张表将第一个数字增加一个。

下面的例子:

(first sheet)
1.1
1.2
1.3
...
(second sheet)
2.1
2.2
2.3
...

现在,如果我添加一张新工作表,我希望编号继续使用 3.1。在 excel 2010 中会出现这样的情况吗?

4

1 回答 1

2

如果没有一些宏支持,我看不到任何方法来实现这一点。以下内容可能是一个起点;将其添加到ThisWorkbookVBA 中的模块中:

Private Sub Workbook_NewSheet(ByVal Sh As Object)
    Sh.Cells(1, 1) = ThisWorkbook.Worksheets.Count + 0.1
End Sub

创建新工作表时调用该代码,接收新工作表作为参数。然后为左上角的单元格提供一个反映当前工作簿中工作表数量的值,加上问题中的 0.1。进一步的单元格可能会根据需要填充(比如说)一个For循环(从问题中不清楚究竟有多少单元格应该获得一个值或者我们知道什么规则)。

于 2013-04-09T09:14:03.330 回答