如何从不同的Excel文件和工作表导入数据到一个主要的Excel文件

我有不同的Excel文件有多张,我想导入到一个主要的Excel文件。 这些文件在不同的目录下。 所以我想知道是否可以从所有这些文件导入特定的单元格到一个主要的Excel文件,每次更改都应该更新。

使用以下内容:

=( 'NAME_OF__SHEET'!A1)

NAME_OF__SHEET =“您的工作表的名称”A1 =列,行

和你做完!

http://www.rondebruin.nl/win/addins/rdbmerge.htm

这是一个很好的macros/插件来导入文件夹中的所有文件,如果你想子文件夹到一个电子表格。

你可以像这样创build一个macros:

Sub ConsolidateWorkbooks() Dim myRange As String myRange = "A1:B2" 'Put the range you want to copy from each workbook here Dim thisWorkbook As String Dim thisWorksheet As String thisWorkbook = ActiveWorkbook.name thisWorksheet = ActiveSheet.name CopyPasteOneWorkbook ("C:\firstworkbook.xls") CopyPasteOneWorkbook ("C:\secondworkbook.xls") End Sub Sub CopyPasteOneWorkbook(name As String) Workbooks.Open Filename:=name range(myRange).Select Application.CutCopyMode = False Selection.Copy Windows(thisWorkbook).Activate 'Select the first empty cell in column A: Worksheets(thisWorksheet).range("A1").End(xlDown).Select Selection.Offset(1, 0).Select ActiveSheet.Paste End Sub 

如果您的工作簿都在一个文件中,并具有顺序名称(workbook1.xls,workbook2.xls等),那么您可以创build一个For循环。 否则,只要您需要拨打多less个电话给CopyPasteOneWorkbook即可。

关于这个问题的第二部分(包括从其他文档中的单元格到您的文档的数据),答案在这里:

https://superuser.com/questions/835940/import-one-cell-of-data-from-one-spreadsheet-to-another