❶ 如何在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表格里的內容放在一個里的方法如下:❺ 怎麼把多個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也合並過來。
不知這樣是不是你想要的結果?希望能幫到你。