Change the type of document to save in File Save As

Posted by Kurt on July 19, 2000 5:51 PM

Hello,

Is there any way to change the default in the File
Save As dialog box? Instead of .xls can it be changed
so that you can save *.* (All File Types) every time.

Is there a hack for the registry or some other method
for this?

Thanks,

Kurt

Posted by Ryan on July 20, 0100 11:08 AM

Here you go Kurt!

Sub SaveAs
Dim Filter As String

Filter = "Excel Document,*.xls,Text,*.txt,...."
' This filter can use any number of file types, the name that you chose for the file type goes first, then the files extension.

SaveName = Application.GetSaveAsFilename(FileFilter:=Filter)
ActiveWorkbook.SaveAs SaveName
End Sub

Posted by Kurt on July 20, 0100 12:17 PM

Thanks again!!

Kurt