Save As 97-2003 workbook
I am using Application.Dialogs(xlDialogSaveAs).Show in a macro to prompt the
user with the Save as dialog box. This defaults to Excel 2007 format in the Save as type window but I need it to default to the Excel 97-2003 format. Is there a way to do this so that the end user may send the workbook out to users who still use the Excel 97-2003 format? I know they can manually change it but they forget too and the SaveAs Box functionality required. Thanks for your time. |
Save As 97-2003 workbook
Try code like
Dim FName As Variant FName = Application.GetSaveAsFilename( _ filefilter:="Excel 97-2003 Files (*.xls),*.xls") If FName = False Then ' user cancel Exit Sub End If ThisWorkbook.SaveAs FName, xlExcel8 Cordially, Chip Pearson Microsoft MVP 1998 - 2010 Pearson Software Consulting, LLC www.cpearson.com [email on web site] On Wed, 27 Jan 2010 10:42:03 -0800, ThatGuy wrote: I am using Application.Dialogs(xlDialogSaveAs).Show in a macro to prompt the user with the Save as dialog box. This defaults to Excel 2007 format in the Save as type window but I need it to default to the Excel 97-2003 format. Is there a way to do this so that the end user may send the workbook out to users who still use the Excel 97-2003 format? I know they can manually change it but they forget too and the SaveAs Box functionality required. Thanks for your time. |
All times are GMT +1. The time now is 11:38 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com