Results for "save powerpoint presentation"

1 result for this search

Thank you very much it is working !!!!!

Have a nice evening

Hello,

Please find attached an example to test

Public Sub SavePres()

    Dim Opath As String
    Dim Fpath As String
    Dim pptApp As PowerPoint.Application
    Dim oPres As PowerPoint.Presentation

    Opath = Range("C2").Value
    Fpath = Range("C3").Value

    Set pptApp = New PowerPoint.Application
    Set oPres = pptApp.Presentations.Open(Opath)

    pptApp.Visible = True

    oPres.SaveAs Fpath
    oPres.Close

    Set oPres = Nothing

    pptApp.Quit
    Set pptApp = Nothing

End Sub

Bouben

Hello everyone,

With Excel I would like to save a power point presentation. The code I'm using is attached.

I can open the presentation but the code "presentation.save" doesn't work I don't understand why

Do you have any ideas ?

Thank you very much for your help

Clemence

capture