VBA works for me but not others...

[BenGee]

Hi, the below code works for me however does not work for others. We're all working from the same version of Excel, opening independently the file from the same network location, and I've compared our Trust Centre settings and the same libraries / references have been checked (in VBA > Tools > References).

What am I missing or doing wrong please?

Here's the code;

    Dim pptApp As Object
    Set pptApp = CreateObject("PowerPoint.Application")
   
    With pptApp
        Set ppt = .Presentations.Add
       
        With ppt
    
            Application.CutCopyMode = False
    
            Set newSlide = .slides.Add(.slides.Count + 1, 12)
            ActiveSheet.Range("A17:W51").Copy
            newSlide.Shapes.PasteSpecial DataType:=2
           
            Application.CutCopyMode = False
           
        End With
       
        .Activate
    End With

And the error I get is a run-time error '429' - ActiveX component can't create object against this part;

    Set pptApp = CreateObject("PowerPoint.Application")

Thanks in advance

 

[RoryA]

Do the others have PowerPoint installed and working properly? Which version of Office is it?

 

[BenGee]

The others PowerPoint appears to be installed / working properly - we're using 'Office 365 and office updates'... Though I've seen they're using version 2304 in PowerPoint whereas I'm using version 2305, could this be why?