如何将来自不同excel文件和工作表的数据导入一个主要的Excel文件中

时间:2013-06-03 16:20:04

标签: excel import

我有不同的excel文件,它有多个工作表,我想导入一个主要的Excel文件。 这些文件位于不同的目录下。所以我想知道将所有这些文件中的特定单元格导入到一个主要的excel文件中是否可行,该文件应该在每次更改时更新。

4 个答案:

答案 0 :(得分:2)

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

这是一个很棒的宏/加载项,可以导入文件夹中的所有文件,如果你想将子文件夹放到一个电子表格中。

答案 1 :(得分:1)

使用以下内容:

=( 'NAME_OF__SHEET'!A1)

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

你做完了!

答案 2 :(得分:1)

你可以像这样创建一个宏:

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等),那么您可以创建一个For循环。否则,只需根据需要调用CopyPasteOneWorkbook即可。

答案 3 :(得分:0)

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

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