View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
joshroberts joshroberts is offline
external usenet poster
 
Posts: 5
Default Opening a series of files

Can you explain to me how to open each file and make that sheet the
activesheet so I can read through the data with my program? Thanks.

"NickHK" wrote:

Depends how you know which files to open.
If it only some files in a folder you can use:
Dim RetVal As Variant
Application.GetOpenFilename(MultiSelect:=True)
so the user can select all of those of interest

Or if it is all the file in a particular folder
Dim Filename As String
FileName=Dir(RequiredFolder & "\*.xls)
Do While Filename<""
'Do you stuff
FileName=Dir()
Loop

Either way, if you need to process the files in a specific order, you will
need to sort the file names in that order then open them in turn.
If not, then open-process-close as you find them.

NickHK

"joshroberts" wrote in message
...
I have a macro that runs through a series of automatically generated data

and
then calculates utilization. Every day has a different file. I would

like
to set it up to open every file for the month and make the calculations.

Can
you help with this? Thanks.