KNOP save as excel 97 - 2003

[weusty]

Hallo,

ik heb een knop gemaakt in Excel 2010 waarin het venster opslaan als word geopend.

Sub opensavedialog()
     
    Application.Dialogs(xlDialogSaveAs).Show
     
End Sub

Nu wil ik dat er in de balk onderaan bij het filetype automatisch: Opslaan als: Excel 97-2003 werkmap(*.xls) staat geselecteerd.

Ik weet dat ik onder opties/opslaan de instellingen voor de indeling van het opslaan kan standaard kan wijzigen naar excel 97-2003 maar dit is niet de bedoeling.

 

[Roncancio]

Application.StatusBar = "Opslaan als: Excel 97-2003 werkmap(*.xls)"

Met vriendelijke groet,


Roncancio

 

[edmoor]

Hier staat het uitgebreid beschreven:
http://www.rondebruin.nl/saveas.htm

 

[weusty]

Application.StatusBar = "Opslaan als: Excel 97-2003 werkmap(*.xls)"

Werkt niet helaas...

http://www.rondebruin.nl/saveas.htm[/url]

Die had ik al gevonden, maar dat werd me iets te ingewikkeld


Maar ik ben er toch uit gekomen:

Sub DEFAULT_XLS()
'OPSLAAN ALS XLS EXCEL 97-2003

    Application.Dialogs(xlDialogSaveAs).Show , _
    arg2:=xlExcel8

End Sub

Bedankt voor uw hulp!