View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
PhilipH PhilipH is offline
external usenet poster
 
Posts: 1
Default Multiple txt files import

-this example is what I have been looking for.
1) The code below will not run & do not understand the line tha
fails.
2) Will this load all text files into one sheet, in one row after th
next?

Sub Macro1()

For i = 1 To 10
Workbooks.Open Filename:="File" & i & ".txt"
Selection.Copy
Windows("Book1").Activate
Range("A1").Select

--ActiveSheet.PasteSpecial := xlvalues, transpose:= true


ActiveCell.Offset(1, 0).Select
Workbooks("File" & i & ".txt").Close
Next i
MsgBox ("Complete")

End Sub

Thanks

--
Message posted from http://www.ExcelForum.com