are all of these files formatted the same way? if they are, you could run a function like this:
Code:
Function TxtAppend(wStr As String, _
wPath As String, _
Optional bNewLine As Boolean)
'******************************************************************************
' *
'Author: Adam Evanovich *
'Date: 6/12/2006 *
'Purpose: Writes information (a string) to the end of a text file. *
' *
'Arguments: *
'wStr > String to write into the text file. *
'wPath > Full path of the text file being manipulated. *
'bNewLine > Indicates whether or not to write the data to a new line. If no, *
' data will appended immediately following the last character in *
' the text file. If omitted, false will be assumed. *
' *
'******************************************************************************
On Error GoTo Cleanup
Const wMode = 8&
Dim fso As Object
Dim oFile As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFile = fso.opentextfile(wPath, wMode)
If bNewLine Then
oFile.writeline vbNewLine & wStr
Else
oFile.writeline wStr
End If
oFile.Close
Cleanup:
Set fso = Nothing
Set oFile = Nothing
End Function
I got that from here: http://www.ajenterprisesonline.com/_...me=TxtAppend()
take a look at the 'txt' functions on this page: http://www.ajenterprisesonline.com/_functions/
you could easily loop them all and append them to a single file. at that point, you could use the wizard just once, since you want to get it into one table anyway, right?