使用單元格值導入excel文本文件

Question

我有一些.txt輸出文件，我想在Excel中導入。

理想情況下，我想使用Sheet1作爲索引;在那裏我將寫一個標題，表格的名稱以及.txt文件的路徑和名稱。宏應該創建一個名爲單元的newSheet，並在該表中導入相應的.txt文件。

我一直在試圖記錄一個宏和改變VBA代碼，但到目前爲止只是失敗。

With ActiveSheet.QueryTables.Add(Connection:= _ 
"TEXT;C:\Documents and Settings\UserXP\My Documents\My Dropbox\CIPPEC\1-MIRA\Procesamiento base\OEDE\Tablas\trim\q_employ_pcia_23.txt" _ 
, Destination:=Range("$A$1")).Name = "q_employ_pcia_23" 

任何想法？

感謝

Answer 1

With ActiveSheet.QueryTables.Add(Connection:= _ 
"TEXT;C:\Documents and Settings\UserXP\My Documents\My Dropbox\CIPPEC\1-MIRA\Procesamiento base\OEDE\Tablas\trim\q_employ_pcia_23.txt" _ 
, Destination:=Range("$A$1")) 
.Name = "q_employ_pcia_23" 
.Refresh BackgroundQuery:=False 
End With 
ActiveSheet.Name = "q_employ_pcia_23" 

你要來命名新的工作表

工程，以獲取導入到一個新表和。