如果工作表名稱有規律，可以直接用indirect+row獲取

如果工作表名稱無規律，可以藉助宏表函式+indirect或用vba完成

以VBA為例：

假設要將當前工作簿其它工作表中的A1,D2,E3,F5存放至第一張工作表的A:D列，每個工作表的資料存放一行。

按住ALT，依次按F11,I,M，貼上程式碼後按F5，即可實現目的。

Sub工作表彙總()

WithSheets(1)"注意第一個工作表是彙總工作表，執行程式碼後它的內容將被修改

Fori=2ToThisWorkbook.Worksheets.Count

.Cells(i,1)=Sheets(i).Range("A1")

.Cells(i,2)=Sheets(i).Range("D2")

.Cells(i,3)=Sheets(i).Range("E3")

.Cells(i,4)=Sheets(i).Range("F5")

"如果有更多對應關係，在這裡依次新增

Next

EndWith

EndSub