What I Need:

A Save As dialog box to open to a default path with the current workbook name as the default file name. It can't automatically save because once the default path opens, the user will need to select the appropriate sub-folder based on a set of criteria that is constantly changing (the sub-folders are named with a date range of when they will be "open" for new submissions ... the dates don't exactly have a logical structure behind them).

What I Have:

Application.GetSaveAsFilename InitialFileName:="P:\CORPSALES\ocs_toy_box\CCS_Custom_Product\"
What It's Doing:

The macro opens the Save As dialog box to the appropriate folder, but there is no workbook name automatically entered - to avoid as much human error as possible, I would really like this to default to the name the workbook is already saved under.

Thank you in advance for your help!

Christen