Very good - nice and crisp.
--
Gary''s Student - gsnu200856


"ker_01" wrote:

Another version, from one of my workbooks- this copies the entire CSV into a
target worksheet in your 'active' workbook.

Sub Grab_Current_Raw_Data()
Dim wb As Workbook
Dim ws As Worksheet
Dim fn As String
fn = "\\drive\path\folder\filename.csv"
Set ws = Sheet1 'Worksheets("Data")
Set wb = Workbooks.Open(fn)
wb.Worksheets(1).Cells.Copy
ws.Activate
ws.Range("A1").PasteSpecial
wb.Close SaveChanges:=False
End Sub


"Gary''s Student" wrote:

Right from the Recorder:

Sub Macro1()
ChDir "C:\"
Workbooks.Open Filename:="C:\x.csv"
Windows("Book1").Activate
Range("I7").Select
End Sub

--
Gary''s Student - gsnu2007L


"George" wrote:

I am working on a project that will read data from a *.csv file and
process it in a new workbook. The new workbook will have the macro to
handle this process. I have a couple questions:

I am assuming a file must be open in order to extract data.

Does the *.csv file have to be activated after the file is open in order
to begin processing data? How can this be done without losing focus
from the new workbook?

Thanks,
GeoK