"Save As" dialog box in macro

I have a macro that saves a file in three different locations. I want to have the macro display the "Save As" dialog box so I can verify or change the file name before I save it in the three locations. How do I create a macro that shows the "Save As" dialog box?