View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Sandy Sandy is offline
external usenet poster
 
Posts: 270
Default Test for files existing

Hi,
I have the following code courtesy of this newsgroup; what I would like to
do is check the destination folder to see if there are two files - both
..doc. if so then skip copying them since they are already there from a
previous run.

How do I check the destination folder for these files?
Thanks in advance
Sandy

MyDest = "C:\Users\Sandy\Documents\AAPGA\" _
& inputText & "\Personal Data-" & inputText & "\"

MySource = "C:\Users\Sandy\Documents\Extras\"

fn = Dir(MySource & "*.doc")

Do While fn < ""
FileCopy MySource & fn, MyDest & fn
fn = Dir()
Loop