Question

Excel一个工作簿中多个工作表的相同单元格套用递增的公式

大神们求指导T.T
例如：在sheet2、3、4 中A1单元格出分别提取sheet1 A1、A2、A3中的内容，该如何一键设置





Answer 1

因为工作表编号sheet2、3、4顺序排列，同一个单元格需要填入sheet1A列第1、2、3行的内容。问题的关键是将上述的2、3、4转换为1、2、3。具体方法如下：

1、单击Sheet2后，按住键盘上的Shift键不放，再单击最后一个工作标签，此时同时选择多个工作表，成工作表组，工作表组可以同时进行编辑。如下图所示，多个工作表标签变白。

2、单击选择A1单元格，输入公式：
=INDEX(Sheet1!A:A,RIGHT(CELL("filename",B1),LEN(CELL("filename",B1))-FIND("Sheet",CELL("filename",B1))-4)-1)

3、单机sheet1工作表标签，取消工作表组即可。取消工作表组后仅有一个工作表标签为白色，其他工作表标签均为灰色，如下所示。

函数解释：

a）CELL("filename",B1) 。取得当前工作表中B1单元格的文件名称，例如： C:\Users\hbx\Desktop\baidu\[工作簿2.xlsx]Sheet2    

b）RIGHT(...）。将工作表名称中的编号提取出来，并进行转换，使其与sheet1A列第1、2、3行顺序一致。

c）INDEX(Sheet1!A:A,...)。从sheet1表中的A列，顺序取得数据。

Answer 2

sheet4的a1输入

=INDIRECT("sheet"&ROW(A1)&"!a1")

公式下拉

Answer 3

单击Sheet1后，再按住键盘上的Shift键，再单击最后一个工作标签（本问题中就是Sheet4）了，选择多个工作表。单击选择A1单元格以激活A1单元格。输入公式：
=INDEX(Sheet1!$A:$A,SUBSTITUTE(MID(CELL("filename",A1),FIND("]",CELL("filename"))+1,100),"Sheet","")-1)
再右击任意工作表标签，选择“取消组合工作表“，完成任务。

Answer 4

一般来说，就是设置sheet2、sheet3、sheet4的A1单元格分别等于sheet1!A1、sheet1!A2、sheet1!A3，如果这不是你所希望的，那就只有用VBA来做了。

Sub t()
    For i = 2 To Sheets.Count
        Sheets("sheet" & i).Range("A1") = Sheets("sheet1").Range("A" & i - 1)
    Next
End Sub