'Model3D property in PowerPoint not showing up in list of references

I need to create a script that validates whether or not the correct view was applied to a 3D model, but the application I am writing the script for does not recognize the Model3DFormat object or the Model3D property under the property ShapeRange that I need to perform this validation.

The version of PowerPoint the application uses acknowledges that 3D models exist, as the 3D models are on the slides in the files used by the application and the Model3D property appears in the Developer tab, but it just seems to be the VBA script validation that doesn't recognize 3D models.

I have tried updating the NuGet packages (latest version showing for Microsoft.Office.Interop.PowerPoint is 15.0.4420.1017, which I have installed to the application) and removing and re-adding the PowerPoint Object library in the references list, but neither seem to have changed anything.

Here is the script I am trying to get working:

Try
Dim rcount As Integer
With Application.ActivePresentation.Slides(3).Shapes(3).Model3D
   If .RotationX = 90 And _
            .RotationY = 300 And _
            .RotationZ = 270 Then
                Return True
        Else
            Return False
        End If
End With

Catch ex As Exception
   Return False
End Try

Image of the Solution Explorer for the application showing the reference list



Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution Source