excel导入多个文件内的数据

❶ 如何在excel中一次性导入多个txt文件

试试这个
------------------
Sub micro123()
directory = "C:\txtTemp" '你存放txt文件的目录
With Application.FileSearch
.LookIn = directory
.SearchSubFolders = True
.Filename = "*.txt"
If .Execute() > 0 Then
MsgBox "There were " & .FoundFiles.Count & " file(s) found."
For i = 1 To .FoundFiles.Count
Sheets.Add
With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & .FoundFiles(i), Destination:=ActiveSheet.Range("A1"))

.Refresh BackgroundQuery:=False
End With
Next i
Else
MsgBox "There were no files found."
End If
End With
End Sub
-----------
你把--------------中间的代码复制，打开excel，按下alt+f11,菜单栏-插入-模块，在编辑区域粘贴代码，然后运行。（运行时如出现安全提示，可放心通过，让宏运行）
注意的是，这些代码是在2003下运行的，2007去除了FileSearch de 的支持。可以使用Dir 或 FileSystemObject来搜索...详见：http://support.microsoft.com/kb/920229/zh-cn

❷ 怎样把很多EXCEL文件中的数据导入到一个EXCEL文件中

将800多份文件到一个文件夹（只有这800多Excel，且若打开某一文件，数据就能看见——即不用点其他sheet），建一新Excel，也存到该文件夹。仅打开该新Excel，按Alt+F11，左边窗口右键点，插入模块，在右边窗口粘贴如下代码：Sub Find()Application.ScreenUpdating = False Dim MyDir As String MyDir = ThisWorkbook.Path & "\" ChDrive Left(MyDir, 1) 'find all the excel files ChDir MyDir Match = Dir$("")DoIf Not LCase(Match) = LCase(ThisWorkbook.Name) Then Workbooks.Open Match, 0 'open ActiveSheet.Copy Before:=ThisWorkbook.Sheets(1) ' sheet Windows(Match).Activate ActiveWindow.Close Application.ScreenUpdating = TrueEnd Sub点菜单上面的播放按钮，800多文件完成。

❸ 如何将多个excel文件中数据自动导入另外一个excel文档

如何将多个excel文件中数据自动导入另外一个excel文档的方法。

如下参考：

1．计算内机打开要移动的容工作簿，如下所示。

❹ 怎么把多个excel表格里的内容放在一个里

以office2019为例，把多个excel表格里的内容放在一个里的方法如下：

1、首先需要将多个Excel表格都复制到一个文件夹下，然后打开表格，切换到数据菜单；

2、接着点击菜单中的“合并”选项下的“合并和加载”，选择要合并的工作表名称；

3、点击“确定”即可合并该表格中的内容；

4、在导入数据的时候，只需要选择表格以及确定导入的位置即可，其它无需改动。

在日常办公的时候电脑桌面上总会有密密麻麻的表格，这样不仅看上去杂乱，而且也会影响电脑的开机速度，所以可以将其中类型相同的表格合并到一张Excel表格里，一般情况下如果表格较少，可以打开表格，新建一个空白的Excel文件，然后将其它表格中的内容全部复制，然后粘贴进去，如果内容过多或者表格太多的话，就只能通过上面的方法合并表格内容了。

❺ 怎么把多个txt文本的内容，批量导入到excel指定的表格

1、如下图所示，我们在TXT文本内有一些数据内容，想要把他们转到excel表格中。接下来我们先打开excel表格。

❻ 如何将多个excel文件中数据自动导入另外一个excel文档

补充问题的回答：
不知道是不是这样的：
如果你的表格格式是一样的，需要增加链接的公式就可以实现，
新建你需要打开的文件，使用公式链接，如：
在A2---C4的范围内链接文件1的内容，
在A2输入公式==[1.xls]Sheet1!A2，
将此公式拖动，方法：点A2右下角的黑点出现“十”时，按住左键往C4方向拖即可，或者用复制--粘贴。此时你会发现文件1对应表格的数据上来了。
当然如果文件1是打开的，只需在单元格A2处输入=号，点文件1中的对应位置，回车，链接便建立了。注意要将公式中的Sheet1!$A$2绝对引用符号$去掉，才能拖动或复制。
同理
，对其他文件有效。
假设你要将文件分别为
A、B、C、D导入E文件中，
步骤：
1、分别打开A、B、C、D、E文件，选A文件，点工作表左下角的Sheet1工作表标识，右键--移动或复制工作表--工作簿(点工作簿按钮--选择文件E)--建立副本(打钩)--确定，此时除了刚才打开的五个文件会新建一个文件(现假设为BOOK2)；
2、重复A的操作，分别选择B、C、D文件，也可将B、C、D也合并过来。
不知这样是不是你想要的结果？希望能帮到你。