Macro that takes multiple csv files and puts [Solved/Closed]

Report
Posts
2
Registration date
Wednesday June 25, 2008
Status
Member
Last seen
July 9, 2008
-
 jrog -
Hello,
I need a macro that takes multiple csv files and puts them all in 1 worksheet.
The csv files all have header info that i do not want copied into the worksheet
This information is contained in row 1-24.
The purpose of the worksheet is to compile information of different test results from different testers.
I am new to this, and any help would be apreciated.

2 replies

Give this a try!

' ********************************************************************************
Sub test2()
Sheets("WS To be Loaded into").Select ' Where to load csvs
load_csv 65, "A988", "A1:D2", "\first.csv" 'A998 is destination cell, A1:D2 is CSV Range to copy
load_csv 66, "A993", "A1:C3", "\second.csv"
End Sub
' ********************************************************************************


' ********************************************************************************
Sub load_csv(counter, toRange, fromRange, csvName)
' Range(toRange).Activate
Range(toRange).Select
Workbooks.Open Filename:=ActiveWorkbook.Path & csvName
'Range(fromRange).Activate
Range(fromRange).Select
Selection.Copy
ActiveWindow.ActivateNext
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveWindow.ActivateNext
Application.CutCopyMode = False
ActiveWindow.Close
End Sub
' ********************************************************************************
21
Thank you

A few words of thanks would be greatly appreciated. Add comment

CCM 2942 users have said thank you to us this month

This is fantastic. Thank you for being brilliant!
Hello,

I want help in Excel macro,I have a excel file which is not in good format.I want to calculate a time according to condition below like, if i raised some ticket(regarding work) which has unique ticket number in one column A1 and in B1 cell i have following information, like the name of the person who has first taken that ticket on his account, then after uncertain space it has information like Assisgned/WIP/closed(status) then space and then time(assignment time) then some more information. But, it can be possible that one ticket number can be assigned and make WIP around 5 to 6 times.

I want my macro to calculate the total time starting from the first WIP status till the last.I am trying to make it in two ways.
1) My macro either should read the text WIP in cell B1 and take the just next text(which is time) after the status WIP.But i am unable to do like this.Since,the space between WIP and date is not fixed.

Second approach

2)I can first copy the source file in text file and from there i can write macro to break the text into column and copy the text file into my destination excel and from there i can write macro to calculate the ticket status,Since,in this way i can get the data in row and column wise and then i can calculate the time.

kindly help me.It is really very important for me.It will be a great help if somebody can help me.

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!