excel后一个工作表引用前一个工作表中的内容，同时函数中的某些数字能够递增

三楼的公式只能应用到Sheet9，到Sheet10就没办法了，试试我这个，在sheet2的A1中输入

=(B1+INDIRECT("Sheet"&VALUE(TRIM(RIGHT(SUBSTITUTE(CELL("filename",A1),"eet",REPT(" ",50)),50)))-1&"!A1")*(VALUE(TRIM(RIGHT(SUBSTITUTE(CELL("filename",A1),"eet",REPT(" ",50)),50)))-1)/VALUE(TRIM(RIGHT(SUBSTITUTE(CELL("filename",A1),"eet",REPT(" ",50)),50))))

然后复制，粘帖到每个sheet的A1中，虽然不能像你想象中那样自动生成，但只是比每个sheet去输入要方便多了。

要注意的是，你所有的工作表必须是按Sheet1、Sheet2、Sheet3……SheetN这样命名，否则公式无法实现。

Sub test()
Dim i As Integer
For ii = 2 To Sheets.Count
Sheets(ii).Cells(1, 1).Value = (Sheets(ii).Cells(1, 2).Value + Sheets(ii - 1).Cells(1, 1).Value * (ii - 1)) / ii
Next
End Sub
将代码复制到表里面，直接执行就可以了。

不直接输入，就要考虑用VBA来执行操作。

公式是=(INDIRECT("sheet"&(RIGHT(CELL("filename"),1)-1)&"!A1")*(RIGHT(CELL("filename"),1)-1)+B1)/RIGHT(CELL("filename"),1)

个人觉得是必须手写输入的，期待别的大神。