Can anyone share code that can be used instead of ActiveWorkbook.Save
to produce the SaveAs routine to provide option to SaveAs a different
file name?

TIA

Mike