ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   creating folders one level down (https://www.excelbanter.com/excel-programming/431034-creating-folders-one-level-down.html)

Anders

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

Bob Phillips[_3_]

creating folders one level down
 
FolderName = Sourcewb.Path & "\archives\" & Sourcewb.Name & " " & DateString

--
__________________________________
HTH

Bob

"Anders" wrote in message
...
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





All times are GMT +1. The time now is 10:56 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com