VBA - FileDialog SaveAs

[frank387]

Hello,
I wrote a vba macro to help my users to save office documents (word, excel
and powerpoint) to windows sharepoint document libraries.

The macro shows the "save as" filedialog with a InitialFileName as my
sharepoint url.

It works fine with word and excel, but I have a problem in powerpoint with
document libraries with mandory fields (without mandory fields, the
presentation will be saved)

When I save a document in excel or word in a document library with mandory
fields, then a popup windows (webdialog) appears with my mandory fields to
input.

When I save a powerpoint presentation in a document library with mandory
fields,
the popup windows doesn't appear and the presentation will not save.

There is no error message in my vba code

vba code
========
Dim dlgSaveAs As FileDialog
Dim strPath As String

Set Pres = ActivePresentation
Set dlgSaveAs = Pres.Application.FileDialog(msoFileDialogSaveAs)

With dlgSaveAs
.InitialFileName = "http://SERVERNAME/SHAREPOINT_SITE/"
.Show
.Execute

End With


Is there an alternativ methode.

Best regards

Frank

 

[Vincnet.]

Hello,
I'm sorry I have no answer for you...
I have written such macros to help users to save their documents (worf and
excel so far) under a standardised name. In Excel and Word, it works
perfectly, and the macro are run when the user uses the Ctrl+s shortcut.
Within Powerpoint, I haven't figured out - yet - how to link a shortcut and
a macro (add-in or not). If you have any idea to do such a thing, please let
me know.
Thanks...

Regards,