rename workbook in save as dialog

rename workbook in save as dialog