Enregistrer PPT en tant que PNG sans "Exporter" VBA

Question

Existe-t-il un moyen d'enregistrer une seule diapositive en tant qu'image PNG avec VBA qui n'utilise pas Slides (#). J'essaye de sauver l'image directement à SharePoint mais l'exportation provoque une erreur si je fais l'emplacement de sauvegarde n'importe où à côté de ma machine. Je sais qu'il est possible d'enregistrer directement sur SharePoint en tant qu'image car je peux cliquer sur le menu Enregistrer sous, mais je ne peux pas répliquer avec VBA.

Application.FileDialog(msoFileDialogSaveAs _ 
    ).InitialFileName = "https://home.thesite.com/sample" 
intChoice = Application.FileDialog(msoFileDialogSaveAs).Show 
    If intChoice <> 0 Then 

     sImagePath = Application.FileDialog(msoFileDialogSaveAs _ 
     ).SelectedItems(1) 

    Else 
     MsgBox "Action Cancelled" 
     Exit Sub 

    End If 

CurSlide = ActiveWindow.Selection.SlideRange.SlideIndex 
ActivePresentation.Slides(CurSlide).Export sImagePath, "PNG" 

Answer 1

Turns sur l'exportation ne fonctionnera que si le lien est modifié de sorte qu'au lieu de

"https://home.thesite.com/sample" 

son

"\\home.thesite.com@SSL\DavWWWRoot\sample"