convert VBA code from excel to powerpoint

Question

what is the code to add the new slide of power point in last slide not first one

Answer 1

https://docs.microsoft.com/en-ie/office/vba/api/powerpoint.slides.addslide

Public Sub Add_Example()

  Dim ppApp As Object

  Dim ppPres As Object 'Presentation

  Dim pptSlide As Object 'Slide

  Dim pptLayout As Object 'CustomLayout

  Set ppApp = GetObject(, "Powerpoint.Application")

  Set ppPres = ppApp.ActivePresentation

  Set pptLayout = ppPres.Slides(1).CustomLayout

  Set pptSlide = ppPres.Slides.AddSlide(ppPres.Slides.Count + 1, pptLayout)

End Sub