View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Fatz Fatz is offline
external usenet poster
 
Posts: 8
Default Application.FileSearch Problems

On May 22, 4:31*pm, "Ron de Bruin" wrote:
Hi Hi Fatz

What do you want to do with the files ?

--

Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm

"Fatz" wrote in ...

On May 22, 3:38 pm, "Ron de Bruin" wrote:





Hi Fatz


This is removed from 2007
You can use Dir


See how i use it on this pagehttp://www.rondebruin.nl/copy3.htm


--


Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm


"Fatz" wrote in ...
Hi-


I just upgraded to Office '07 and I am having trouble with some code.
The following code works in 97 but does not work in 2007.


With Application.FileSearch
.NewSearch
.LookIn = "N:\Sales\MAP ROLLUP"
.SearchSubFolders = False
.Filename = "*.xls"
.Execute


Does anyone know how to code the above in 2007?


Thank You!


Chris- Hide quoted text -


- Show quoted text -


Ron - Thanks for your help. *I will be 100% honest and let you know
that I do not understand a thing on that site! *I am a VBA rookie.
Can you copy and paste the section I should be looking at?

Thanks Again,
Chris- Hide quoted text -

- Show quoted text -


The current macro loops through each Excel file that is in a
particular folder and applies Functions I have written. It works
beautifully in 97.

I just need code that will replace this:

With Application.FileSearch
.NewSearch
.LookIn = "N:\Sales\MAP ROLLUP"
.SearchSubFolders = False
.Filename = "*.xls"
.Execute

Application.FileSearch kicked ass for me in 97.......not sure what
problems others had.....

Thanks for helping me through this.

Chris