如何從多個電子表格中提取具有相同格式的儲存格到新的主文件中

Question

我有 300 個 Excel 文件，每個文件都有完全相同的格式 - 每個文件中有 4 個工作表，具有相同的列/行標題。我正在嘗試從所有300 個Excel 文件中的這4 個工作表中的每一個的選定單元格中提取資訊（例如，從工作表A 中的單元格D26、從工作表B 中的單元格D62等等）中提取信息，並將該數據放入新的主Excel 文件中其中包含 300 個 Excel 文件中每個文件的信息。這可能嗎？

Answer 1

發布了一些非常好的程式碼這裡只需進行一些調整就可以達到您想要的效果。

戈登

需要進行一些更改，對此進行了很好的評論。這些行會取得工作簿中 A 列的所有資料並將其複製到主工作表中。

LR = Range("A" & Rows.Count).End(xlUp).Row  'Find last row
Range("A1:A" & LR).EntireRow.Copy .Range("A" & NR)

相反，您需要循環遍歷工作表並使用類似這樣的內容來設定要複製的範圍。

wbData.sheets(1).range("A2:A26").copy .Range("A" & NR)
NR = .Range("A" & .Rows.Count).End(xlUp).Row + 1
wbData.sheets(2).range("A2:A62").copy .Range("A" & NR)
NR = .Range("A" & .Rows.Count).End(xlUp).Row + 1
…