vba to add slide in powerpoint getting error ActiveX component

Question

I want to add sides in existing PowerPoint but getting an error as ActiveX component can't create object.

Dim p As PowerPoint.Presentation
Set pres1 = Presentations.Add()
p.ApplyTemplate "D:New 2021 templatePPT TEMPLATE 2021 widescreen-2.pptx"
Dim s As Slide
Set s = p.Slides.AddSlide(2, pptLayout)

question from:https://stackoverflow.com/questions/65899012/vba-to-add-slide-in-powerpoint-getting-error-activex-component

Answer 1

Waitting for answers