如何从另一个工作表导入数据？

网友投稿 202 2024-01-02

如何从另一个工作表导入数据？

当您操作Excel文件时，您可能希望将一些数据从另一个工作表导入到当前工作表中。今天，我将为您介绍一些有趣的技巧来解决这个问题。

使用连接功能从另一个工作表导入数据

使用VBA代码从另一个工作表导入数据

从另一个工作表导入数据 Kutools for Excel

使用连接功能从另一个工作表导入数据

惊人的！在 Excel 中使用高效的选项卡，如 Chrome、Firefox 和 Safari！ 每天节省50％的时间，并减少数千次鼠标单击！

如果你所熟悉的连接 Excel中的“地图项”功能，您可以将另一个工作表数据导入当前工作簿，并且导入的数据将自动使用原始数据进行更新。

1。点击 Data > 连接，请参见屏幕截图：

2。在 工作簿连接 对话框中，单击地址按钮，然后弹出 现有连接 对话框中，单击 浏览更多 按钮，请参见屏幕截图：

3。然后选择您要将其数据导出到当前工作表的工作簿。

4。选择工作簿后，请单击可选按钮，然后选择一个要使用的工作表。看截图：

5。然后点击 OK，它将返回到 工作簿连接 对话框，并且您选择的工作簿已添加到列表框中，请关闭此对话框。

6。然后继续点击 Data > 现有连接，请参见屏幕截图：

7。在 现有连接 对话框，单击您刚才添加的工作簿，然后单击可选按钮。看截图：

8。并在弹出 导入数据 对话框中，从 选择您要如何在工作簿中查看此数据，然后选择一个现有工作表范围或一个新工作表来放置数据。

9。然后点击 OK，另一个工作表中的数据已导入到您指定的工作表中。

笔记：

1.使用此方法，您可以导入类型为表, 数据透视表报表 or 数据透视图和 数据透视表报表.

2.如果您想在自己的工作簿中获取最新数据，则您的工作簿已连接到该外部数据。去 Data > 全部刷新 获取更新的数据。

使用VBA代码从另一个工作表导入数据

上面的方法有很多步骤，可能会让您感到疲倦，在这里，下面的VBA代码也可以帮助您从另一个工作表导入数据。

1。按住 ALT + F11 键，然后打开 Microsoft Visual Basic for Applications窗口.

2。点击插页 > 模块，然后将以下代码粘贴到 模块窗口.

VBA代码：从另一个工作表导入数据

Sub ImportDatafromotherworksheet() Dim wkbCrntWorkBook As Workbook Dim wkbSourceBook As Workbook Dim rngSourceRange As Range Dim rngDestination As Range Set wkbCrntWorkBook = ActiveWorkbook With Application.FileDialog(msoFileDialogOpen) .Filters.Clear .Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa" .AllowMultiSelect = False .Show If .SelectedItems.Count > 0 Then Workbooks.Open .SelectedItems(1) Set wkbSourceBook = ActiveWorkbook Set rngSourceRange = Application.InputBox(prompt:="Select source range", Title:="Source Range", Default:="A1", Type:=8) wkbCrntWorkBook.Activate Set rngDestination = Application.InputBox(prompt:="Select destination cell", Title:="Select Destination", Default:="A1", Type:=8) rngSourceRange.Copy rngDestination rngDestination.CurrentRegion.EntireColumn.AutoFit wkbSourceBook.Close False End If End With End Sub

Copy

3。然后按 F5 键以运行此代码，然后选择要将其数据插入当前工作簿的工作簿，请参见屏幕截图：

4。选择工作簿后，然后单击可选按钮，然后选择一个工作表或您指定的工作簿范围中需要导出的数据。看截图：

5. 然后点击 OK，然后选择一个单元格将导入的数据放入当前工作表中，请参见屏幕截图：