View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Anders Anders is offline
external usenet poster
 
Posts: 54
Default creating folders one level down

Hi All,

using RDB code to create a subfolder and save a copy in it.

'Create new folder to save the new files in
DateString = Format(Now, "yyyy-mm-dd hh-mm-ss")
FolderName = Sourcewb.Path & "\" & Sourcewb.Name & " " & DateString
MkDir FolderName

Example: saving file 'FTE' in folder 'Update'. This would create subfolders
with timestamp each time I saved it (folder update then would have hundreds
of files in it). I would like to redirect that folder creation to one level
down in a folder named 'archives' (already created) so archives has all of
the files in it and update only has two items. 1. the file FTE, 2. folder
archives.

TIA.

Anders