Hello!

Part of a larger macro contains the following:

ChDir _
"C:\Documents and Settings\My Documents\Flashes\New"
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\My Documents\Flashes\New\Data Total.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

However, I actually want the macro to create a new folder, name it
something, and then proceed to save the workbook in the folder as Data Total.
Is it possible to do that? As it is right now, I have to create a folder
called "New" before running the macro, which isn't that hard, but it is a
small step in a series of steps that I always forget.

Any help would be apprieciated!