Make 'Save as' dialog box appear

[daimous]

hi guys! how can make the 'Save as' dialog box appear using macro. Any inputs will be greatly appreciated.

[RobDog888]

In which app? Do you just need to save the workbook or document or save a custom file?

[daimous]

in which app? to any MS office...save? i want the 'Save as' dialog box appear in order for the user to specify his/her own filename and for his/her convient also.

[RobDog888]

But which office app are you using as they have different methods in each.

[daimous]

excel and word.

[RobDog888]

Excel:

Application.GetSaveAsFilename(...
And for Word:

Application.Dialogs(wdDialogFileSaveAs).Show

[daimous]

thanks for that!!!!

[daimous]

wait..i have problem with the dialog box in my excel app..why is it when i save it, say for example in my document, why is it i can find it there..maybe i think the file isn't actually save..can you give me the full syntax for that? currently i have the code below.

Application.GetSaveAsFilename (ThisWorkbook.Name)

[RobDog888]

Heres all the arguments filled in.
Application.GetSaveAsFilename InitialFileName:=ThisWorkbook.Name, FileFilter:="Excel Workbooks (*.xls),*.xls", FilterIndex:=1, Title:="SaveAs Dialog Example"