Hi,
I have about 100 csv files of the same format that I would like to append into a single master file. Order is not important for appending (I can do a column sort later) I can do copying and pasting, but this will take a long time especially because I will creating more master files from completely different CSVs in the future. Is there a faster way to append CSV files?
Thanks
Last edited by Delta223; 01-23-2010 at 04:25 PM.
An old keeper for the Andy pope folder
AutoLinked keywords will cause extra spaces before keywords. Extra spacing is NOT transferred when copy/pasting, but IS if the keyword uses "quotes".
Please Login or Register to view this content.
Thanks, so if I'm reading this right, all files in the "C:\temp\" folder with be automatically appended when running this macro, correcT?
If so I iwll need to change the folder because there is already a "temp" folder on my hard drive. I don't really work with macros and hope this won't cause a problem elsewhere in the script.
Hi Delta223
yes thats right - it will only look for csv file in the temp folder. and you can change the path to the new folder.
Last edited by teylyn; 02-04-2010 at 02:46 AM.
looking closer at Andy's code it wont do what you require
you'll need some thing like
its untestedPlease Login or Register to view this content.
Ok I've tested this
Please Login or Register to view this content.
Forgot about
change it toPlease Login or Register to view this content.
Please Login or Register to view this content.
haha thanks for the revision
Dont forget
To mark your thread solved do the following:
- Go to the first post
- Click edit
- Click Advance
- Just below the word "Title:" you will see a dropdown with the word No prefix.
- Change to Solve
- Click Save
Hi,
I tried it today and immediately when changing the "Input" line to "Line Input" it gave an error prompt and changed to a red warning color. See attached picture. Any idea what's causing this error?
HiDelta223
change
toPlease Login or Register to view this content.
which is short hand forPlease Login or Register to view this content.
this one was a typoPlease Login or Register to view this content.
Please Login or Register to view this content.
Last edited by pike; 01-23-2010 at 06:34 PM.
I didnt test it as well as i though
use
Please Login or Register to view this content.
Hi Delta223
You spend a lot of time looking at this thread everything OK?
Hi,
I was having major issues with excel trimming the leading 0s on my CSV files as soon as it loaded the file. i found a workaround by saving the output file as a tab delimited .txt file (my csv importer apparently accepts this)
how can I get your macro to work with tab delimited .txt files?
Last edited by Delta223; 01-27-2010 at 05:07 PM.
good stuff!
thanks pike, my final question is how can I get your macro to work with tab delimited .txt files?
Hey Delta223
Just change csv to txt should do the trick
Hi,
It did not work. I was prompted with "runtime error 70: permission denied" clicking on debug mode showed the window in the attached image.
Any idea what the issue is?
Last edited by Delta223; 01-29-2010 at 12:25 AM.
Hi Delta223
I've test this with the C:\Temp\Temp\MasterCopy.txt and the files .txt to add to it from
C:\Temp\
Please Login or Register to view this content.
Hi,
I tried it again with your new code for ptesttxt
I changed the root "temp" folder to /testdir/ (if i understand coorectly this is where the files to be appended go)
I changed the 2nd "temp" folder where the master list is saved to /mtr/
I changed MasterCopy.txt to masterlist.txt
All of these of couse match the folder layout i have arranged.
It did not work and gave the exact error as last time.
here is the code I used:
Sub ptesttxt()
Dim strPathMaster$, strFile$, strPath$, tmpLine$
strPath = "C:\testdir\"
strPathMaster = "C:\testdir\mtr\masterlist.txt"
ChDir strPath
strFile = Dir("*.txt")
Do While Len(strFile) > 0
Open strPathMaster For Append As #2
Open strFile For Input As #1
Do Until EOF(1)
Line Input #1, tmpLine
Print #2, tmpLine
Loop
Close #2
Close #1
strFile = Dir
Loop
End Sub
Hello Delta223
Check if this is the exact path and file namePlease Login or Register to view this content.
also how did you create the txt file?
You will need to saveas txt not just change the name??
Last edited by pike; 01-29-2010 at 02:59 AM.
hi, it is the exact path and i created the file through word
hi all,
Sorry for cutting in on this one Pike ;-)
This may occur if you already/still have the file open in Word from when you created it. If you have closed the file & it still happens, (in case you have other word files open) try closing Word down completely before running the macro.Originally Posted by Delta223
You can use the below function to test for the file being locked...
hthPlease Login or Register to view this content.
Rob
Rob Brockett
Kiwi in the UK
Always learning & the best way to learn is to experience...
Hi, I ran the above recording for checking if the file was locked. It didn't seem to do anything.
Hi Delta 223 you will have you create new txt files from the csv files?
which csv files are you referring to: masterlist.csv, or the .csv files that are to be appended?
Delta223
SaveAs all csv to txt
other wise start for scratch and with "note pad" create new txt files
this will take quite some time.
I will use your original script to append the csv files without leading zero problems on the zip codes and see if at east they work
Delta223
Hard to say where did the csv come from ? if they from an xls why not save the xls to txt to keep the zeros
something it better to start from the begining instead of fixing fixups
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks