在Excel中自动增加十进制值

我试图找出如何自动增加Excel中的十进制值,并在下一张表中增加第一个数字。

示例如下:

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

现在,如果我添加一个新表,我希望编号继续3.1。 在Excel 2010中可以这样做吗?

没有一些macros观的支持,我看不出有什么办法可以做到这一点。 类似以下内容可能是一个起点; 将其添加到VBA中的ThisWorkbook模块:

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

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