Announcement

Collapse
No announcement yet.

Powerpoit

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Powerpoit

    Hi,

    I try to open a Powerpoint presentation but nothing append, base on the work of Ryan Mott http://powerbasic.com/support/pbforu...ad.php?t=38510

    Powerpoint is opennig but the file never open, any idea what I forget?

    Regard

    Code:
    #COMPILE EXE
    #DIM ALL
    
        #INCLUDE "WIN32API.INC"
        #INCLUDE "oPowerPoint11.inc"
    
    FUNCTION PBMAIN () AS LONG
        LOCAL oApp AS Int__Application
        LOCAL oPresentation AS Int__Presentation
        LOCAL oSettings AS SlideShowSettings
    
        LOCAL File AS STRING
    
        oApp = NEWCOM $PROGID_PowerPoint_Application
    
        IF ISFALSE ISOBJECT(oApp) THEN
            MSGBOX "Unable to open or start PowerPoint."
            EXIT FUNCTION
        END IF
    
        ' Set the application to visible and maximize
        oApp.visible = 1
        oApp.windowstate = %ppWindowMaximized
    
        File = "C:\temp\test.ppt"
        SET oPresentation = oApp.Presentations.open(File)
    
        '====RUN THE SLIDE SHOW====
        oSettings = oPresentation.SlideShowSettings
        oSettings.StartingSlide = 1
        oSettings.EndingSlide = 2
        oSettings.Run()
    END FUNCTION

    Code:
    ' Generated by: PowerBASIC COM Browser v.2.00.0058
    ' DateTime    : 9/6/2008 at 12:40 PM
    ' ------------------------------------------------
    ' Library Name: PowerPoint
    ' Library File: C:\Program Files\Microsoft Office\OFFICE11\MSPPT.OLB
    ' Description : Microsoft PowerPoint 11.0 Object Library
    ' Help File : C:\Program Files\Microsoft Office\OFFICE11\VBAPP10.CHM
    ' Help Context : 0
    ' GUID : {91493440-5A91-11CF-8700-00AA0060263B}
    ' LCID : 0
    ' Version : 2.8
    
    ' Version Dependant ProgID's
    $PROGID_PowerPoint_Application11 = "PowerPoint.Application.11"
    
    ' Version Independant ProgID's
    $PROGID_PowerPoint_Application = "PowerPoint.Application"
    
    ' Class Indentifiers
    $CLSID_PowerPoint_Application = GUID$("{91493441-5A91-11CF-8700-00AA0060263B}")
    $CLSID_PowerPoint_Event_EApplication = GUID$("{0E636440-3D00-4CFB-A7A4-7B2DB45FC997}")
    $CLSID_PowerPoint_Global = GUID$("{91493443-5A91-11CF-8700-00AA0060263B}")
    $CLSID_PowerPoint_Presentation = GUID$("{91493444-5A91-11CF-8700-00AA0060263B}")
    $CLSID_PowerPoint_Event_PresEvents = GUID$("{5150F003-03E7-4C7D-9297-E9DCF3EC3F3C}")
    $CLSID_PowerPoint_Slide = GUID$("{91493445-5A91-11CF-8700-00AA0060263B}")
    $CLSID_PowerPoint_Event_SldEvents = GUID$("{9F112026-70A8-4038-AF16-7EBD98920E09}")
    $CLSID_PowerPoint_OLEControl = GUID$("{91493446-5A91-11CF-8700-00AA0060263B}")
    $CLSID_PowerPoint_Event_OCXExtenderEvents = GUID$("{1D42238F-CBCF-4BAC-B06E-53171532E65B}")
    $CLSID_PowerPoint_Master = GUID$("{91493447-5A91-11CF-8700-00AA0060263B}")
    $CLSID_PowerPoint_Event_MasterEvents = GUID$("{B13AC93A-EE92-4BAC-B4C6-4932713DF2F6}")
    $CLSID_PowerPoint_PowerRex = GUID$("{91493448-5A91-11CF-8700-00AA0060263B}")
    
    ' Interface Indentifiers
    $IID_PowerPoint_Collection = GUID$("{91493450-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int__Application = GUID$("{91493442-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int__Global = GUID$("{91493451-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ColorFormat = GUID$("{91493452-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SlideShowWindow = GUID$("{91493453-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Selection = GUID$("{91493454-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_DocumentWindows = GUID$("{91493455-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SlideShowWindows = GUID$("{91493456-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_DocumentWindow = GUID$("{91493457-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_View = GUID$("{91493458-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SlideShowView = GUID$("{91493459-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SlideShowSettings = GUID$("{9149345A-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_NamedSlideShows = GUID$("{9149345B-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_NamedSlideShow = GUID$("{9149345C-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PrintOptions = GUID$("{9149345D-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PrintRanges = GUID$("{9149345E-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PrintRange = GUID$("{9149345F-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AddIns = GUID$("{91493460-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AddIn = GUID$("{91493461-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Presentations = GUID$("{91493462-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PresEvents = GUID$("{91493463-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Hyperlinks = GUID$("{91493464-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Hyperlink = GUID$("{91493465-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PageSetup = GUID$("{91493466-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Fonts = GUID$("{91493467-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ExtraColors = GUID$("{91493468-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Slides = GUID$("{91493469-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int__Slide = GUID$("{9149346A-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SlideRange = GUID$("{9149346B-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int__Master = GUID$("{9149346C-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SldEvents = GUID$("{9149346D-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ColorSchemes = GUID$("{9149346E-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ColorScheme = GUID$("{9149346F-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_RGBColor = GUID$("{91493470-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SlideShowTransition = GUID$("{91493471-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SoundEffect = GUID$("{91493472-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SoundFormat = GUID$("{91493473-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_HeadersFooters = GUID$("{91493474-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Shapes = GUID$("{91493475-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Placeholders = GUID$("{91493476-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PlaceholderFormat = GUID$("{91493477-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_FreeformBuilder = GUID$("{91493478-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Shape = GUID$("{91493479-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ShapeRange = GUID$("{9149347A-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_GroupShapes = GUID$("{9149347B-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Adjustments = GUID$("{9149347C-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PictureFormat = GUID$("{9149347D-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_FillFormat = GUID$("{9149347E-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_LineFormat = GUID$("{9149347F-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ShadowFormat = GUID$("{91493480-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ConnectorFormat = GUID$("{91493481-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextEffectFormat = GUID$("{91493482-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ThreeDFormat = GUID$("{91493483-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextFrame = GUID$("{91493484-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_CalloutFormat = GUID$("{91493485-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ShapeNodes = GUID$("{91493486-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ShapeNode = GUID$("{91493487-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_OLEFormat = GUID$("{91493488-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_LinkFormat = GUID$("{91493489-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ObjectVerbs = GUID$("{9149348A-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AnimationSettings = GUID$("{9149348B-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ActionSettings = GUID$("{9149348C-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ActionSetting = GUID$("{9149348D-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PlaySettings = GUID$("{9149348E-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextRange = GUID$("{9149348F-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Ruler = GUID$("{91493490-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_RulerLevels = GUID$("{91493491-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_RulerLevel = GUID$("{91493492-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TabStops = GUID$("{91493493-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TabStop = GUID$("{91493494-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int_Font = GUID$("{91493495-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ParagraphFormat = GUID$("{91493496-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_BulletFormat = GUID$("{91493497-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextStyles = GUID$("{91493498-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextStyle = GUID$("{91493499-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextStyleLevels = GUID$("{9149349A-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TextStyleLevel = GUID$("{9149349B-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_HeaderFooter = GUID$("{9149349C-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int__Presentation = GUID$("{9149349D-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Tags = GUID$("{914934B9-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_MouseTracker = GUID$("{914934BE-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_MouseDownHandler = GUID$("{914934BF-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_OCXExtender = GUID$("{914934C0-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_OCXExtenderEvents = GUID$("{914934C1-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_EApplication = GUID$("{914934C2-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Table = GUID$("{914934C3-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Columns = GUID$("{914934C4-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Column = GUID$("{914934C5-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Rows = GUID$("{914934C6-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Row = GUID$("{914934C7-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_CellRange = GUID$("{914934C8-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Cell = GUID$("{914934C9-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Borders = GUID$("{914934CA-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Panes = GUID$("{914934CB-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Pane = GUID$("{914934CC-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_DefaultWebOptions = GUID$("{914934CD-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_WebOptions = GUID$("{914934CE-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PublishObjects = GUID$("{914934CF-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PublishObject = GUID$("{914934D0-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_MasterEvents = GUID$("{914934D2-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Int__PowerRex = GUID$("{914934D3-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Comments = GUID$("{914934D4-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Comment = GUID$("{914934D5-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Designs = GUID$("{914934D6-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Design = GUID$("{914934D7-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_DiagramNode = GUID$("{914934D8-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_DiagramNodeChildren = GUID$("{914934D9-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_DiagramNodes = GUID$("{914934DA-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Diagram = GUID$("{914934DB-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_TimeLine = GUID$("{914934DC-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Sequences = GUID$("{914934DD-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Sequence = GUID$("{914934DE-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Effect = GUID$("{914934DF-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Timing = GUID$("{914934E0-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_EffectParameters = GUID$("{914934E1-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_EffectInformation = GUID$("{914934E2-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AnimationBehaviors = GUID$("{914934E3-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AnimationBehavior = GUID$("{914934E4-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_MotionEffect = GUID$("{914934E5-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ColorEffect = GUID$("{914934E6-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_ScaleEffect = GUID$("{914934E7-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_RotationEffect = GUID$("{914934E8-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_PropertyEffect = GUID$("{914934E9-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AnimationPoints = GUID$("{914934EA-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AnimationPoint = GUID$("{914934EB-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_CanvasShapes = GUID$("{914934EC-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_AutoCorrect = GUID$("{914934ED-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_Options = GUID$("{914934EE-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_CommandEffect = GUID$("{914934EF-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_FilterEffect = GUID$("{914934F0-5A91-11CF-8700-00AA0060263B}")
    $IID_PowerPoint_SetEffect = GUID$("{914934F1-5A91-11CF-8700-00AA0060263B}")
    
    ' PpWindowState enumeration
    %ppWindowNormal = 1
    %ppWindowMinimized = 2
    %ppWindowMaximized = 3
    
    
    ' PpArrangeStyle enumeration
    %ppArrangeTiled = 1
    %ppArrangeCascade = 2
    
    ' PpViewType enumeration
    %ppViewSlide = 1
    %ppViewSlideMaster = 2
    %ppViewNotesPage = 3
    %ppViewHandoutMaster = 4
    %ppViewNotesMaster = 5
    %ppViewOutline = 6
    %ppViewSlideSorter = 7
    %ppViewTitleMaster = 8
    %ppViewNormal = 9
    %ppViewPrintPreview = 10
    %ppViewThumbnails = 11
    %ppViewMasterThumbnails = 12
    
    ' PpColorSchemeIndex enumeration
    %ppSchemeColorMixed = -2
    %ppNotSchemeColor = 0
    %ppBackground = 1
    %ppForeground = 2
    %ppShadow = 3
    %ppTitle = 4
    %ppFill = 5
    %ppAccent1 = 6
    %ppAccent2 = 7
    %ppAccent3 = 8
    
    ' PpSlideSizeType enumeration
    %ppSlideSizeOnScreen = 1
    %ppSlideSizeLetterPaper = 2
    %ppSlideSizeA4Paper = 3
    %ppSlideSize35MM = 4
    %ppSlideSizeOverhead = 5
    %ppSlideSizeBanner = 6
    %ppSlideSizeCustom = 7
    %ppSlideSizeLedgerPaper = 8
    %ppSlideSizeA3Paper = 9
    %ppSlideSizeB4ISOPaper = 10
    %ppSlideSizeB5ISOPaper = 11
    %ppSlideSizeB4JISPaper = 12
    %ppSlideSizeB5JISPaper = 13
    %ppSlideSizeHagakiCard = 14
    
    ' PpSaveAsFileType enumeration
    %ppSaveAsPresentation = 1
    %ppSaveAsPowerPoint7 = 2
    %ppSaveAsPowerPoint4 = 3
    %ppSaveAsPowerPoint3 = 4
    %ppSaveAsTemplate = 5
    %ppSaveAsRTF = 6
    %ppSaveAsShow = 7
    %ppSaveAsAddIn = 8
    %ppSaveAsPowerPoint4FarEast = 10
    %ppSaveAsDefault = 11
    %ppSaveAsHTML = 12
    %ppSaveAsHTMLv3 = 13
    %ppSaveAsHTMLDual = 14
    %ppSaveAsMetaFile = 15
    %ppSaveAsGIF = 16
    %ppSaveAsJPG = 17
    %ppSaveAsPNG = 18
    %ppSaveAsBMP = 19
    %ppSaveAsWebArchive = 20
    %ppSaveAsTIF = 21
    %ppSaveAsPresForReview = 22
    %ppSaveAsEMF = 23
    
    ' PpTextStyleType enumeration
    %ppDefaultStyle = 1
    %ppTitleStyle = 2
    %ppBodyStyle = 3
    
    ' PpSlideLayout enumeration
    %ppLayoutMixed = -2
    %ppLayoutTitle = 1
    %ppLayoutText = 2
    %ppLayoutTwoColumnText = 3
    %ppLayoutTable = 4
    %ppLayoutTextAndChart = 5
    %ppLayoutChartAndText = 6
    %ppLayoutOrgchart = 7
    %ppLayoutChart = 8
    %ppLayoutTextAndClipart = 9
    %ppLayoutClipartAndText = 10
    %ppLayoutTitleOnly = 11
    %ppLayoutBlank = 12
    %ppLayoutTextAndObject = 13
    %ppLayoutObjectAndText = 14
    %ppLayoutLargeObject = 15
    %ppLayoutObject = 16
    %ppLayoutTextAndMediaClip = 17
    %ppLayoutMediaClipAndText = 18
    %ppLayoutObjectOverText = 19
    %ppLayoutTextOverObject = 20
    %ppLayoutTextAndTwoObjects = 21
    %ppLayoutTwoObjectsAndText = 22
    %ppLayoutTwoObjectsOverText = 23
    %ppLayoutFourObjects = 24
    %ppLayoutVerticalText = 25
    %ppLayoutClipArtAndVerticalText = 26
    %ppLayoutVerticalTitleAndText = 27
    %ppLayoutVerticalTitleAndTextOverChart = 28
    %ppLayoutTwoObjects = 29
    %ppLayoutObjectAndTwoObjects = 30
    %ppLayoutTwoObjectsAndObject = 31
    
    ' PpEntryEffect enumeration
    %ppEffectMixed = -2
    %ppEffectNone = 0
    %ppEffectCut = 257
    %ppEffectCutThroughBlack = 258
    %ppEffectRandom = 513
    %ppEffectBlindsHorizontal = 769
    %ppEffectBlindsVertical = 770
    %ppEffectCheckerboardAcross = 1025
    %ppEffectCheckerboardDown = 1026
    %ppEffectCoverLeft = 1281
    %ppEffectCoverUp = 1282
    %ppEffectCoverRight = 1283
    %ppEffectCoverDown = 1284
    %ppEffectCoverLeftUp = 1285
    %ppEffectCoverRightUp = 1286
    %ppEffectCoverLeftDown = 1287
    %ppEffectCoverRightDown = 1288
    %ppEffectDissolve = 1537
    %ppEffectFade = 1793
    %ppEffectUncoverLeft = 2049
    %ppEffectUncoverUp = 2050
    %ppEffectUncoverRight = 2051
    %ppEffectUncoverDown = 2052
    %ppEffectUncoverLeftUp = 2053
    %ppEffectUncoverRightUp = 2054
    %ppEffectUncoverLeftDown = 2055
    %ppEffectUncoverRightDown = 2056
    %ppEffectRandomBarsHorizontal = 2305
    %ppEffectRandomBarsVertical = 2306
    %ppEffectStripsUpLeft = 2561
    %ppEffectStripsUpRight = 2562
    %ppEffectStripsDownLeft = 2563
    %ppEffectStripsDownRight = 2564
    %ppEffectStripsLeftUp = 2565
    %ppEffectStripsRightUp = 2566
    %ppEffectStripsLeftDown = 2567
    %ppEffectStripsRightDown = 2568
    %ppEffectWipeLeft = 2817
    %ppEffectWipeUp = 2818
    %ppEffectWipeRight = 2819
    %ppEffectWipeDown = 2820
    %ppEffectBoxOut = 3073
    %ppEffectBoxIn = 3074
    %ppEffectFlyFromLeft = 3329
    %ppEffectFlyFromTop = 3330
    %ppEffectFlyFromRight = 3331
    %ppEffectFlyFromBottom = 3332
    %ppEffectFlyFromTopLeft = 3333
    %ppEffectFlyFromTopRight = 3334
    %ppEffectFlyFromBottomLeft = 3335
    %ppEffectFlyFromBottomRight = 3336
    %ppEffectPeekFromLeft = 3337
    %ppEffectPeekFromDown = 3338
    %ppEffectPeekFromRight = 3339
    %ppEffectPeekFromUp = 3340
    %ppEffectCrawlFromLeft = 3341
    %ppEffectCrawlFromUp = 3342
    %ppEffectCrawlFromRight = 3343
    %ppEffectCrawlFromDown = 3344
    %ppEffectZoomIn = 3345
    %ppEffectZoomInSlightly = 3346
    %ppEffectZoomOut = 3347
    %ppEffectZoomOutSlightly = 3348
    %ppEffectZoomCenter = 3349
    %ppEffectZoomBottom = 3350
    %ppEffectStretchAcross = 3351
    %ppEffectStretchLeft = 3352
    %ppEffectStretchUp = 3353
    %ppEffectStretchRight = 3354
    %ppEffectStretchDown = 3355
    %ppEffectSwivel = 3356
    %ppEffectSpiral = 3357
    %ppEffectSplitHorizontalOut = 3585
    %ppEffectSplitHorizontalIn = 3586
    %ppEffectSplitVerticalOut = 3587
    %ppEffectSplitVerticalIn = 3588
    %ppEffectFlashOnceFast = 3841
    %ppEffectFlashOnceMedium = 3842
    %ppEffectFlashOnceSlow = 3843
    %ppEffectAppear = 3844
    %ppEffectCircleOut = 3845
    %ppEffectDiamondOut = 3846
    %ppEffectCombHorizontal = 3847
    %ppEffectCombVertical = 3848
    %ppEffectFadeSmoothly = 3849
    %ppEffectNewsflash = 3850
    %ppEffectPlusOut = 3851
    %ppEffectPushDown = 3852
    %ppEffectPushLeft = 3853
    %ppEffectPushRight = 3854
    %ppEffectPushUp = 3855
    %ppEffectWedge = 3856
    %ppEffectWheel1Spoke = 3857
    %ppEffectWheel2Spokes = 3858
    %ppEffectWheel3Spokes = 3859
    %ppEffectWheel4Spokes = 3860
    %ppEffectWheel8Spokes = 3861
    
    ' PpTextLevelEffect enumeration
    %ppAnimateLevelMixed = -2
    %ppAnimateLevelNone = 0
    %ppAnimateByFirstLevel = 1
    %ppAnimateBySecondLevel = 2
    %ppAnimateByThirdLevel = 3
    %ppAnimateByFourthLevel = 4
    %ppAnimateByFifthLevel = 5
    %ppAnimateByAllLevels = 16
    
    ' PpTextUnitEffect enumeration
    %ppAnimateUnitMixed = -2
    %ppAnimateByParagraph = 0
    %ppAnimateByWord = 1
    %ppAnimateByCharacter = 2
    
    ' PpChartUnitEffect enumeration
    %ppAnimateChartMixed = -2
    %ppAnimateBySeries = 1
    %ppAnimateByCategory = 2
    %ppAnimateBySeriesElements = 3
    %ppAnimateByCategoryElements = 4
    %ppAnimateChartAllAtOnce = 5
    
    ' PpAfterEffect enumeration
    %ppAfterEffectMixed = -2
    %ppAfterEffectNothing = 0
    %ppAfterEffectHide = 1
    %ppAfterEffectDim = 2
    %ppAfterEffectHideOnClick = 3
    
    ' PpAdvanceMode enumeration
    %ppAdvanceModeMixed = -2
    %ppAdvanceOnClick = 1
    %ppAdvanceOnTime = 2
    
    ' PpSoundEffectType enumeration
    %ppSoundEffectsMixed = -2
    %ppSoundNone = 0
    %ppSoundStopPrevious = 1
    %ppSoundFile = 2
    
    ' PpFollowColors enumeration
    %ppFollowColorsMixed = -2
    %ppFollowColorsNone = 0
    %ppFollowColorsScheme = 1
    %ppFollowColorsTextAndBackground = 2
    
    ' PpUpdateOption enumeration
    %ppUpdateOptionMixed = -2
    %ppUpdateOptionManual = 1
    %ppUpdateOptionAutomatic = 2
    
    ' PpParagraphAlignment enumeration
    %ppAlignmentMixed = -2
    %ppAlignLeft = 1
    %ppAlignCenter = 2
    %ppAlignRight = 3
    %ppAlignJustify = 4
    %ppAlignDistribute = 5
    %ppAlignThaiDistribute = 6
    %ppAlignJustifyLow = 7
    
    ' PpBaselineAlignment enumeration
    %ppBaselineAlignMixed = -2
    %ppBaselineAlignBaseline = 1
    %ppBaselineAlignTop = 2
    %ppBaselineAlignCenter = 3
    %ppBaselineAlignFarEast50 = 4
    
    ' PpTabStopType enumeration
    %ppTabStopMixed = -2
    %ppTabStopLeft = 1
    %ppTabStopCenter = 2
    %ppTabStopRight = 3
    %ppTabStopDecimal = 4
    
    ' PpIndentControl enumeration
    %ppIndentControlMixed = -2
    %ppIndentReplaceAttr = 1
    %ppIndentKeepAttr = 2
    
    ' PpChangeCase enumeration
    %ppCaseSentence = 1
    %ppCaseLower = 2
    %ppCaseUpper = 3
    %ppCaseTitle = 4
    %ppCaseToggle = 5
    
    ' PpSlideShowPointerType enumeration
    %ppSlideShowPointerNone = 0
    %ppSlideShowPointerArrow = 1
    %ppSlideShowPointerPen = 2
    %ppSlideShowPointerAlwaysHidden = 3
    %ppSlideShowPointerAutoArrow = 4
    %ppSlideShowPointerEraser = 5
    
    ' PpSlideShowState enumeration
    %ppSlideShowRunning = 1
    %ppSlideShowPaused = 2
    %ppSlideShowBlackScreen = 3
    %ppSlideShowWhiteScreen = 4
    %ppSlideShowDone = 5
    
    ' PpSlideShowAdvanceMode enumeration
    %ppSlideShowManualAdvance = 1
    %ppSlideShowUseSlideTimings = 2
    %ppSlideShowRehearseNewTimings = 3
    
    ' PpFileDialogType enumeration
    %ppFileDialogOpen = 1
    %ppFileDialogSave = 2
    
    ' PpPrintOutputType enumeration
    %ppPrintOutputSlides = 1
    %ppPrintOutputTwoSlideHandouts = 2
    %ppPrintOutputThreeSlideHandouts = 3
    %ppPrintOutputSixSlideHandouts = 4
    %ppPrintOutputNotesPages = 5
    %ppPrintOutputOutline = 6
    %ppPrintOutputBuildSlides = 7
    %ppPrintOutputFourSlideHandouts = 8
    %ppPrintOutputNineSlideHandouts = 9
    %ppPrintOutputOneSlideHandouts = 10
    
    ' PpPrintHandoutOrder enumeration
    %ppPrintHandoutVerticalFirst = 1
    %ppPrintHandoutHorizontalFirst = 2
    
    ' PpPrintColorType enumeration
    %ppPrintColor = 1
    %ppPrintBlackAndWhite = 2
    %ppPrintPureBlackAndWhite = 3
    
    ' PpSelectionType enumeration
    %ppSelectionNone = 0
    %ppSelectionSlides = 1
    %ppSelectionShapes = 2
    %ppSelectionText = 3
    
    ' PpDirection enumeration
    %ppDirectionMixed = -2
    %ppDirectionLeftToRight = 1
    %ppDirectionRightToLeft = 2
    
    ' PpDateTimeFormat enumeration
    %ppDateTimeFormatMixed = -2
    %ppDateTimeMdyy = 1
    %ppDateTimeddddMMMMddyyyy = 2
    %ppDateTimedMMMMyyyy = 3
    %ppDateTimeMMMMdyyyy = 4
    %ppDateTimedMMMyy = 5
    %ppDateTimeMMMMyy = 6
    %ppDateTimeMMyy = 7
    %ppDateTimeMMddyyHmm = 8
    %ppDateTimeMMddyyhmmAMPM = 9
    %ppDateTimeHmm = 10
    %ppDateTimeHmmss = 11
    %ppDateTimehmmAMPM = 12
    %ppDateTimehmmssAMPM = 13
    %ppDateTimeFigureOut = 14
    
    ' PpTransitionSpeed enumeration
    %ppTransitionSpeedMixed = -2
    %ppTransitionSpeedSlow = 1
    %ppTransitionSpeedMedium = 2
    %ppTransitionSpeedFast = 3
    
    ' PpMouseActivation enumeration
    %ppMouseClick = 1
    %ppMouseOver = 2
    
    ' PpActionType enumeration
    %ppActionMixed = -2
    %ppActionNone = 0
    %ppActionNextSlide = 1
    %ppActionPreviousSlide = 2
    %ppActionFirstSlide = 3
    %ppActionLastSlide = 4
    %ppActionLastSlideViewed = 5
    %ppActionEndShow = 6
    %ppActionHyperlink = 7
    %ppActionRunMacro = 8
    %ppActionRunProgram = 9
    %ppActionNamedSlideShow = 10
    %ppActionOLEVerb = 11
    %ppActionPlay = 12
    
    ' PpPlaceholderType enumeration
    %ppPlaceholderMixed = -2
    %ppPlaceholderTitle = 1
    %ppPlaceholderBody = 2
    %ppPlaceholderCenterTitle = 3
    %ppPlaceholderSubtitle = 4
    %ppPlaceholderVerticalTitle = 5
    %ppPlaceholderVerticalBody = 6
    %ppPlaceholderObject = 7
    %ppPlaceholderChart = 8
    %ppPlaceholderBitmap = 9
    %ppPlaceholderMediaClip = 10
    %ppPlaceholderOrgChart = 11
    %ppPlaceholderTable = 12
    %ppPlaceholderSlideNumber = 13
    %ppPlaceholderHeader = 14
    %ppPlaceholderFooter = 15
    %ppPlaceholderDate = 16
    
    ' PpSlideShowType enumeration
    %ppShowTypeSpeaker = 1
    %ppShowTypeWindow = 2
    %ppShowTypeKiosk = 3
    
    ' PpPrintRangeType enumeration
    %ppPrintAll = 1
    %ppPrintSelection = 2
    %ppPrintCurrent = 3
    %ppPrintSlideRange = 4
    %ppPrintNamedSlideShow = 5
    
    ' PpAutoSize enumeration
    %ppAutoSizeMixed = -2
    %ppAutoSizeNone = 0
    %ppAutoSizeShapeToFitText = 1
    
    ' PpMediaType enumeration
    %ppMediaTypeMixed = -2
    %ppMediaTypeOther = 1
    %ppMediaTypeSound = 2
    %ppMediaTypeMovie = 3
    
    ' PpSoundFormatType enumeration
    %ppSoundFormatMixed = -2
    %ppSoundFormatNone = 0
    %ppSoundFormatWAV = 1
    %ppSoundFormatMIDI = 2
    %ppSoundFormatCDAudio = 3
    
    ' PpFarEastLineBreakLevel enumeration
    %ppFarEastLineBreakLevelNormal = 1
    %ppFarEastLineBreakLevelStrict = 2
    %ppFarEastLineBreakLevelCustom = 3
    
    ' PpSlideShowRangeType enumeration
    %ppShowAll = 1
    %ppShowSlideRange = 2
    %ppShowNamedSlideShow = 3
    
    ' PpFrameColors enumeration
    %ppFrameColorsBrowserColors = 1
    %ppFrameColorsPresentationSchemeTextColor = 2
    %ppFrameColorsPresentationSchemeAccentColor = 3
    %ppFrameColorsWhiteTextOnBlack = 4
    %ppFrameColorsBlackTextOnWhite = 5
    
    ' PpBorderType enumeration
    %ppBorderTop = 1
    %ppBorderLeft = 2
    %ppBorderBottom = 3
    %ppBorderRight = 4
    %ppBorderDiagonalDown = 5
    %ppBorderDiagonalUp = 6
    
    ' PpHTMLVersion enumeration
    %ppHTMLv3 = 1
    %ppHTMLv4 = 2
    %ppHTMLDual = 3
    %ppHTMLAutodetect = 4
    
    ' PpPublishSourceType enumeration
    %ppPublishAll = 1
    %ppPublishSlideRange = 2
    %ppPublishNamedSlideShow = 3
    
    ' PpBulletType enumeration
    %ppBulletMixed = -2
    %ppBulletNone = 0
    %ppBulletUnnumbered = 1
    %ppBulletNumbered = 2
    %ppBulletPicture = 3
    
    ' PpNumberedBulletStyle enumeration
    %ppBulletStyleMixed = -2
    %ppBulletAlphaLCPeriod = 0
    %ppBulletAlphaUCPeriod = 1
    %ppBulletArabicParenRight = 2
    %ppBulletArabicPeriod = 3
    %ppBulletRomanLCParenBoth = 4
    %ppBulletRomanLCParenRight = 5
    %ppBulletRomanLCPeriod = 6
    %ppBulletRomanUCPeriod = 7
    %ppBulletAlphaLCParenBoth = 8
    %ppBulletAlphaLCParenRight = 9
    %ppBulletAlphaUCParenBoth = 10
    %ppBulletAlphaUCParenRight = 11
    %ppBulletArabicParenBoth = 12
    %ppBulletArabicPlain = 13
    %ppBulletRomanUCParenBoth = 14
    %ppBulletRomanUCParenRight = 15
    %ppBulletSimpChinPlain = 16
    %ppBulletSimpChinPeriod = 17
    %ppBulletCircleNumDBPlain = 18
    %ppBulletCircleNumWDWhitePlain = 19
    %ppBulletCircleNumWDBlackPlain = 20
    %ppBulletTradChinPlain = 21
    %ppBulletTradChinPeriod = 22
    %ppBulletArabicAlphaDash = 23
    %ppBulletArabicAbjadDash = 24
    %ppBulletHebrewAlphaDash = 25
    %ppBulletKanjiKoreanPlain = 26
    %ppBulletKanjiKoreanPeriod = 27
    %ppBulletArabicDBPlain = 28
    %ppBulletArabicDBPeriod = 29
    %ppBulletThaiAlphaPeriod = 30
    %ppBulletThaiAlphaParenRight = 31
    %ppBulletThaiAlphaParenBoth = 32
    %ppBulletThaiNumPeriod = 33
    %ppBulletThaiNumParenRight = 34
    %ppBulletThaiNumParenBoth = 35
    %ppBulletHindiAlphaPeriod = 36
    %ppBulletHindiNumPeriod = 37
    %ppBulletKanjiSimpChinDBPeriod = 38
    %ppBulletHindiNumParenRight = 39
    %ppBulletHindiAlpha1Period = 40
    
    ' PpShapeFormat enumeration
    %ppShapeFormatGIF = 0
    %ppShapeFormatJPG = 1
    %ppShapeFormatPNG = 2
    %ppShapeFormatBMP = 3
    %ppShapeFormatWMF = 4
    %ppShapeFormatEMF = 5
    
    ' PpExportMode enumeration
    %ppRelativeToSlide = 1
    %ppClipRelativeToSlide = 2
    %ppScaleToFit = 3
    %ppScaleXY = 4
    
    ' PpPasteDataType enumeration
    %ppPasteDefault = 0
    %ppPasteBitmap = 1
    %ppPasteEnhancedMetafile = 2
    %ppPasteMetafilePicture = 3
    %ppPasteGIF = 4
    %ppPasteJPG = 5
    %ppPastePNG = 6
    %ppPasteText = 7
    %ppPasteHTML = 8
    %ppPasteRTF = 9
    %ppPasteOLEObject = 10
    %ppPasteShape = 11
    
    ' MsoAnimEffect enumeration
    %msoAnimEffectCustom = 0
    %msoAnimEffectAppear = 1
    %msoAnimEffectFly = 2
    %msoAnimEffectBlinds = 3
    %msoAnimEffectBox = 4
    %msoAnimEffectCheckerboard = 5
    %msoAnimEffectCircle = 6
    %msoAnimEffectCrawl = 7
    %msoAnimEffectDiamond = 8
    %msoAnimEffectDissolve = 9
    %msoAnimEffectFade = 10
    %msoAnimEffectFlashOnce = 11
    %msoAnimEffectPeek = 12
    %msoAnimEffectPlus = 13
    %msoAnimEffectRandomBars = 14
    %msoAnimEffectSpiral = 15
    %msoAnimEffectSplit = 16
    %msoAnimEffectStretch = 17
    %msoAnimEffectStrips = 18
    %msoAnimEffectSwivel = 19
    %msoAnimEffectWedge = 20
    %msoAnimEffectWheel = 21
    %msoAnimEffectWipe = 22
    %msoAnimEffectZoom = 23
    %msoAnimEffectRandomEffects = 24
    %msoAnimEffectBoomerang = 25
    %msoAnimEffectBounce = 26
    %msoAnimEffectColorReveal = 27
    %msoAnimEffectCredits = 28
    %msoAnimEffectEaseIn = 29
    %msoAnimEffectFloat = 30
    %msoAnimEffectGrowAndTurn = 31
    %msoAnimEffectLightSpeed = 32
    %msoAnimEffectPinwheel = 33
    %msoAnimEffectRiseUp = 34
    %msoAnimEffectSwish = 35
    %msoAnimEffectThinLine = 36
    %msoAnimEffectUnfold = 37
    %msoAnimEffectWhip = 38
    %msoAnimEffectAscend = 39
    %msoAnimEffectCenterRevolve = 40
    %msoAnimEffectFadedSwivel = 41
    %msoAnimEffectDescend = 42
    %msoAnimEffectSling = 43
    %msoAnimEffectSpinner = 44
    %msoAnimEffectStretchy = 45
    %msoAnimEffectZip = 46
    %msoAnimEffectArcUp = 47
    %msoAnimEffectFadedZoom = 48
    %msoAnimEffectGlide = 49
    %msoAnimEffectExpand = 50
    %msoAnimEffectFlip = 51
    %msoAnimEffectShimmer = 52
    %msoAnimEffectFold = 53
    %msoAnimEffectChangeFillColor = 54
    %msoAnimEffectChangeFont = 55
    %msoAnimEffectChangeFontColor = 56
    %msoAnimEffectChangeFontSize = 57
    %msoAnimEffectChangeFontStyle = 58
    %msoAnimEffectGrowShrink = 59
    %msoAnimEffectChangeLineColor = 60
    %msoAnimEffectSpin = 61
    %msoAnimEffectTransparency = 62
    %msoAnimEffectBoldFlash = 63
    %msoAnimEffectBlast = 64
    %msoAnimEffectBoldReveal = 65
    %msoAnimEffectBrushOnColor = 66
    %msoAnimEffectBrushOnUnderline = 67
    %msoAnimEffectColorBlend = 68
    %msoAnimEffectColorWave = 69
    %msoAnimEffectComplementaryColor = 70
    %msoAnimEffectComplementaryColor2 = 71
    %msoAnimEffectContrastingColor = 72
    %msoAnimEffectDarken = 73
    %msoAnimEffectDesaturate = 74
    %msoAnimEffectFlashBulb = 75
    %msoAnimEffectFlicker = 76
    %msoAnimEffectGrowWithColor = 77
    %msoAnimEffectLighten = 78
    %msoAnimEffectStyleEmphasis = 79
    %msoAnimEffectTeeter = 80
    %msoAnimEffectVerticalGrow = 81
    %msoAnimEffectWave = 82
    %msoAnimEffectMediaPlay = 83
    %msoAnimEffectMediaPause = 84
    %msoAnimEffectMediaStop = 85
    %msoAnimEffectPathCircle = 86
    %msoAnimEffectPathRightTriangle = 87
    %msoAnimEffectPathDiamond = 88
    %msoAnimEffectPathHexagon = 89
    %msoAnimEffectPath5PointStar = 90
    %msoAnimEffectPathCrescentMoon = 91
    %msoAnimEffectPathSquare = 92
    %msoAnimEffectPathTrapezoid = 93
    %msoAnimEffectPathHeart = 94
    %msoAnimEffectPathOctagon = 95
    %msoAnimEffectPath6PointStar = 96
    %msoAnimEffectPathFootball = 97
    %msoAnimEffectPathEqualTriangle = 98
    %msoAnimEffectPathParallelogram = 99
    %msoAnimEffectPathPentagon = 100
    %msoAnimEffectPath4PointStar = 101
    %msoAnimEffectPath8PointStar = 102
    %msoAnimEffectPathTeardrop = 103
    %msoAnimEffectPathPointyStar = 104
    %msoAnimEffectPathCurvedSquare = 105
    %msoAnimEffectPathCurvedX = 106
    %msoAnimEffectPathVerticalFigure8 = 107
    %msoAnimEffectPathCurvyStar = 108
    %msoAnimEffectPathLoopdeLoop = 109
    %msoAnimEffectPathBuzzsaw = 110
    %msoAnimEffectPathHorizontalFigure8 = 111
    %msoAnimEffectPathPeanut = 112
    %msoAnimEffectPathFigure8Four = 113
    %msoAnimEffectPathNeutron = 114
    %msoAnimEffectPathSwoosh = 115
    %msoAnimEffectPathBean = 116
    %msoAnimEffectPathPlus = 117
    %msoAnimEffectPathInvertedTriangle = 118
    %msoAnimEffectPathInvertedSquare = 119
    %msoAnimEffectPathLeft = 120
    %msoAnimEffectPathTurnRight = 121
    %msoAnimEffectPathArcDown = 122
    %msoAnimEffectPathZigzag = 123
    %msoAnimEffectPathSCurve2 = 124
    %msoAnimEffectPathSineWave = 125
    %msoAnimEffectPathBounceLeft = 126
    %msoAnimEffectPathDown = 127
    %msoAnimEffectPathTurnUp = 128
    %msoAnimEffectPathArcUp = 129
    %msoAnimEffectPathHeartbeat = 130
    %msoAnimEffectPathSpiralRight = 131
    %msoAnimEffectPathWave = 132
    %msoAnimEffectPathCurvyLeft = 133
    %msoAnimEffectPathDiagonalDownRight = 134
    %msoAnimEffectPathTurnDown = 135
    %msoAnimEffectPathArcLeft = 136
    %msoAnimEffectPathFunnel = 137
    %msoAnimEffectPathSpring = 138
    %msoAnimEffectPathBounceRight = 139
    %msoAnimEffectPathSpiralLeft = 140
    %msoAnimEffectPathDiagonalUpRight = 141
    %msoAnimEffectPathTurnUpRight = 142
    %msoAnimEffectPathArcRight = 143
    %msoAnimEffectPathSCurve1 = 144
    %msoAnimEffectPathDecayingWave = 145
    %msoAnimEffectPathCurvyRight = 146
    %msoAnimEffectPathStairsDown = 147
    %msoAnimEffectPathUp = 148
    %msoAnimEffectPathRight = 149
    
    ' MsoAnimateByLevel enumeration
    %msoAnimateLevelMixed = -1
    %msoAnimateLevelNone = 0
    %msoAnimateTextByAllLevels = 1
    %msoAnimateTextByFirstLevel = 2
    %msoAnimateTextBySecondLevel = 3
    %msoAnimateTextByThirdLevel = 4
    %msoAnimateTextByFourthLevel = 5
    %msoAnimateTextByFifthLevel = 6
    %msoAnimateChartAllAtOnce = 7
    %msoAnimateChartByCategory = 8
    %msoAnimateChartByCategoryElements = 9
    %msoAnimateChartBySeries = 10
    %msoAnimateChartBySeriesElements = 11
    %msoAnimateDiagramAllAtOnce = 12
    %msoAnimateDiagramDepthByNode = 13
    %msoAnimateDiagramDepthByBranch = 14
    %msoAnimateDiagramBreadthByNode = 15
    %msoAnimateDiagramBreadthByLevel = 16
    %msoAnimateDiagramClockwise = 17
    %msoAnimateDiagramClockwiseIn = 18
    %msoAnimateDiagramClockwiseOut = 19
    %msoAnimateDiagramCounterClockwise = 20
    %msoAnimateDiagramCounterClockwiseIn = 21
    %msoAnimateDiagramCounterClockwiseOut = 22
    %msoAnimateDiagramInByRing = 23
    %msoAnimateDiagramOutByRing = 24
    %msoAnimateDiagramUp = 25
    %msoAnimateDiagramDown = 26
    
    ' MsoAnimTriggerType enumeration
    %msoAnimTriggerMixed = -1
    %msoAnimTriggerNone = 0
    %msoAnimTriggerOnPageClick = 1
    %msoAnimTriggerWithPrevious = 2
    %msoAnimTriggerAfterPrevious = 3
    %msoAnimTriggerOnShapeClick = 4
    
    ' MsoAnimAfterEffect enumeration
    %msoAnimAfterEffectMixed = -1
    %msoAnimAfterEffectNone = 0
    %msoAnimAfterEffectDim = 1
    %msoAnimAfterEffectHide = 2
    %msoAnimAfterEffectHideOnNextClick = 3
    
    ' MsoAnimTextUnitEffect enumeration
    %msoAnimTextUnitEffectMixed = -1
    %msoAnimTextUnitEffectByParagraph = 0
    %msoAnimTextUnitEffectByCharacter = 1
    %msoAnimTextUnitEffectByWord = 2
    
    ' MsoAnimEffectRestart enumeration
    %msoAnimEffectRestartAlways = 1
    %msoAnimEffectRestartWhenOff = 2
    %msoAnimEffectRestartNever = 3
    
    ' MsoAnimEffectAfter enumeration
    %msoAnimEffectAfterFreeze = 1
    %msoAnimEffectAfterRemove = 2
    %msoAnimEffectAfterHold = 3
    %msoAnimEffectAfterTransition = 4
    
    ' MsoAnimDirection enumeration
    %msoAnimDirectionNone = 0
    %msoAnimDirectionUp = 1
    %msoAnimDirectionRight = 2
    %msoAnimDirectionDown = 3
    %msoAnimDirectionLeft = 4
    %msoAnimDirectionOrdinalMask = 5
    %msoAnimDirectionUpLeft = 6
    %msoAnimDirectionUpRight = 7
    %msoAnimDirectionDownRight = 8
    %msoAnimDirectionDownLeft = 9
    %msoAnimDirectionTop = 10
    %msoAnimDirectionBottom = 11
    %msoAnimDirectionTopLeft = 12
    %msoAnimDirectionTopRight = 13
    %msoAnimDirectionBottomRight = 14
    %msoAnimDirectionBottomLeft = 15
    %msoAnimDirectionHorizontal = 16
    %msoAnimDirectionVertical = 17
    %msoAnimDirectionAcross = 18
    %msoAnimDirectionIn = 19
    %msoAnimDirectionOut = 20
    %msoAnimDirectionClockwise = 21
    %msoAnimDirectionCounterclockwise = 22
    %msoAnimDirectionHorizontalIn = 23
    %msoAnimDirectionHorizontalOut = 24
    %msoAnimDirectionVerticalIn = 25
    %msoAnimDirectionVerticalOut = 26
    %msoAnimDirectionSlightly = 27
    %msoAnimDirectionCenter = 28
    %msoAnimDirectionInSlightly = 29
    %msoAnimDirectionInCenter = 30
    %msoAnimDirectionInBottom = 31
    %msoAnimDirectionOutSlightly = 32
    %msoAnimDirectionOutCenter = 33
    %msoAnimDirectionOutBottom = 34
    %msoAnimDirectionFontBold = 35
    %msoAnimDirectionFontItalic = 36
    %msoAnimDirectionFontUnderline = 37
    %msoAnimDirectionFontStrikethrough = 38
    %msoAnimDirectionFontShadow = 39
    %msoAnimDirectionFontAllCaps = 40
    %msoAnimDirectionInstant = 41
    %msoAnimDirectionGradual = 42
    %msoAnimDirectionCycleClockwise = 43
    %msoAnimDirectionCycleCounterclockwise = 44
    
    ' MsoAnimType enumeration
    %msoAnimTypeMixed = -2
    %msoAnimTypeNone = 0
    %msoAnimTypeMotion = 1
    %msoAnimTypeColor = 2
    %msoAnimTypeScale = 3
    %msoAnimTypeRotation = 4
    %msoAnimTypeProperty = 5
    %msoAnimTypeCommand = 6
    %msoAnimTypeFilter = 7
    %msoAnimTypeSet = 8
    
    ' MsoAnimAdditive enumeration
    %msoAnimAdditiveAddBase = 1
    %msoAnimAdditiveAddSum = 2
    
    ' MsoAnimAccumulate enumeration
    %msoAnimAccumulateNone = 1
    %msoAnimAccumulateAlways = 2
    
    ' MsoAnimProperty enumeration
    %msoAnimNone = 0
    %msoAnimX = 1
    %msoAnimY = 2
    %msoAnimWidth = 3
    %msoAnimHeight = 4
    %msoAnimOpacity = 5
    %msoAnimRotation = 6
    %msoAnimColor = 7
    %msoAnimVisibility = 8
    %msoAnimTextFontBold = 100
    %msoAnimTextFontColor = 101
    %msoAnimTextFontEmboss = 102
    %msoAnimTextFontItalic = 103
    %msoAnimTextFontName = 104
    %msoAnimTextFontShadow = 105
    %msoAnimTextFontSize = 106
    %msoAnimTextFontSubscript = 107
    %msoAnimTextFontSuperscript = 108
    %msoAnimTextFontUnderline = 109
    %msoAnimTextFontStrikeThrough = 110
    %msoAnimTextBulletCharacter = 111
    %msoAnimTextBulletFontName = 112
    %msoAnimTextBulletNumber = 113
    %msoAnimTextBulletColor = 114
    %msoAnimTextBulletRelativeSize = 115
    %msoAnimTextBulletStyle = 116
    %msoAnimTextBulletType = 117
    %msoAnimShapePictureContrast = 1000
    %msoAnimShapePictureBrightness = 1001
    %msoAnimShapePictureGamma = 1002
    %msoAnimShapePictureGrayscale = 1003
    %msoAnimShapeFillOn = 1004
    %msoAnimShapeFillColor = 1005
    %msoAnimShapeFillOpacity = 1006
    %msoAnimShapeFillBackColor = 1007
    %msoAnimShapeLineOn = 1008
    %msoAnimShapeLineColor = 1009
    %msoAnimShapeShadowOn = 1010
    %msoAnimShapeShadowType = 1011
    %msoAnimShapeShadowColor = 1012
    %msoAnimShapeShadowOpacity = 1013
    %msoAnimShapeShadowOffsetX = 1014
    %msoAnimShapeShadowOffsetY = 1015
    
    ' PpAlertLevel enumeration
    %ppAlertsNone = 1
    %ppAlertsAll = 2
    
    ' PpRevisionInfo enumeration
    %ppRevisionInfoNone = 0
    %ppRevisionInfoBaseline = 1
    %ppRevisionInfoMerged = 2
    
    ' MsoAnimCommandType enumeration
    %msoAnimCommandTypeEvent = 0
    %msoAnimCommandTypeCall = 1
    %msoAnimCommandTypeVerb = 2
    
    ' MsoAnimFilterEffectType enumeration
    %msoAnimFilterEffectTypeNone = 0
    %msoAnimFilterEffectTypeBarn = 1
    %msoAnimFilterEffectTypeBlinds = 2
    %msoAnimFilterEffectTypeBox = 3
    %msoAnimFilterEffectTypeCheckerboard = 4
    %msoAnimFilterEffectTypeCircle = 5
    %msoAnimFilterEffectTypeDiamond = 6
    %msoAnimFilterEffectTypeDissolve = 7
    %msoAnimFilterEffectTypeFade = 8
    %msoAnimFilterEffectTypeImage = 9
    %msoAnimFilterEffectTypePixelate = 10
    %msoAnimFilterEffectTypePlus = 11
    %msoAnimFilterEffectTypeRandomBar = 12
    %msoAnimFilterEffectTypeSlide = 13
    %msoAnimFilterEffectTypeStretch = 14
    %msoAnimFilterEffectTypeStrips = 15
    %msoAnimFilterEffectTypeWedge = 16
    %msoAnimFilterEffectTypeWheel = 17
    %msoAnimFilterEffectTypeWipe = 18
    
    ' MsoAnimFilterEffectSubtype enumeration
    %msoAnimFilterEffectSubtypeNone = 0
    %msoAnimFilterEffectSubtypeInVertical = 1
    %msoAnimFilterEffectSubtypeOutVertical = 2
    %msoAnimFilterEffectSubtypeInHorizontal = 3
    %msoAnimFilterEffectSubtypeOutHorizontal = 4
    %msoAnimFilterEffectSubtypeHorizontal = 5
    %msoAnimFilterEffectSubtypeVertical = 6
    %msoAnimFilterEffectSubtypeIn = 7
    %msoAnimFilterEffectSubtypeOut = 8
    %msoAnimFilterEffectSubtypeAcross = 9
    %msoAnimFilterEffectSubtypeFromLeft = 10
    %msoAnimFilterEffectSubtypeFromRight = 11
    %msoAnimFilterEffectSubtypeFromTop = 12
    %msoAnimFilterEffectSubtypeFromBottom = 13
    %msoAnimFilterEffectSubtypeDownLeft = 14
    %msoAnimFilterEffectSubtypeUpLeft = 15
    %msoAnimFilterEffectSubtypeDownRight = 16
    %msoAnimFilterEffectSubtypeUpRight = 17
    %msoAnimFilterEffectSubtypeSpokes1 = 18
    %msoAnimFilterEffectSubtypeSpokes2 = 19
    %msoAnimFilterEffectSubtypeSpokes3 = 20
    %msoAnimFilterEffectSubtypeSpokes4 = 21
    %msoAnimFilterEffectSubtypeSpokes8 = 22
    %msoAnimFilterEffectSubtypeLeft = 23
    %msoAnimFilterEffectSubtypeRight = 24
    %msoAnimFilterEffectSubtypeDown = 25
    %msoAnimFilterEffectSubtypeUp = 26
    
    
    ' Interface Name  : Collection
    INTERFACE Collection $IID_PowerPoint_Collection
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
    END INTERFACE
    
    ' Interface Name  : Int__Application
    ' ClassID         : $CLSID_PowerPoint_Application
    ' ProgID          : $PROGID_PowerPoint_Application
    ' Version ProgID  : $PROGID_PowerPoint_Application11
    INTERFACE Int__Application $IID_PowerPoint_Int__Application
        INHERIT IDISPATCH
    
        PROPERTY GET Presentations <2001> () AS Presentations
        PROPERTY GET Windows <2002> () AS DocumentWindows
        PROPERTY GET Dialogs <2003> () AS IUNKNOWN
        PROPERTY GET ActiveWindow <2004> () AS DocumentWindow
        PROPERTY GET ActivePresentation <2005> () AS IDISPATCH
        PROPERTY GET SlideShowWindows <2006> () AS SlideShowWindows
        PROPERTY GET CommandBars <2007> () AS IDISPATCH
        PROPERTY GET PATH <2008> () AS STRING
        PROPERTY GET NAME <0> () AS STRING
        PROPERTY GET Caption <2009> () AS STRING
        PROPERTY SET Caption <2009> (BYVAL Caption AS STRING)
        PROPERTY GET Assistant <2010> () AS IDISPATCH
        PROPERTY GET FileSearch <2011> () AS IDISPATCH
        PROPERTY GET FileFind <2012> () AS IDISPATCH
        PROPERTY GET Build <2013> () AS STRING
        PROPERTY GET Version <2014> () AS STRING
        PROPERTY GET OperatingSystem <2015> () AS STRING
        PROPERTY GET ActivePrinter <2016> () AS STRING
        PROPERTY GET Creator <2017> () AS LONG
        PROPERTY GET AddIns <2018> () AS AddIns
        PROPERTY GET VBE <2019> () AS IDISPATCH
        METHOD HELP <2020> (OPT BYVAL HelpFile AS STRING, OPT BYVAL ContextID AS LONG)
        METHOD Quit <2021> ()
        METHOD Run <2022> (BYVAL MacroName AS STRING, BYVAL safeArrayOfParams AS DWORD) AS VARIANT
        METHOD PPFileDialog <2023> (BYVAL PB_Type AS LONG) AS IUNKNOWN
        METHOD LaunchSpelling <2024> (BYVAL pWindow AS DocumentWindow)
        PROPERTY GET LEFT <2025> () AS SINGLE
        PROPERTY SET LEFT <2025> (BYVAL PB_Left AS SINGLE)
        PROPERTY GET Top <2026> () AS SINGLE
        PROPERTY SET Top <2026> (BYVAL Top AS SINGLE)
        PROPERTY GET WIDTH <2027> () AS SINGLE
        PROPERTY SET WIDTH <2027> (BYVAL PB_Width AS SINGLE)
        PROPERTY GET Height <2028> () AS SINGLE
        PROPERTY SET Height <2028> (BYVAL Height AS SINGLE)
        PROPERTY GET WindowState <2029> () AS LONG
        PROPERTY SET WindowState <2029> (BYVAL WindowState AS LONG)
        PROPERTY GET VISIBLE <2030> () AS LONG
        PROPERTY SET VISIBLE <2030> (BYVAL PB_Visible AS LONG)
        PROPERTY GET HWND <2031> () AS LONG
        PROPERTY GET Active <2032> () AS LONG
        METHOD Activate <2033> ()
        PROPERTY GET AnswerWizard <2034> () AS IDISPATCH
        PROPERTY GET COMAddIns <2035> () AS IDISPATCH
        PROPERTY GET ProductCode <2036> () AS STRING
        PROPERTY GET DefaultWebOptions <2037> () AS DefaultWebOptions
        PROPERTY GET LanguageSettings <2038> () AS IDISPATCH
        PROPERTY GET MsoDebugOptions <2039> () AS IDISPATCH
        PROPERTY GET ShowWindowsInTaskbar <2040> () AS LONG
        PROPERTY SET ShowWindowsInTaskbar <2040> (BYVAL ShowWindowsInTaskbar AS LONG)
        PROPERTY GET Marker <2041> () AS IUNKNOWN
        PROPERTY GET FeatureInstall <2042> () AS LONG
        PROPERTY SET FeatureInstall <2042> (BYVAL FeatureInstall AS LONG)
        METHOD GetOptionFlag <2043> (BYVAL PB_Option AS LONG, OPT BYVAL Persist AS INTEGER) AS INTEGER
        METHOD SetOptionFlag <2044> (BYVAL PB_Option AS LONG, BYVAL STATE AS INTEGER, OPT BYVAL Persist AS INTEGER)
        PROPERTY GET FileDialog <2045> (BYVAL PB_Type AS LONG) AS IDISPATCH
        PROPERTY GET DisplayGridLines <2046> () AS LONG
        PROPERTY SET DisplayGridLines <2046> (BYVAL DisplayGridLines AS LONG)
        PROPERTY GET AutomationSecurity <2047> () AS LONG
        PROPERTY SET AutomationSecurity <2047> (BYVAL AutomationSecurity AS LONG)
        PROPERTY GET NewPresentation <2048> () AS IDISPATCH
        PROPERTY GET DisplayAlerts <2049> () AS LONG
        PROPERTY SET DisplayAlerts <2049> (BYVAL DisplayAlerts AS LONG)
        PROPERTY GET ShowStartupDialog <2050> () AS LONG
        PROPERTY SET ShowStartupDialog <2050> (BYVAL ShowStartupDialog AS LONG)
        METHOD SetPerfMarker <2051> (BYVAL Marker AS LONG)
        PROPERTY GET AutoCorrect <2052> () AS AutoCorrect
        PROPERTY GET Options <2053> () AS Options
    END INTERFACE
    
    ' Interface Name  : Int__Global
    ' ClassID         : $CLSID_PowerPoint_Global
    INTERFACE Int__Global $IID_PowerPoint_Int__Global
        INHERIT IDISPATCH
    
        PROPERTY GET ActivePresentation <2001> () AS IDISPATCH
        PROPERTY GET ActiveWindow <2002> () AS DocumentWindow
        PROPERTY GET AddIns <2003> () AS AddIns
        PROPERTY GET Application <2004> () AS IDISPATCH
        PROPERTY GET Assistant <2005> () AS IDISPATCH
        PROPERTY GET Dialogs <2006> () AS IUNKNOWN
        PROPERTY GET Presentations <2007> () AS Presentations
        PROPERTY GET SlideShowWindows <2008> () AS SlideShowWindows
        PROPERTY GET Windows <2009> () AS DocumentWindows
        PROPERTY GET CommandBars <2010> () AS IDISPATCH
        PROPERTY GET AnswerWizard <2011> () AS IDISPATCH
    END INTERFACE
    
    ' Interface Name  : ColorFormat
    INTERFACE ColorFormat $IID_PowerPoint_ColorFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET RGB <0> () AS LONG
        PROPERTY SET RGB <0> (BYVAL PB_RGB AS LONG)
        PROPERTY GET TYPE <101> () AS LONG
        PROPERTY GET SchemeColor <2003> () AS LONG
        PROPERTY SET SchemeColor <2003> (BYVAL SchemeColor AS LONG)
        PROPERTY GET TintAndShade <103> () AS SINGLE
        PROPERTY SET TintAndShade <103> (BYVAL pValue AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : SlideShowWindow
    INTERFACE SlideShowWindow $IID_PowerPoint_SlideShowWindow
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET View <2003> () AS SlideShowView
        PROPERTY GET Presentation <2004> () AS IDISPATCH
        PROPERTY GET IsFullScreen <2005> () AS LONG
        PROPERTY GET LEFT <2006> () AS SINGLE
        PROPERTY SET LEFT <2006> (BYVAL PB_Left AS SINGLE)
        PROPERTY GET Top <2007> () AS SINGLE
        PROPERTY SET Top <2007> (BYVAL Top AS SINGLE)
        PROPERTY GET WIDTH <2008> () AS SINGLE
        PROPERTY SET WIDTH <2008> (BYVAL PB_Width AS SINGLE)
        PROPERTY GET Height <2009> () AS SINGLE
        PROPERTY SET Height <2009> (BYVAL Height AS SINGLE)
        PROPERTY GET HWND <2010> () AS LONG
        PROPERTY GET Active <2011> () AS LONG
        METHOD Activate <2012> ()
    END INTERFACE
    
    ' Interface Name  : Selection
    INTERFACE Selection $IID_PowerPoint_Selection
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD Cut <2003> ()
        METHOD COPY <2004> ()
        METHOD DELETE <2005> ()
        METHOD UNSELECT <2006> ()
        PROPERTY GET TYPE <2007> () AS LONG
        PROPERTY GET SlideRange <2008> () AS SlideRange
        PROPERTY GET ShapeRange <2009> () AS ShapeRange
        PROPERTY GET TextRange <2010> () AS TextRange
        PROPERTY GET ChildShapeRange <2011> () AS ShapeRange
        PROPERTY GET HasChildShapeRange <2012> () AS INTEGER
    END INTERFACE
    
    ' Interface Name  : DocumentWindows
    INTERFACE DocumentWindows $IID_PowerPoint_DocumentWindows
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS DocumentWindow
        METHOD Arrange <2003> (OPT BYVAL arrangeStyle AS LONG)
    END INTERFACE
    
    ' Interface Name  : SlideShowWindows
    INTERFACE SlideShowWindows $IID_PowerPoint_SlideShowWindows
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS SlideShowWindow
    END INTERFACE
    
    ' Interface Name  : DocumentWindow
    INTERFACE DocumentWindow $IID_PowerPoint_DocumentWindow
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Selection <2003> () AS Selection
        PROPERTY GET View <2004> () AS View
        PROPERTY GET Presentation <2005> () AS IDISPATCH
        PROPERTY GET ViewType <2006> () AS LONG
        PROPERTY SET ViewType <2006> (BYVAL ViewType AS LONG)
        PROPERTY GET BlackAndWhite <2007> () AS LONG
        PROPERTY SET BlackAndWhite <2007> (BYVAL BlackAndWhite AS LONG)
        PROPERTY GET Active <2008> () AS LONG
        PROPERTY GET WindowState <2009> () AS LONG
        PROPERTY SET WindowState <2009> (BYVAL WindowState AS LONG)
        PROPERTY GET Caption <0> () AS STRING
        PROPERTY GET LEFT <2010> () AS SINGLE
        PROPERTY SET LEFT <2010> (BYVAL PB_Left AS SINGLE)
        PROPERTY GET Top <2011> () AS SINGLE
        PROPERTY SET Top <2011> (BYVAL Top AS SINGLE)
        PROPERTY GET WIDTH <2012> () AS SINGLE
        PROPERTY SET WIDTH <2012> (BYVAL PB_Width AS SINGLE)
        PROPERTY GET Height <2013> () AS SINGLE
        PROPERTY SET Height <2013> (BYVAL Height AS SINGLE)
        METHOD FitToPage <2014> ()
        METHOD Activate <2015> ()
        METHOD LargeScroll <2016> (OPT BYVAL PB_Down AS LONG, OPT BYVAL PB_Up AS LONG, OPT BYVAL ToRight AS LONG, OPT BYVAL _
            ToLeft AS LONG)
        METHOD SmallScroll <2017> (OPT BYVAL PB_Down AS LONG, OPT BYVAL PB_Up AS LONG, OPT BYVAL ToRight AS LONG, OPT BYVAL _
            ToLeft AS LONG)
        METHOD NewWindow <2018> () AS DocumentWindow
        METHOD CLOSE <2019> ()
        PROPERTY GET HWND <2020> () AS LONG
        PROPERTY GET ActivePane <2021> () AS Pane
        PROPERTY GET Panes <2022> () AS Panes
        PROPERTY GET SplitVertical <2023> () AS LONG
        PROPERTY SET SplitVertical <2023> (BYVAL SplitVertical AS LONG)
        PROPERTY GET SplitHorizontal <2024> () AS LONG
        PROPERTY SET SplitHorizontal <2024> (BYVAL SplitHorizontal AS LONG)
        METHOD RangeFromPoint <2025> (BYVAL X AS LONG, BYVAL Y AS LONG) AS IDISPATCH
        METHOD PointsToScreenPixelsX <2026> (BYVAL PB_Points AS SINGLE) AS LONG
        METHOD PointsToScreenPixelsY <2027> (BYVAL PB_Points AS SINGLE) AS LONG
        METHOD ScrollIntoView <2028> (BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, BYVAL Height AS _
            SINGLE, OPT BYVAL Start AS LONG)
    END INTERFACE
    
    ' Interface Name  : View
    INTERFACE View $IID_PowerPoint_View
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TYPE <2003> () AS LONG
        PROPERTY GET Zoom <2004> () AS LONG
        PROPERTY SET Zoom <2004> (BYVAL Zoom AS LONG)
        METHOD Paste <2005> ()
        PROPERTY GET Slide <2006> () AS IDISPATCH
        PROPERTY SET Slide <2006> (BYVAL Slide AS IDISPATCH)
        METHOD GotoSlide <2007> (BYVAL Index AS LONG)
        PROPERTY GET DisplaySlideMiniature <2008> () AS LONG
        PROPERTY SET DisplaySlideMiniature <2008> (BYVAL DisplaySlideMiniature AS LONG)
        PROPERTY GET ZoomToFit <2009> () AS LONG
        PROPERTY SET ZoomToFit <2009> (BYVAL ZoomToFit AS LONG)
        METHOD PasteSpecial <2010> (OPT BYVAL DataType AS LONG, OPT BYVAL DisplayAsIcon AS LONG, OPT BYVAL IconFileName AS _
            STRING, OPT BYVAL IconIndex AS LONG, OPT BYVAL IconLabel AS STRING, OPT BYVAL Link AS LONG)
        PROPERTY GET PrintOptions <2011> () AS PrintOptions
        METHOD PrintOut <2012> (OPT BYVAL PB_From AS LONG, OPT BYVAL PB_To AS LONG, OPT BYVAL PrintToFile AS STRING, OPT BYVAL _
            COPIES AS LONG, OPT BYVAL PB_Collate AS LONG)
    END INTERFACE
    
    ' Interface Name  : SlideShowView
    INTERFACE SlideShowView $IID_PowerPoint_SlideShowView
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Zoom <2003> () AS LONG
        PROPERTY GET Slide <2004> () AS IDISPATCH
        PROPERTY GET PointerType <2005> () AS LONG
        PROPERTY SET PointerType <2005> (BYVAL PointerType AS LONG)
        PROPERTY GET STATE <2006> () AS LONG
        PROPERTY SET STATE <2006> (BYVAL STATE AS LONG)
        PROPERTY GET AcceleratorsEnabled <2007> () AS LONG
        PROPERTY SET AcceleratorsEnabled <2007> (BYVAL AcceleratorsEnabled AS LONG)
        PROPERTY GET PresentationElapsedTime <2008> () AS SINGLE
        PROPERTY GET SlideElapsedTime <2009> () AS SINGLE
        PROPERTY SET SlideElapsedTime <2009> (BYVAL SlideElapsedTime AS SINGLE)
        PROPERTY GET LastSlideViewed <2010> () AS IDISPATCH
        PROPERTY GET AdvanceMode <2011> () AS LONG
        PROPERTY GET PointerColor <2012> () AS ColorFormat
        PROPERTY GET IsNamedShow <2013> () AS LONG
        PROPERTY GET SlideShowName <2014> () AS STRING
        METHOD DrawLine <2015> (BYVAL BeginX AS SINGLE, BYVAL BeginY AS SINGLE, BYVAL EndX AS SINGLE, BYVAL EndY AS SINGLE)
        METHOD EraseDrawing <2016> ()
        METHOD First <2017> ()
        METHOD Last <2018> ()
        METHOD NEXT <2019> ()
        METHOD PREVIOUS <2020> ()
        METHOD GotoSlide <2021> (BYVAL Index AS LONG, OPT BYVAL ResetSlide AS LONG)
        METHOD GotoNamedShow <2022> (BYVAL SlideShowName AS STRING)
        METHOD EndNamedShow <2023> ()
        METHOD ResetSlideTime <2024> ()
        METHOD EXIT <2025> ()
        METHOD InstallTracker <2026> (BYVAL pTracker AS MouseTracker, BYVAL Presenter AS LONG)
        PROPERTY GET CurrentShowPosition <2027> () AS LONG
    END INTERFACE
    
    ' Interface Name  : SlideShowSettings
    INTERFACE SlideShowSettings $IID_PowerPoint_SlideShowSettings
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET PointerColor <2003> () AS ColorFormat
        PROPERTY GET NamedSlideShows <2004> () AS NamedSlideShows
        PROPERTY GET StartingSlide <2005> () AS LONG
        PROPERTY SET StartingSlide <2005> (BYVAL StartingSlide AS LONG)
        PROPERTY GET EndingSlide <2006> () AS LONG
        PROPERTY SET EndingSlide <2006> (BYVAL EndingSlide AS LONG)
        PROPERTY GET AdvanceMode <2007> () AS LONG
        PROPERTY SET AdvanceMode <2007> (BYVAL AdvanceMode AS LONG)
        METHOD Run <2008> () AS SlideShowWindow
        PROPERTY GET LoopUntilStopped <2009> () AS LONG
        PROPERTY SET LoopUntilStopped <2009> (BYVAL LoopUntilStopped AS LONG)
        PROPERTY GET ShowType <2010> () AS LONG
        PROPERTY SET ShowType <2010> (BYVAL ShowType AS LONG)
        PROPERTY GET ShowWithNarration <2011> () AS LONG
        PROPERTY SET ShowWithNarration <2011> (BYVAL ShowWithNarration AS LONG)
        PROPERTY GET ShowWithAnimation <2012> () AS LONG
        PROPERTY SET ShowWithAnimation <2012> (BYVAL ShowWithAnimation AS LONG)
        PROPERTY GET SlideShowName <2013> () AS STRING
        PROPERTY SET SlideShowName <2013> (BYVAL SlideShowName AS STRING)
        PROPERTY GET RangeType <2014> () AS LONG
        PROPERTY SET RangeType <2014> (BYVAL RangeType AS LONG)
        PROPERTY GET ShowScrollbar <2015> () AS LONG
        PROPERTY SET ShowScrollbar <2015> (BYVAL ShowScrollbar AS LONG)
    END INTERFACE
    
    ' Interface Name  : NamedSlideShows
    INTERFACE NamedSlideShows $IID_PowerPoint_NamedSlideShows
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS NamedSlideShow
        METHOD ADD <2003> (BYVAL PB_Name AS STRING, BYVAL safeArrayOfSlideIDs AS VARIANT) AS NamedSlideShow
    END INTERFACE
    
    ' Interface Name  : NamedSlideShow
    INTERFACE NamedSlideShow $IID_PowerPoint_NamedSlideShow
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET NAME <2003> () AS STRING
        METHOD DELETE <2004> ()
        PROPERTY GET SlideIDs <2005> () AS VARIANT
        PROPERTY GET COUNT <2006> () AS LONG
    END INTERFACE
    
    ' Interface Name  : PrintOptions
    INTERFACE PrintOptions $IID_PowerPoint_PrintOptions
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PrintColorType <2002> () AS LONG
        PROPERTY SET PrintColorType <2002> (BYVAL PrintColorType AS LONG)
        PROPERTY GET COLLATE <2003> () AS LONG
        PROPERTY SET COLLATE <2003> (BYVAL PB_Collate AS LONG)
        PROPERTY GET FitToPage <2004> () AS LONG
        PROPERTY SET FitToPage <2004> (BYVAL FitToPage AS LONG)
        PROPERTY GET FrameSlides <2005> () AS LONG
        PROPERTY SET FrameSlides <2005> (BYVAL FrameSlides AS LONG)
        PROPERTY GET NumberOfCopies <2006> () AS LONG
        PROPERTY SET NumberOfCopies <2006> (BYVAL NumberOfCopies AS LONG)
        PROPERTY GET OutputType <2007> () AS LONG
        PROPERTY SET OutputType <2007> (BYVAL OutputType AS LONG)
        PROPERTY GET PARENT <2008> () AS IDISPATCH
        PROPERTY GET PrintHiddenSlides <2009> () AS LONG
        PROPERTY SET PrintHiddenSlides <2009> (BYVAL PrintHiddenSlides AS LONG)
        PROPERTY GET PrintInBackground <2010> () AS LONG
        PROPERTY SET PrintInBackground <2010> (BYVAL PrintInBackground AS LONG)
        PROPERTY GET RangeType <2011> () AS LONG
        PROPERTY SET RangeType <2011> (BYVAL RangeType AS LONG)
        PROPERTY GET Ranges <2012> () AS PrintRanges
        PROPERTY GET PrintFontsAsGraphics <2013> () AS LONG
        PROPERTY SET PrintFontsAsGraphics <2013> (BYVAL PrintFontsAsGraphics AS LONG)
        PROPERTY GET SlideShowName <2014> () AS STRING
        PROPERTY SET SlideShowName <2014> (BYVAL SlideShowName AS STRING)
        PROPERTY GET ActivePrinter <2015> () AS STRING
        PROPERTY SET ActivePrinter <2015> (BYVAL ActivePrinter AS STRING)
        PROPERTY GET HandoutOrder <2016> () AS LONG
        PROPERTY SET HandoutOrder <2016> (BYVAL HandoutOrder AS LONG)
        PROPERTY GET PrintComments <2017> () AS LONG
        PROPERTY SET PrintComments <2017> (BYVAL PrintComments AS LONG)
    END INTERFACE
    
    ' Interface Name  : PrintRanges
    INTERFACE PrintRanges $IID_PowerPoint_PrintRanges
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        METHOD ADD <2001> (BYVAL Start AS LONG, BYVAL PB_End AS LONG) AS PrintRange
        PROPERTY GET Application <2002> () AS IDISPATCH
        METHOD ClearAll <2003> ()
        METHOD ITEM <0> (BYVAL Index AS LONG) AS PrintRange
        PROPERTY GET PARENT <2004> () AS IDISPATCH
    END INTERFACE
    
    ' Interface Name  : PrintRange
    INTERFACE PrintRange $IID_PowerPoint_PrintRange
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Start <2003> () AS LONG
        PROPERTY GET END <2004> () AS LONG
        METHOD DELETE <2005> ()
    END INTERFACE
    
    ' Interface Name  : AddIns
    INTERFACE AddIns $IID_PowerPoint_AddIns
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYREF IN Index AS VARIANT) AS AddIn
        METHOD ADD <2003> (BYVAL FileName AS STRING) AS AddIn
        METHOD Remove <2004> (BYREF IN Index AS VARIANT)
    END INTERFACE
    
    ' Interface Name  : AddIn
    INTERFACE AddIn $IID_PowerPoint_AddIn
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET FullName <2003> () AS STRING
        PROPERTY GET NAME <2004> () AS STRING
        PROPERTY GET PATH <2005> () AS STRING
        PROPERTY GET Registered <2006> () AS LONG
        PROPERTY SET Registered <2006> (BYVAL Registered AS LONG)
        PROPERTY GET AutoLoad <2007> () AS LONG
        PROPERTY SET AutoLoad <2007> (BYVAL AutoLoad AS LONG)
        PROPERTY GET Loaded <2008> () AS LONG
        PROPERTY SET Loaded <2008> (BYVAL Loaded AS LONG)
        PROPERTY GET DisplayAlerts <2009> () AS LONG
        PROPERTY SET DisplayAlerts <2009> (BYVAL DisplayAlerts AS LONG)
        PROPERTY GET RegisteredInHKLM <2010> () AS LONG
    END INTERFACE
    
    ' Interface Name  : Presentations
    INTERFACE Presentations $IID_PowerPoint_Presentations
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS IDISPATCH
        METHOD ADD <2003> (OPT BYVAL WithWindow AS LONG) AS IDISPATCH
        METHOD OpenOld <2004> (BYVAL FileName AS STRING, OPT BYVAL ReadOnly AS LONG, OPT BYVAL Untitled AS LONG, OPT BYVAL _
            WithWindow AS LONG) AS IDISPATCH
        METHOD OPEN <2005> (BYVAL FileName AS STRING, OPT BYVAL ReadOnly AS LONG, OPT BYVAL Untitled AS LONG, OPT BYVAL _
            WithWindow AS LONG) AS IDISPATCH
        METHOD CheckOut <2006> (BYVAL FileName AS STRING)
        METHOD CanCheckOut <2007> (BYVAL FileName AS STRING) AS INTEGER
    END INTERFACE
    
    
    ' Interface Name  : PresEvents
    ' ClassID         : $CLSID_PowerPoint_Event_PresEvents
    CLASS Class_PresEvents $CLSID_PowerPoint_Event_PresEvents AS EVENT
        INTERFACE PresEvents $IID_PowerPoint_PresEvents
            INHERIT IUNKNOWN
        END INTERFACE
    END CLASS
    
    
    ' Interface Name  : Hyperlinks
    INTERFACE Hyperlinks $IID_PowerPoint_Hyperlinks
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Hyperlink
    END INTERFACE
    
    
    ' Interface Name  : Hyperlink
    INTERFACE Hyperlink $IID_PowerPoint_Hyperlink
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TYPE <2003> () AS LONG
        PROPERTY GET Address <2004> () AS STRING
        PROPERTY SET Address <2004> (BYVAL Address AS STRING)
        PROPERTY GET SubAddress <2005> () AS STRING
        PROPERTY SET SubAddress <2005> (BYVAL SubAddress AS STRING)
        METHOD AddToFavorites <2006> ()
        PROPERTY GET EmailSubject <2007> () AS STRING
        PROPERTY SET EmailSubject <2007> (BYVAL EmailSubject AS STRING)
        PROPERTY GET ScreenTip <2008> () AS STRING
        PROPERTY SET ScreenTip <2008> (BYVAL ScreenTip AS STRING)
        PROPERTY GET TextToDisplay <2009> () AS STRING
        PROPERTY SET TextToDisplay <2009> (BYVAL TextToDisplay AS STRING)
        PROPERTY GET ShowAndReturn <2010> () AS LONG
        PROPERTY SET ShowAndReturn <2010> (BYVAL ShowAndReturn AS LONG)
        METHOD Follow <2011> ()
        METHOD CreateNewDocument <2012> (BYVAL FileName AS STRING, BYVAL EditNow AS LONG, BYVAL Overwrite AS LONG)
        METHOD DELETE <2013> ()
    END INTERFACE
    
    ' Interface Name  : PageSetup
    INTERFACE PageSetup $IID_PowerPoint_PageSetup
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET FirstSlideNumber <2003> () AS LONG
        PROPERTY SET FirstSlideNumber <2003> (BYVAL FirstSlideNumber AS LONG)
        PROPERTY GET SlideHeight <2004> () AS SINGLE
        PROPERTY SET SlideHeight <2004> (BYVAL SlideHeight AS SINGLE)
        PROPERTY GET SlideWidth <2005> () AS SINGLE
        PROPERTY SET SlideWidth <2005> (BYVAL SlideWidth AS SINGLE)
        PROPERTY GET SlideSize <2006> () AS LONG
        PROPERTY SET SlideSize <2006> (BYVAL SlideSize AS LONG)
        PROPERTY GET NotesOrientation <2007> () AS LONG
        PROPERTY SET NotesOrientation <2007> (BYVAL NotesOrientation AS LONG)
        PROPERTY GET SlideOrientation <2008> () AS LONG
        PROPERTY SET SlideOrientation <2008> (BYVAL SlideOrientation AS LONG)
    END INTERFACE
    
    ' Interface Name  : Fonts
    INTERFACE Fonts $IID_PowerPoint_Fonts
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS Int_Font
        METHOD REPLACE <2003> (BYVAL Original AS STRING, BYVAL Replacement AS STRING)
    END INTERFACE
    
    ' Interface Name  : ExtraColors
    INTERFACE ExtraColors $IID_PowerPoint_ExtraColors
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS LONG
        METHOD ADD <2003> (BYVAL PB_Type AS LONG)
    END INTERFACE
    
    ' Interface Name  : Slides
    INTERFACE Slides $IID_PowerPoint_Slides
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS IDISPATCH
        METHOD FindBySlideID <2003> (BYVAL SlideID AS LONG) AS IDISPATCH
        METHOD ADD <2004> (BYVAL Index AS LONG, BYVAL Layout AS LONG) AS IDISPATCH
        METHOD InsertFromFile <2005> (BYVAL FileName AS STRING, BYVAL Index AS LONG, OPT BYVAL SlideStart AS LONG, OPT BYVAL _
            SlideEnd AS LONG) AS LONG
        METHOD RANGE <2006> (OPT BYVAL Index AS VARIANT) AS SlideRange
        METHOD Paste <2007> (OPT BYVAL Index AS LONG) AS SlideRange
    END INTERFACE
    
    ' Interface Name  : Int__Slide
    ' ClassID         : $CLSID_PowerPoint_Slide
    INTERFACE Int__Slide $IID_PowerPoint_Int__Slide
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Shapes <2003> () AS Shapes
        PROPERTY GET HeadersFooters <2004> () AS HeadersFooters
        PROPERTY GET SlideShowTransition <2005> () AS SlideShowTransition
        PROPERTY GET ColorScheme <2006> () AS ColorScheme
        PROPERTY SET ColorScheme <2006> (BYVAL PB_ColorScheme AS ColorScheme)
        PROPERTY GET Background <2007> () AS ShapeRange
        PROPERTY GET NAME <2008> () AS STRING
        PROPERTY SET NAME <2008> (BYVAL PB_Name AS STRING)
        PROPERTY GET SlideID <2009> () AS LONG
        PROPERTY GET PrintSteps <2010> () AS LONG
        METHOD SELECT <2011> ()
        METHOD Cut <2012> ()
        METHOD COPY <2013> ()
        PROPERTY GET Layout <2014> () AS LONG
        PROPERTY SET Layout <2014> (BYVAL Layout AS LONG)
        METHOD Duplicate <2015> () AS SlideRange
        METHOD DELETE <2016> ()
        PROPERTY GET Tags <2017> () AS Tags
        PROPERTY GET SlideIndex <2018> () AS LONG
        PROPERTY GET SlideNumber <2019> () AS LONG
        PROPERTY GET DisplayMasterShapes <2020> () AS LONG
        PROPERTY SET DisplayMasterShapes <2020> (BYVAL DisplayMasterShapes AS LONG)
        PROPERTY GET FollowMasterBackground <2021> () AS LONG
        PROPERTY SET FollowMasterBackground <2021> (BYVAL FollowMasterBackground AS LONG)
        PROPERTY GET NotesPage <2022> () AS SlideRange
        PROPERTY GET Master <2023> () AS Int__Master
        PROPERTY GET Hyperlinks <2024> () AS Hyperlinks
        METHOD EXPORT <2025> (BYVAL FileName AS STRING, BYVAL FilterName AS STRING, OPT BYVAL ScaleWidth AS LONG, OPT BYVAL _
            ScaleHeight AS LONG)
        PROPERTY GET Scripts <2026> () AS IDISPATCH
        PROPERTY GET Comments <2028> () AS Comments
        PROPERTY GET Design <2029> () AS Design
        PROPERTY SET Design <2029> (BYVAL PB_Design AS Design)
        METHOD MoveTo <2030> (BYVAL toPos AS LONG)
        PROPERTY GET TimeLine <2031> () AS TimeLine
        METHOD ApplyTemplate <2032> (BYVAL FileName AS STRING)
    END INTERFACE
    
    ' Interface Name  : SlideRange
    INTERFACE SlideRange $IID_PowerPoint_SlideRange
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Shapes <2003> () AS Shapes
        PROPERTY GET HeadersFooters <2004> () AS HeadersFooters
        PROPERTY GET SlideShowTransition <2005> () AS SlideShowTransition
        PROPERTY GET ColorScheme <2006> () AS ColorScheme
        PROPERTY SET ColorScheme <2006> (BYVAL PB_ColorScheme AS ColorScheme)
        PROPERTY GET Background <2007> () AS ShapeRange
        PROPERTY GET NAME <2008> () AS STRING
        PROPERTY SET NAME <2008> (BYVAL PB_Name AS STRING)
        PROPERTY GET SlideID <2009> () AS LONG
        PROPERTY GET PrintSteps <2010> () AS LONG
        METHOD SELECT <2011> ()
        METHOD Cut <2012> ()
        METHOD COPY <2013> ()
        PROPERTY GET Layout <2014> () AS LONG
        PROPERTY SET Layout <2014> (BYVAL Layout AS LONG)
        METHOD Duplicate <2015> () AS SlideRange
        METHOD DELETE <2016> ()
        PROPERTY GET Tags <2017> () AS Tags
        PROPERTY GET SlideIndex <2018> () AS LONG
        PROPERTY GET SlideNumber <2019> () AS LONG
        PROPERTY GET DisplayMasterShapes <2020> () AS LONG
        PROPERTY SET DisplayMasterShapes <2020> (BYVAL DisplayMasterShapes AS LONG)
        PROPERTY GET FollowMasterBackground <2021> () AS LONG
        PROPERTY SET FollowMasterBackground <2021> (BYVAL FollowMasterBackground AS LONG)
        PROPERTY GET NotesPage <2022> () AS SlideRange
        PROPERTY GET Master <2023> () AS Int__Master
        PROPERTY GET Hyperlinks <2024> () AS Hyperlinks
        METHOD EXPORT <2025> (BYVAL FileName AS STRING, BYVAL FilterName AS STRING, OPT BYVAL ScaleWidth AS LONG, OPT BYVAL _
            ScaleHeight AS LONG)
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS IDISPATCH
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Scripts <2026> () AS IDISPATCH
        PROPERTY GET Comments <2028> () AS Comments
        PROPERTY GET Design <2029> () AS Design
        PROPERTY SET Design <2029> (BYVAL PB_Design AS Design)
        METHOD MoveTo <2030> (BYVAL toPos AS LONG)
        PROPERTY GET TimeLine <2031> () AS TimeLine
        METHOD ApplyTemplate <2032> (BYVAL FileName AS STRING)
    END INTERFACE
    
    ' Interface Name  : Int__Master
    ' ClassID         : $CLSID_PowerPoint_Master
    INTERFACE Int__Master $IID_PowerPoint_Int__Master
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Shapes <2003> () AS Shapes
        PROPERTY GET HeadersFooters <2004> () AS HeadersFooters
        PROPERTY GET ColorScheme <2005> () AS ColorScheme
        PROPERTY SET ColorScheme <2005> (BYVAL PB_ColorScheme AS ColorScheme)
        PROPERTY GET Background <2006> () AS ShapeRange
        PROPERTY GET NAME <2007> () AS STRING
        PROPERTY SET NAME <2007> (BYVAL PB_Name AS STRING)
        METHOD DELETE <2008> ()
        PROPERTY GET Height <2009> () AS SINGLE
        PROPERTY GET WIDTH <2010> () AS SINGLE
        PROPERTY GET TextStyles <2011> () AS TextStyles
        PROPERTY GET Hyperlinks <2012> () AS Hyperlinks
        PROPERTY GET Scripts <2013> () AS IDISPATCH
        PROPERTY GET Design <2014> () AS Design
        PROPERTY GET TimeLine <2015> () AS TimeLine
        PROPERTY GET SlideShowTransition <2016> () AS SlideShowTransition
    END INTERFACE
    
    ' Interface Name  : SldEvents
    ' ClassID         : $CLSID_PowerPoint_Event_SldEvents
    CLASS Class_SldEvents $CLSID_PowerPoint_Event_SldEvents AS EVENT
        INTERFACE SldEvents $IID_PowerPoint_SldEvents
            INHERIT IUNKNOWN
    
        END INTERFACE
    END CLASS
    
    ' Interface Name  : ColorSchemes
    INTERFACE ColorSchemes $IID_PowerPoint_ColorSchemes
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS ColorScheme
        METHOD ADD <2003> (OPT BYVAL Scheme AS ColorScheme) AS ColorScheme
    END INTERFACE
    
    ' Interface Name  : ColorScheme
    INTERFACE ColorScheme $IID_PowerPoint_ColorScheme
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD Colors <0> (BYVAL SchemeColor AS LONG) AS RGBColor
        METHOD DELETE <2003> ()
    END INTERFACE
    
    ' Interface Name  : RGBColor
    INTERFACE RGBColor $IID_PowerPoint_RGBColor
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET RGB <0> () AS LONG
        PROPERTY SET RGB <0> (BYVAL PB_RGB AS LONG)
    END INTERFACE
    
    ' Interface Name  : SlideShowTransition
    INTERFACE SlideShowTransition $IID_PowerPoint_SlideShowTransition
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET AdvanceOnClick <2003> () AS LONG
        PROPERTY SET AdvanceOnClick <2003> (BYVAL AdvanceOnClick AS LONG)
        PROPERTY GET AdvanceOnTime <2004> () AS LONG
        PROPERTY SET AdvanceOnTime <2004> (BYVAL AdvanceOnTime AS LONG)
        PROPERTY GET AdvanceTime <2005> () AS SINGLE
        PROPERTY SET AdvanceTime <2005> (BYVAL AdvanceTime AS SINGLE)
        PROPERTY GET EntryEffect <2006> () AS LONG
        PROPERTY SET EntryEffect <2006> (BYVAL EntryEffect AS LONG)
        PROPERTY GET HIDDEN <2007> () AS LONG
        PROPERTY SET HIDDEN <2007> (BYVAL HIDDEN AS LONG)
        PROPERTY GET LoopSoundUntilNext <2008> () AS LONG
        PROPERTY SET LoopSoundUntilNext <2008> (BYVAL LoopSoundUntilNext AS LONG)
        PROPERTY GET SoundEffect <2009> () AS SoundEffect
        PROPERTY GET SPEED <2010> () AS LONG
        PROPERTY SET SPEED <2010> (BYVAL SPEED AS LONG)
    END INTERFACE
    
    ' Interface Name  : SoundEffect
    INTERFACE SoundEffect $IID_PowerPoint_SoundEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET NAME <2003> () AS STRING
        PROPERTY SET NAME <2003> (BYVAL PB_Name AS STRING)
        PROPERTY GET TYPE <2004> () AS LONG
        PROPERTY SET TYPE <2004> (BYVAL PB_Type AS LONG)
        METHOD ImportFromFile <2005> (BYVAL FileName AS STRING)
        METHOD Play <2006> ()
    END INTERFACE
    
    ' Interface Name  : SoundFormat
    INTERFACE SoundFormat $IID_PowerPoint_SoundFormat
        INHERIT IDISPATCH
    
        METHOD Play <2000> ()
        METHOD Import <2001> (BYVAL FileName AS STRING)
        METHOD EXPORT <2002> (BYVAL FileName AS STRING) AS LONG
        PROPERTY GET TYPE <2003> () AS LONG
        PROPERTY GET SourceFullName <2004> () AS STRING
    END INTERFACE
    
    ' Interface Name  : HeadersFooters
    INTERFACE HeadersFooters $IID_PowerPoint_HeadersFooters
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET DateAndTime <2003> () AS HeaderFooter
        PROPERTY GET SlideNumber <2004> () AS HeaderFooter
        PROPERTY GET HEADER <2005> () AS HeaderFooter
        PROPERTY GET Footer <2006> () AS HeaderFooter
        PROPERTY GET DisplayOnTitleSlide <2007> () AS LONG
        PROPERTY SET DisplayOnTitleSlide <2007> (BYVAL DisplayOnTitleSlide AS LONG)
        METHOD CLEAR <2008> ()
    END INTERFACE
    
    ' Interface Name  : Shapes
    INTERFACE Shapes $IID_PowerPoint_Shapes
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET COUNT <2> () AS LONG
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS Shape
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD AddCallout <10> (BYVAL PB_Type AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddConnector <11> (BYVAL PB_Type AS LONG, BYVAL BeginX AS SINGLE, BYVAL BeginY AS SINGLE, BYVAL EndX AS SINGLE, _
            BYVAL EndY AS SINGLE) AS Shape
        METHOD AddCurve <12> (BYVAL SafeArrayOfPoints AS VARIANT) AS Shape
        METHOD AddLabel <13> (BYVAL ORIENTATION AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddLine <14> (BYVAL BeginX AS SINGLE, BYVAL BeginY AS SINGLE, BYVAL EndX AS SINGLE, BYVAL EndY AS SINGLE) AS _
            Shape
        METHOD AddPicture <15> (BYVAL FileName AS STRING, BYVAL LinkToFile AS LONG, BYVAL SaveWithDocument AS LONG, BYVAL _
            PB_Left AS SINGLE, BYVAL Top AS SINGLE, OPT BYVAL PB_Width AS SINGLE, OPT BYVAL Height AS SINGLE) AS Shape
        METHOD AddPolyline <16> (BYVAL SafeArrayOfPoints AS VARIANT) AS Shape
        METHOD AddShape <17> (BYVAL PB_Type AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddTextEffect <18> (BYVAL PresetTextEffect AS LONG, BYVAL TEXT AS STRING, BYVAL FontName AS STRING, BYVAL _
            FontSize AS SINGLE, BYVAL FontBold AS LONG, BYVAL FontItalic AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS _
            SINGLE) AS Shape
        METHOD AddTextbox <19> (BYVAL ORIENTATION AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS _
            SINGLE, BYVAL Height AS SINGLE) AS Shape
        METHOD BuildFreeform <20> (BYVAL EditingType AS LONG, BYVAL X1 AS SINGLE, BYVAL Y1 AS SINGLE) AS FreeformBuilder
        METHOD SelectAll <22> ()
        METHOD RANGE <2003> (OPT BYVAL Index AS VARIANT) AS ShapeRange
        PROPERTY GET HasTitle <2004> () AS LONG
        METHOD AddTitle <2005> () AS Shape
        PROPERTY GET Title <2006> () AS Shape
        PROPERTY GET Placeholders <2007> () AS Placeholders
        METHOD AddOLEObject <2008> (OPT BYVAL PB_Left AS SINGLE, OPT BYVAL Top AS SINGLE, OPT BYVAL PB_Width AS SINGLE, OPT _
            BYVAL Height AS SINGLE, OPT BYVAL ClassName AS STRING, OPT BYVAL FileName AS STRING, OPT BYVAL DisplayAsIcon AS _
            LONG, OPT BYVAL IconFileName AS STRING, OPT BYVAL IconIndex AS LONG, OPT BYVAL IconLabel AS STRING, OPT BYVAL _
            Link AS LONG) AS Shape
        METHOD AddComment <2009> (OPT BYVAL PB_Left AS SINGLE, OPT BYVAL Top AS SINGLE, OPT BYVAL PB_Width AS SINGLE, OPT BYVAL _
            Height AS SINGLE) AS Shape
        METHOD AddPlaceholder <2010> (BYVAL PB_Type AS LONG, OPT BYVAL PB_Left AS SINGLE, OPT BYVAL Top AS SINGLE, OPT BYVAL _
            PB_Width AS SINGLE, OPT BYVAL Height AS SINGLE) AS Shape
        METHOD AddMediaObject <2011> (BYVAL FileName AS STRING, OPT BYVAL PB_Left AS SINGLE, OPT BYVAL Top AS SINGLE, OPT BYVAL _
            PB_Width AS SINGLE, OPT BYVAL Height AS SINGLE) AS Shape
        METHOD Paste <2012> () AS ShapeRange
        METHOD AddTable <2013> (BYVAL NumRows AS LONG, BYVAL NumColumns AS LONG, OPT BYVAL PB_Left AS SINGLE, OPT BYVAL Top AS _
            SINGLE, OPT BYVAL PB_Width AS SINGLE, OPT BYVAL Height AS SINGLE) AS Shape
        METHOD PasteSpecial <2014> (OPT BYVAL DataType AS LONG, OPT BYVAL DisplayAsIcon AS LONG, OPT BYVAL IconFileName AS _
            STRING, OPT BYVAL IconIndex AS LONG, OPT BYVAL IconLabel AS STRING, OPT BYVAL Link AS LONG) AS ShapeRange
        METHOD AddDiagram <23> (BYVAL PB_Type AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddCanvas <25> (BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, BYVAL Height AS SINGLE) _
            AS Shape
    END INTERFACE
    
    ' Interface Name  : Placeholders
    INTERFACE Placeholders $IID_PowerPoint_Placeholders
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Shape
    END INTERFACE
    
    ' Interface Name  : PlaceholderFormat
    INTERFACE PlaceholderFormat $IID_PowerPoint_PlaceholderFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TYPE <2003> () AS LONG
    END INTERFACE
    
    ' Interface Name  : FreeformBuilder
    INTERFACE FreeformBuilder $IID_PowerPoint_FreeformBuilder
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD AddNodes <10> (BYVAL SegmentType AS LONG, BYVAL EditingType AS LONG, BYVAL X1 AS SINGLE, BYVAL Y1 AS SINGLE, OPT _
            BYVAL X2 AS SINGLE, OPT BYVAL Y2 AS SINGLE, OPT BYVAL X3 AS SINGLE, OPT BYVAL Y3 AS SINGLE)
        METHOD ConvertToShape <11> () AS Shape
    END INTERFACE
    
    ' Interface Name  : Shape
    INTERFACE Shape $IID_PowerPoint_Shape
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD Apply <10> ()
        METHOD DELETE <11> ()
        METHOD Flip <13> (BYVAL FlipCmd AS LONG)
        METHOD IncrementLeft <14> (BYVAL Increment AS SINGLE)
        METHOD IncrementRotation <15> (BYVAL Increment AS SINGLE)
        METHOD IncrementTop <16> (BYVAL Increment AS SINGLE)
        METHOD PickUp <17> ()
        METHOD RerouteConnections <18> ()
        METHOD ScaleHeight <19> (BYVAL Factor AS SINGLE, BYVAL RelativeToOriginalSize AS LONG, OPT BYVAL fScale AS LONG)
        METHOD ScaleWidth <20> (BYVAL Factor AS SINGLE, BYVAL RelativeToOriginalSize AS LONG, OPT BYVAL fScale AS LONG)
        METHOD SetShapesDefaultProperties <22> ()
        METHOD Ungroup <23> () AS ShapeRange
        METHOD ZOrder <24> (BYVAL ZOrderCmd AS LONG)
        PROPERTY GET Adjustments <100> () AS Adjustments
        PROPERTY GET AutoShapeType <101> () AS LONG
        PROPERTY SET AutoShapeType <101> (BYVAL AutoShapeType AS LONG)
        PROPERTY GET BlackWhiteMode <102> () AS LONG
        PROPERTY SET BlackWhiteMode <102> (BYVAL BlackWhiteMode AS LONG)
        PROPERTY GET Callout <103> () AS CalloutFormat
        PROPERTY GET ConnectionSiteCount <104> () AS LONG
        PROPERTY GET Connector <105> () AS LONG
        PROPERTY GET ConnectorFormat <106> () AS ConnectorFormat
        PROPERTY GET FILL <107> () AS FillFormat
        PROPERTY GET GroupItems <108> () AS GroupShapes
        PROPERTY GET Height <109> () AS SINGLE
        PROPERTY SET Height <109> (BYVAL Height AS SINGLE)
        PROPERTY GET HorizontalFlip <110> () AS LONG
        PROPERTY GET LEFT <111> () AS SINGLE
        PROPERTY SET LEFT <111> (BYVAL PB_Left AS SINGLE)
        PROPERTY GET LINE <112> () AS LineFormat
        PROPERTY GET LockAspectRatio <113> () AS LONG
        PROPERTY SET LockAspectRatio <113> (BYVAL LockAspectRatio AS LONG)
        PROPERTY GET NAME <115> () AS STRING
        PROPERTY SET NAME <115> (BYVAL PB_Name AS STRING)
        PROPERTY GET Nodes <116> () AS ShapeNodes
        PROPERTY GET Rotation <117> () AS SINGLE
        PROPERTY SET Rotation <117> (BYVAL Rotation AS SINGLE)
        PROPERTY GET PictureFormat <118> () AS PictureFormat
        PROPERTY GET Shadow <119> () AS ShadowFormat
        PROPERTY GET TextEffect <120> () AS TextEffectFormat
        PROPERTY GET TextFrame <121> () AS TextFrame
        PROPERTY GET ThreeD <122> () AS ThreeDFormat
        PROPERTY GET Top <123> () AS SINGLE
        PROPERTY SET Top <123> (BYVAL Top AS SINGLE)
        PROPERTY GET TYPE <124> () AS LONG
        PROPERTY GET VerticalFlip <125> () AS LONG
        PROPERTY GET Vertices <126> () AS VARIANT
        PROPERTY GET VISIBLE <127> () AS LONG
        PROPERTY SET VISIBLE <127> (BYVAL PB_Visible AS LONG)
        PROPERTY GET WIDTH <128> () AS SINGLE
        PROPERTY SET WIDTH <128> (BYVAL PB_Width AS SINGLE)
        PROPERTY GET ZOrderPosition <129> () AS LONG
        PROPERTY GET OLEFormat <2003> () AS OLEFormat
        PROPERTY GET LinkFormat <2004> () AS LinkFormat
        PROPERTY GET PlaceholderFormat <2005> () AS PlaceholderFormat
        PROPERTY GET AnimationSettings <2006> () AS AnimationSettings
        PROPERTY GET ActionSettings <2007> () AS ActionSettings
        PROPERTY GET Tags <2008> () AS Tags
        METHOD Cut <2009> ()
        METHOD COPY <2010> ()
        METHOD SELECT <2011> (OPT BYVAL PB_Replace AS LONG)
        METHOD Duplicate <2012> () AS ShapeRange
        PROPERTY GET MediaType <2013> () AS LONG
        PROPERTY GET HasTextFrame <2014> () AS LONG
        PROPERTY GET SoundFormat <2015> () AS SoundFormat
        PROPERTY GET Script <130> () AS IDISPATCH
        PROPERTY GET AlternativeText <131> () AS STRING
        PROPERTY SET AlternativeText <131> (BYVAL AlternativeText AS STRING)
        PROPERTY GET HasTable <2016> () AS LONG
        PROPERTY GET Table <2017> () AS Table
        METHOD EXPORT <2018> (BYVAL PathName AS STRING, BYVAL Filter AS LONG, OPT BYVAL ScaleWidth AS LONG, OPT BYVAL _
            ScaleHeight AS LONG, OPT BYVAL ExportMode AS LONG)
        PROPERTY GET HasDiagram <132> () AS LONG
        PROPERTY GET Diagram <133> () AS Diagram
        PROPERTY GET HasDiagramNode <134> () AS LONG
        PROPERTY GET DiagramNode <135> () AS DiagramNode
        PROPERTY GET CHILD <136> () AS LONG
        PROPERTY GET ParentGroup <137> () AS Shape
        PROPERTY GET CanvasItems <138> () AS CanvasShapes
        PROPERTY GET ID <139> () AS LONG
        METHOD CanvasCropLeft <140> (BYVAL Increment AS SINGLE)
        METHOD CanvasCropTop <141> (BYVAL Increment AS SINGLE)
        METHOD CanvasCropRight <142> (BYVAL Increment AS SINGLE)
        METHOD CanvasCropBottom <143> (BYVAL Increment AS SINGLE)
        PROPERTY SET RTF <144> (BYVAL Rhs AS STRING)
    END INTERFACE
    
    ' Interface Name  : ShapeRange
    INTERFACE ShapeRange $IID_PowerPoint_ShapeRange
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD Apply <10> ()
        METHOD DELETE <11> ()
        METHOD Flip <13> (BYVAL FlipCmd AS LONG)
        METHOD IncrementLeft <14> (BYVAL Increment AS SINGLE)
        METHOD IncrementRotation <15> (BYVAL Increment AS SINGLE)
        METHOD IncrementTop <16> (BYVAL Increment AS SINGLE)
        METHOD PickUp <17> ()
        METHOD RerouteConnections <18> ()
        METHOD ScaleHeight <19> (BYVAL Factor AS SINGLE, BYVAL RelativeToOriginalSize AS LONG, OPT BYVAL fScale AS LONG)
        METHOD ScaleWidth <20> (BYVAL Factor AS SINGLE, BYVAL RelativeToOriginalSize AS LONG, OPT BYVAL fScale AS LONG)
        METHOD SetShapesDefaultProperties <22> ()
        METHOD Ungroup <23> () AS ShapeRange
        METHOD ZOrder <24> (BYVAL ZOrderCmd AS LONG)
        PROPERTY GET Adjustments <100> () AS Adjustments
        PROPERTY GET AutoShapeType <101> () AS LONG
        PROPERTY SET AutoShapeType <101> (BYVAL AutoShapeType AS LONG)
        PROPERTY GET BlackWhiteMode <102> () AS LONG
        PROPERTY SET BlackWhiteMode <102> (BYVAL BlackWhiteMode AS LONG)
        PROPERTY GET Callout <103> () AS CalloutFormat
        PROPERTY GET ConnectionSiteCount <104> () AS LONG
        PROPERTY GET Connector <105> () AS LONG
        PROPERTY GET ConnectorFormat <106> () AS ConnectorFormat
        PROPERTY GET FILL <107> () AS FillFormat
        PROPERTY GET GroupItems <108> () AS GroupShapes
        PROPERTY GET Height <109> () AS SINGLE
        PROPERTY SET Height <109> (BYVAL Height AS SINGLE)
        PROPERTY GET HorizontalFlip <110> () AS LONG
        PROPERTY GET LEFT <111> () AS SINGLE
        PROPERTY SET LEFT <111> (BYVAL PB_Left AS SINGLE)
        PROPERTY GET LINE <112> () AS LineFormat
        PROPERTY GET LockAspectRatio <113> () AS LONG
        PROPERTY SET LockAspectRatio <113> (BYVAL LockAspectRatio AS LONG)
        PROPERTY GET NAME <115> () AS STRING
        PROPERTY SET NAME <115> (BYVAL PB_Name AS STRING)
        PROPERTY GET Nodes <116> () AS ShapeNodes
        PROPERTY GET Rotation <117> () AS SINGLE
        PROPERTY SET Rotation <117> (BYVAL Rotation AS SINGLE)
        PROPERTY GET PictureFormat <118> () AS PictureFormat
        PROPERTY GET Shadow <119> () AS ShadowFormat
        PROPERTY GET TextEffect <120> () AS TextEffectFormat
        PROPERTY GET TextFrame <121> () AS TextFrame
        PROPERTY GET ThreeD <122> () AS ThreeDFormat
        PROPERTY GET Top <123> () AS SINGLE
        PROPERTY SET Top <123> (BYVAL Top AS SINGLE)
        PROPERTY GET TYPE <124> () AS LONG
        PROPERTY GET VerticalFlip <125> () AS LONG
        PROPERTY GET Vertices <126> () AS VARIANT
        PROPERTY GET VISIBLE <127> () AS LONG
        PROPERTY SET VISIBLE <127> (BYVAL PB_Visible AS LONG)
        PROPERTY GET WIDTH <128> () AS SINGLE
        PROPERTY SET WIDTH <128> (BYVAL PB_Width AS SINGLE)
        PROPERTY GET ZOrderPosition <129> () AS LONG
        PROPERTY GET OLEFormat <2003> () AS OLEFormat
        PROPERTY GET LinkFormat <2004> () AS LinkFormat
        PROPERTY GET PlaceholderFormat <2005> () AS PlaceholderFormat
        PROPERTY GET AnimationSettings <2006> () AS AnimationSettings
        PROPERTY GET ActionSettings <2007> () AS ActionSettings
        PROPERTY GET Tags <2008> () AS Tags
        METHOD Cut <2009> ()
        METHOD COPY <2010> ()
        METHOD SELECT <2011> (OPT BYVAL PB_Replace AS LONG)
        METHOD Duplicate <2012> () AS ShapeRange
        PROPERTY GET MediaType <2013> () AS LONG
        PROPERTY GET HasTextFrame <2014> () AS LONG
        PROPERTY GET SoundFormat <2015> () AS SoundFormat
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS Shape
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <8> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <9> () AS LONG
        METHOD Group <2016> () AS Shape
        METHOD Regroup <2017> () AS Shape
        METHOD Align <2018> (BYVAL AlignCmd AS LONG, BYVAL RelativeTo AS LONG)
        METHOD Distribute <2019> (BYVAL DistributeCmd AS LONG, BYVAL RelativeTo AS LONG)
        METHOD GetPolygonalRepresentation <2020> (BYVAL maxPointsInBuffer AS DWORD, BYREF IN pPoints AS SINGLE, BYREF _
            numPointsInPolygon AS DWORD, BYREF IsOpen AS LONG)
        PROPERTY GET Script <130> () AS IDISPATCH
        PROPERTY GET AlternativeText <131> () AS STRING
        PROPERTY SET AlternativeText <131> (BYVAL AlternativeText AS STRING)
        PROPERTY GET HasTable <2021> () AS LONG
        PROPERTY GET Table <2022> () AS Table
        METHOD EXPORT <2023> (BYVAL PathName AS STRING, BYVAL Filter AS LONG, OPT BYVAL ScaleWidth AS LONG, OPT BYVAL _
            ScaleHeight AS LONG, OPT BYVAL ExportMode AS LONG)
        PROPERTY GET HasDiagram <132> () AS LONG
        PROPERTY GET Diagram <133> () AS Diagram
        PROPERTY GET HasDiagramNode <134> () AS LONG
        PROPERTY GET DiagramNode <135> () AS DiagramNode
        PROPERTY GET CHILD <136> () AS LONG
        PROPERTY GET ParentGroup <137> () AS Shape
        PROPERTY GET CanvasItems <138> () AS CanvasShapes
        PROPERTY GET ID <139> () AS LONG
        METHOD CanvasCropLeft <140> (BYVAL Increment AS SINGLE)
        METHOD CanvasCropTop <141> (BYVAL Increment AS SINGLE)
        METHOD CanvasCropRight <142> (BYVAL Increment AS SINGLE)
        METHOD CanvasCropBottom <143> (BYVAL Increment AS SINGLE)
        PROPERTY SET RTF <144> (BYVAL Rhs AS STRING)
    END INTERFACE
    
    ' Interface Name  : GroupShapes
    INTERFACE GroupShapes $IID_PowerPoint_GroupShapes
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET COUNT <2> () AS LONG
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS Shape
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD RANGE <10> (BYVAL Index AS VARIANT) AS ShapeRange
    END INTERFACE
    
    ' Interface Name  : Adjustments
    INTERFACE Adjustments $IID_PowerPoint_Adjustments
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET COUNT <2> () AS LONG
        PROPERTY GET ITEM <0> (BYVAL Index AS LONG) AS SINGLE
        PROPERTY SET ITEM <0> (BYVAL Index AS LONG, BYVAL PB_Val AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : PictureFormat
    INTERFACE PictureFormat $IID_PowerPoint_PictureFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD IncrementBrightness <10> (BYVAL Increment AS SINGLE)
        METHOD IncrementContrast <11> (BYVAL Increment AS SINGLE)
        PROPERTY GET Brightness <100> () AS SINGLE
        PROPERTY SET Brightness <100> (BYVAL Brightness AS SINGLE)
        PROPERTY GET ColorType <101> () AS LONG
        PROPERTY SET ColorType <101> (BYVAL ColorType AS LONG)
        PROPERTY GET Contrast <102> () AS SINGLE
        PROPERTY SET Contrast <102> (BYVAL Contrast AS SINGLE)
        PROPERTY GET CropBottom <103> () AS SINGLE
        PROPERTY SET CropBottom <103> (BYVAL CropBottom AS SINGLE)
        PROPERTY GET CropLeft <104> () AS SINGLE
        PROPERTY SET CropLeft <104> (BYVAL CropLeft AS SINGLE)
        PROPERTY GET CropRight <105> () AS SINGLE
        PROPERTY SET CropRight <105> (BYVAL CropRight AS SINGLE)
        PROPERTY GET CropTop <106> () AS SINGLE
        PROPERTY SET CropTop <106> (BYVAL CropTop AS SINGLE)
        PROPERTY GET TransparencyColor <107> () AS LONG
        PROPERTY SET TransparencyColor <107> (BYVAL TransparencyColor AS LONG)
        PROPERTY GET TransparentBackground <108> () AS LONG
        PROPERTY SET TransparentBackground <108> (BYVAL TransparentBackground AS LONG)
    END INTERFACE
    
    ' Interface Name  : FillFormat
    
    INTERFACE FillFormat $IID_PowerPoint_FillFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD Background <10> ()
        METHOD OneColorGradient <11> (BYVAL STYLE AS LONG, BYVAL PB_Variant AS LONG, BYVAL Degree AS SINGLE)
        METHOD Patterned <12> (BYVAL Pattern AS LONG)
        METHOD PresetGradient <13> (BYVAL STYLE AS LONG, BYVAL PB_Variant AS LONG, BYVAL PresetGradientType AS LONG)
        METHOD PresetTextured <14> (BYVAL PresetTexture AS LONG)
        METHOD Solid <15> ()
        METHOD TwoColorGradient <16> (BYVAL STYLE AS LONG, BYVAL PB_Variant AS LONG)
        METHOD UserPicture <17> (BYVAL PictureFile AS STRING)
        METHOD UserTextured <18> (BYVAL TextureFile AS STRING)
        PROPERTY GET BackColor <100> () AS ColorFormat
        PROPERTY SET BackColor <100> (BYVAL BackColor AS ColorFormat)
        PROPERTY GET ForeColor <101> () AS ColorFormat
        PROPERTY SET ForeColor <101> (BYVAL ForeColor AS ColorFormat)
        PROPERTY GET GradientColorType <102> () AS LONG
        PROPERTY GET GradientDegree <103> () AS SINGLE
        PROPERTY GET GradientStyle <104> () AS LONG
        PROPERTY GET GradientVariant <105> () AS LONG
        PROPERTY GET Pattern <106> () AS LONG
        PROPERTY GET PresetGradientType <107> () AS LONG
        PROPERTY GET PresetTexture <108> () AS LONG
        PROPERTY GET TextureName <109> () AS STRING
        PROPERTY GET TextureType <110> () AS LONG
        PROPERTY GET Transparency <111> () AS SINGLE
        PROPERTY SET Transparency <111> (BYVAL Transparency AS SINGLE)
        PROPERTY GET TYPE <112> () AS LONG
        PROPERTY GET VISIBLE <113> () AS LONG
        PROPERTY SET VISIBLE <113> (BYVAL PB_Visible AS LONG)
    END INTERFACE
    
    ' Interface Name  : LineFormat
    INTERFACE LineFormat $IID_PowerPoint_LineFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET BackColor <100> () AS ColorFormat
        PROPERTY SET BackColor <100> (BYVAL BackColor AS ColorFormat)
        PROPERTY GET BeginArrowheadLength <101> () AS LONG
        PROPERTY SET BeginArrowheadLength <101> (BYVAL BeginArrowheadLength AS LONG)
        PROPERTY GET BeginArrowheadStyle <102> () AS LONG
        PROPERTY SET BeginArrowheadStyle <102> (BYVAL BeginArrowheadStyle AS LONG)
        PROPERTY GET BeginArrowheadWidth <103> () AS LONG
        PROPERTY SET BeginArrowheadWidth <103> (BYVAL BeginArrowheadWidth AS LONG)
        PROPERTY GET DashStyle <104> () AS LONG
        PROPERTY SET DashStyle <104> (BYVAL DashStyle AS LONG)
        PROPERTY GET EndArrowheadLength <105> () AS LONG
        PROPERTY SET EndArrowheadLength <105> (BYVAL EndArrowheadLength AS LONG)
        PROPERTY GET EndArrowheadStyle <106> () AS LONG
        PROPERTY SET EndArrowheadStyle <106> (BYVAL EndArrowheadStyle AS LONG)
        PROPERTY GET EndArrowheadWidth <107> () AS LONG
        PROPERTY SET EndArrowheadWidth <107> (BYVAL EndArrowheadWidth AS LONG)
        PROPERTY GET ForeColor <108> () AS ColorFormat
        PROPERTY SET ForeColor <108> (BYVAL ForeColor AS ColorFormat)
        PROPERTY GET Pattern <109> () AS LONG
        PROPERTY SET Pattern <109> (BYVAL Pattern AS LONG)
        PROPERTY GET STYLE <110> () AS LONG
        PROPERTY SET STYLE <110> (BYVAL STYLE AS LONG)
        PROPERTY GET Transparency <111> () AS SINGLE
        PROPERTY SET Transparency <111> (BYVAL Transparency AS SINGLE)
        PROPERTY GET VISIBLE <112> () AS LONG
        PROPERTY SET VISIBLE <112> (BYVAL PB_Visible AS LONG)
        PROPERTY GET Weight <113> () AS SINGLE
        PROPERTY SET Weight <113> (BYVAL Weight AS SINGLE)
        PROPERTY GET InsetPen <114> () AS LONG
        PROPERTY SET InsetPen <114> (BYVAL InsetPen AS LONG)
    END INTERFACE
    
    ' Interface Name  : ShadowFormat
    INTERFACE ShadowFormat $IID_PowerPoint_ShadowFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD IncrementOffsetX <10> (BYVAL Increment AS SINGLE)
        METHOD IncrementOffsetY <11> (BYVAL Increment AS SINGLE)
        PROPERTY GET ForeColor <100> () AS ColorFormat
        PROPERTY SET ForeColor <100> (BYVAL ForeColor AS ColorFormat)
        PROPERTY GET Obscured <101> () AS LONG
        PROPERTY SET Obscured <101> (BYVAL Obscured AS LONG)
        PROPERTY GET OffsetX <102> () AS SINGLE
        PROPERTY SET OffsetX <102> (BYVAL OffsetX AS SINGLE)
        PROPERTY GET OffsetY <103> () AS SINGLE
        PROPERTY SET OffsetY <103> (BYVAL OffsetY AS SINGLE)
        PROPERTY GET Transparency <104> () AS SINGLE
        PROPERTY SET Transparency <104> (BYVAL Transparency AS SINGLE)
        PROPERTY GET TYPE <105> () AS LONG
        PROPERTY SET TYPE <105> (BYVAL PB_Type AS LONG)
        PROPERTY GET VISIBLE <106> () AS LONG
        PROPERTY SET VISIBLE <106> (BYVAL PB_Visible AS LONG)
    END INTERFACE
    
    ' Interface Name  : ConnectorFormat
    INTERFACE ConnectorFormat $IID_PowerPoint_ConnectorFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD BeginConnect <10> (BYVAL ConnectedShape AS Shape, BYVAL ConnectionSite AS LONG)
        METHOD BeginDisconnect <11> ()
        METHOD EndConnect <12> (BYVAL ConnectedShape AS Shape, BYVAL ConnectionSite AS LONG)
        METHOD EndDisconnect <13> ()
        PROPERTY GET BeginConnected <100> () AS LONG
        PROPERTY GET BeginConnectedShape <101> () AS Shape
        PROPERTY GET BeginConnectionSite <102> () AS LONG
        PROPERTY GET EndConnected <103> () AS LONG
        PROPERTY GET EndConnectedShape <104> () AS Shape
        PROPERTY GET EndConnectionSite <105> () AS LONG
        PROPERTY GET TYPE <106> () AS LONG
        PROPERTY SET TYPE <106> (BYVAL PB_Type AS LONG)
    END INTERFACE
    
    ' Interface Name  : TextEffectFormat
    INTERFACE TextEffectFormat $IID_PowerPoint_TextEffectFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD ToggleVerticalText <10> ()
        PROPERTY GET Alignment <100> () AS LONG
        PROPERTY SET Alignment <100> (BYVAL Alignment AS LONG)
        PROPERTY GET FontBold <101> () AS LONG
        PROPERTY SET FontBold <101> (BYVAL FontBold AS LONG)
        PROPERTY GET FontItalic <102> () AS LONG
        PROPERTY SET FontItalic <102> (BYVAL FontItalic AS LONG)
        PROPERTY GET FontName <103> () AS STRING
        PROPERTY SET FontName <103> (BYVAL FontName AS STRING)
        PROPERTY GET FontSize <104> () AS SINGLE
        PROPERTY SET FontSize <104> (BYVAL FontSize AS SINGLE)
        PROPERTY GET KernedPairs <105> () AS LONG
        PROPERTY SET KernedPairs <105> (BYVAL KernedPairs AS LONG)
        PROPERTY GET NormalizedHeight <106> () AS LONG
        PROPERTY SET NormalizedHeight <106> (BYVAL NormalizedHeight AS LONG)
        PROPERTY GET PresetShape <107> () AS LONG
        PROPERTY SET PresetShape <107> (BYVAL PresetShape AS LONG)
        PROPERTY GET PresetTextEffect <108> () AS LONG
        PROPERTY SET PresetTextEffect <108> (BYVAL Preset AS LONG)
        PROPERTY GET RotatedChars <109> () AS LONG
        PROPERTY SET RotatedChars <109> (BYVAL RotatedChars AS LONG)
        PROPERTY GET TEXT <110> () AS STRING
        PROPERTY SET TEXT <110> (BYVAL TEXT AS STRING)
        PROPERTY GET Tracking <111> () AS SINGLE
        PROPERTY SET Tracking <111> (BYVAL Tracking AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : ThreeDFormat
    INTERFACE ThreeDFormat $IID_PowerPoint_ThreeDFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD IncrementRotationX <10> (BYVAL Increment AS SINGLE)
        METHOD IncrementRotationY <11> (BYVAL Increment AS SINGLE)
        METHOD ResetRotation <12> ()
        METHOD SetThreeDFormat <13> (BYVAL PresetThreeDFormat AS LONG)
        METHOD SetExtrusionDirection <14> (BYVAL PresetExtrusionDirection AS LONG)
        PROPERTY GET Depth <100> () AS SINGLE
        PROPERTY SET Depth <100> (BYVAL Depth AS SINGLE)
        PROPERTY GET ExtrusionColor <101> () AS ColorFormat
        PROPERTY GET ExtrusionColorType <102> () AS LONG
        PROPERTY SET ExtrusionColorType <102> (BYVAL ExtrusionColorType AS LONG)
        PROPERTY GET Perspective <103> () AS LONG
        PROPERTY SET Perspective <103> (BYVAL Perspective AS LONG)
        PROPERTY GET PresetExtrusionDirection <104> () AS LONG
        PROPERTY GET PresetLightingDirection <105> () AS LONG
        PROPERTY SET PresetLightingDirection <105> (BYVAL PresetLightingDirection AS LONG)
        PROPERTY GET PresetLightingSoftness <106> () AS LONG
        PROPERTY SET PresetLightingSoftness <106> (BYVAL PresetLightingSoftness AS LONG)
        PROPERTY GET PresetMaterial <107> () AS LONG
        PROPERTY SET PresetMaterial <107> (BYVAL PresetMaterial AS LONG)
        PROPERTY GET PresetThreeDFormat <108> () AS LONG
        PROPERTY GET RotationX <109> () AS SINGLE
        PROPERTY SET RotationX <109> (BYVAL RotationX AS SINGLE)
        PROPERTY GET RotationY <110> () AS SINGLE
        PROPERTY SET RotationY <110> (BYVAL RotationY AS SINGLE)
        PROPERTY GET VISIBLE <111> () AS LONG
        PROPERTY SET VISIBLE <111> (BYVAL PB_Visible AS LONG)
    END INTERFACE
    
    ' Interface Name  : TextFrame
    INTERFACE TextFrame $IID_PowerPoint_TextFrame
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET MarginBottom <100> () AS SINGLE
        PROPERTY SET MarginBottom <100> (BYVAL MarginBottom AS SINGLE)
        PROPERTY GET MarginLeft <101> () AS SINGLE
        PROPERTY SET MarginLeft <101> (BYVAL MarginLeft AS SINGLE)
        PROPERTY GET MarginRight <102> () AS SINGLE
        PROPERTY SET MarginRight <102> (BYVAL MarginRight AS SINGLE)
        PROPERTY GET MarginTop <103> () AS SINGLE
        PROPERTY SET MarginTop <103> (BYVAL MarginTop AS SINGLE)
        PROPERTY GET ORIENTATION <104> () AS LONG
        PROPERTY SET ORIENTATION <104> (BYVAL ORIENTATION AS LONG)
        PROPERTY GET HasText <2003> () AS LONG
        PROPERTY GET TextRange <2004> () AS TextRange
        PROPERTY GET Ruler <2005> () AS Ruler
        PROPERTY GET HorizontalAnchor <2006> () AS LONG
        PROPERTY SET HorizontalAnchor <2006> (BYVAL HorizontalAnchor AS LONG)
        PROPERTY GET VerticalAnchor <2007> () AS LONG
        PROPERTY SET VerticalAnchor <2007> (BYVAL VerticalAnchor AS LONG)
        PROPERTY GET AutoSize <2008> () AS LONG
        PROPERTY SET AutoSize <2008> (BYVAL AutoSize AS LONG)
        PROPERTY GET WordWrap <2009> () AS LONG
        PROPERTY SET WordWrap <2009> (BYVAL WordWrap AS LONG)
        METHOD DeleteText <2010> ()
    END INTERFACE
    
    ' Interface Name  : CalloutFormat
    INTERFACE CalloutFormat $IID_PowerPoint_CalloutFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        METHOD AutomaticLength <10> ()
        METHOD CustomDrop <11> (BYVAL Drop AS SINGLE)
        METHOD CustomLength <12> (BYVAL Length AS SINGLE)
        METHOD PresetDrop <13> (BYVAL DropType AS LONG)
        PROPERTY GET Accent <100> () AS LONG
        PROPERTY SET Accent <100> (BYVAL Accent AS LONG)
        PROPERTY GET Angle <101> () AS LONG
        PROPERTY SET Angle <101> (BYVAL Angle AS LONG)
        PROPERTY GET AutoAttach <102> () AS LONG
        PROPERTY SET AutoAttach <102> (BYVAL AutoAttach AS LONG)
        PROPERTY GET AutoLength <103> () AS LONG
        PROPERTY GET BORDER <104> () AS LONG
        PROPERTY SET BORDER <104> (BYVAL BORDER AS LONG)
        PROPERTY GET Drop <105> () AS SINGLE
        PROPERTY GET DropType <106> () AS LONG
        PROPERTY GET Gap <107> () AS SINGLE
        PROPERTY SET Gap <107> (BYVAL Gap AS SINGLE)
        PROPERTY GET Length <108> () AS SINGLE
        PROPERTY GET TYPE <109> () AS LONG
        PROPERTY SET TYPE <109> (BYVAL PB_Type AS LONG)
    END INTERFACE
    
    ' Interface Name  : ShapeNodes
    INTERFACE ShapeNodes $IID_PowerPoint_ShapeNodes
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET COUNT <2> () AS LONG
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS ShapeNode
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD DELETE <11> (BYVAL Index AS LONG)
        METHOD INSERT <12> (BYVAL Index AS LONG, BYVAL SegmentType AS LONG, BYVAL EditingType AS LONG, BYVAL X1 AS SINGLE, BYVAL _
            Y1 AS SINGLE, OPT BYVAL X2 AS SINGLE, OPT BYVAL Y2 AS SINGLE, OPT BYVAL X3 AS SINGLE, OPT BYVAL Y3 AS SINGLE)
        METHOD SetEditingType <13> (BYVAL Index AS LONG, BYVAL EditingType AS LONG)
        METHOD SetPosition <14> (BYVAL Index AS LONG, BYVAL X1 AS SINGLE, BYVAL Y1 AS SINGLE)
        METHOD SetSegmentType <15> (BYVAL Index AS LONG, BYVAL SegmentType AS LONG)
    END INTERFACE
    
    ' Interface Name  : ShapeNode
    INTERFACE ShapeNode $IID_PowerPoint_ShapeNode
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET EditingType <100> () AS LONG
        PROPERTY GET Points <101> () AS VARIANT
        PROPERTY GET SegmentType <102> () AS LONG
    END INTERFACE
    
    ' Interface Name  : OLEFormat
    INTERFACE OLEFormat $IID_PowerPoint_OLEFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET ObjectVerbs <2003> () AS ObjectVerbs
        PROPERTY GET OBJECT <2004> () AS IDISPATCH
        PROPERTY GET ProgID <2005> () AS STRING
        PROPERTY GET FollowColors <2006> () AS LONG
        PROPERTY SET FollowColors <2006> (BYVAL FollowColors AS LONG)
        METHOD DoVerb <2007> (OPT BYVAL Index AS LONG)
        METHOD Activate <2008> ()
    END INTERFACE
    
    ' Interface Name  : LinkFormat
    INTERFACE LinkFormat $IID_PowerPoint_LinkFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET SourceFullName <2003> () AS STRING
        PROPERTY SET SourceFullName <2003> (BYVAL SourceFullName AS STRING)
        PROPERTY GET AutoUpdate <2004> () AS LONG
        PROPERTY SET AutoUpdate <2004> (BYVAL AutoUpdate AS LONG)
        METHOD Update <2005> ()
    END INTERFACE
    
    ' Interface Name  : ObjectVerbs
    INTERFACE ObjectVerbs $IID_PowerPoint_ObjectVerbs
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS STRING
    END INTERFACE
    
    ' Interface Name  : AnimationSettings
    INTERFACE AnimationSettings $IID_PowerPoint_AnimationSettings
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET DimColor <2003> () AS ColorFormat
        PROPERTY GET SoundEffect <2004> () AS SoundEffect
        PROPERTY GET EntryEffect <2005> () AS LONG
        PROPERTY SET EntryEffect <2005> (BYVAL EntryEffect AS LONG)
        PROPERTY GET AfterEffect <2006> () AS LONG
        PROPERTY SET AfterEffect <2006> (BYVAL AfterEffect AS LONG)
        PROPERTY GET AnimationOrder <2007> () AS LONG
        PROPERTY SET AnimationOrder <2007> (BYVAL AnimationOrder AS LONG)
        PROPERTY GET AdvanceMode <2008> () AS LONG
        PROPERTY SET AdvanceMode <2008> (BYVAL AdvanceMode AS LONG)
        PROPERTY GET AdvanceTime <2009> () AS SINGLE
        PROPERTY SET AdvanceTime <2009> (BYVAL AdvanceTime AS SINGLE)
        PROPERTY GET PlaySettings <2010> () AS PlaySettings
        PROPERTY GET TextLevelEffect <2011> () AS LONG
        PROPERTY SET TextLevelEffect <2011> (BYVAL TextLevelEffect AS LONG)
        PROPERTY GET TextUnitEffect <2012> () AS LONG
        PROPERTY SET TextUnitEffect <2012> (BYVAL TextUnitEffect AS LONG)
        PROPERTY GET Animate <2013> () AS LONG
        PROPERTY SET Animate <2013> (BYVAL Animate AS LONG)
        PROPERTY GET AnimateBackground <2014> () AS LONG
        PROPERTY SET AnimateBackground <2014> (BYVAL AnimateBackground AS LONG)
        PROPERTY GET AnimateTextInReverse <2015> () AS LONG
        PROPERTY SET AnimateTextInReverse <2015> (BYVAL AnimateTextInReverse AS LONG)
        PROPERTY GET ChartUnitEffect <2016> () AS LONG
        PROPERTY SET ChartUnitEffect <2016> (BYVAL ChartUnitEffect AS LONG)
    END INTERFACE
    
    ' Interface Name  : ActionSettings
    INTERFACE ActionSettings $IID_PowerPoint_ActionSettings
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS ActionSetting
    END INTERFACE
    
    ' Interface Name  : ActionSetting
    INTERFACE ActionSetting $IID_PowerPoint_ActionSetting
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Action <2003> () AS LONG
        PROPERTY SET Action <2003> (BYVAL Action AS LONG)
        PROPERTY GET ActionVerb <2004> () AS STRING
        PROPERTY SET ActionVerb <2004> (BYVAL ActionVerb AS STRING)
        PROPERTY GET AnimateAction <2005> () AS LONG
        PROPERTY SET AnimateAction <2005> (BYVAL AnimateAction AS LONG)
        PROPERTY GET Run <2006> () AS STRING
        PROPERTY SET Run <2006> (BYVAL Run AS STRING)
        PROPERTY GET SlideShowName <2007> () AS STRING
        PROPERTY SET SlideShowName <2007> (BYVAL SlideShowName AS STRING)
        PROPERTY GET Hyperlink <2008> () AS Hyperlink
        PROPERTY GET SoundEffect <2009> () AS SoundEffect
        PROPERTY GET ShowAndReturn <2010> () AS LONG
        PROPERTY SET ShowAndReturn <2010> (BYVAL ShowAndReturn AS LONG)
    END INTERFACE
    
    ' Interface Name  : PlaySettings
    INTERFACE PlaySettings $IID_PowerPoint_PlaySettings
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET ActionVerb <2003> () AS STRING
        PROPERTY SET ActionVerb <2003> (BYVAL ActionVerb AS STRING)
        PROPERTY GET HideWhileNotPlaying <2004> () AS LONG
        PROPERTY SET HideWhileNotPlaying <2004> (BYVAL HideWhileNotPlaying AS LONG)
        PROPERTY GET LoopUntilStopped <2005> () AS LONG
        PROPERTY SET LoopUntilStopped <2005> (BYVAL LoopUntilStopped AS LONG)
        PROPERTY GET PlayOnEntry <2006> () AS LONG
        PROPERTY SET PlayOnEntry <2006> (BYVAL PlayOnEntry AS LONG)
        PROPERTY GET RewindMovie <2007> () AS LONG
        PROPERTY SET RewindMovie <2007> (BYVAL RewindMovie AS LONG)
        PROPERTY GET PauseAnimation <2008> () AS LONG
        PROPERTY SET PauseAnimation <2008> (BYVAL PauseAnimation AS LONG)
        PROPERTY GET StopAfterSlides <2009> () AS LONG
        PROPERTY SET StopAfterSlides <2009> (BYVAL StopAfterSlides AS LONG)
    END INTERFACE
    
    ' Interface Name  : TextRange
    INTERFACE TextRange $IID_PowerPoint_TextRange
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET ActionSettings <2003> () AS ActionSettings
        PROPERTY GET Start <2004> () AS LONG
        PROPERTY GET Length <2005> () AS LONG
        PROPERTY GET BoundLeft <2006> () AS SINGLE
        PROPERTY GET BoundTop <2007> () AS SINGLE
        PROPERTY GET BoundWidth <2008> () AS SINGLE
        PROPERTY GET BoundHeight <2009> () AS SINGLE
        METHOD Paragraphs <2010> (OPT BYVAL Start AS LONG, OPT BYVAL Length AS LONG) AS TextRange
        METHOD Sentences <2011> (OPT BYVAL Start AS LONG, OPT BYVAL Length AS LONG) AS TextRange
        METHOD Words <2012> (OPT BYVAL Start AS LONG, OPT BYVAL Length AS LONG) AS TextRange
        METHOD Characters <2013> (OPT BYVAL Start AS LONG, OPT BYVAL Length AS LONG) AS TextRange
        METHOD LINES <2014> (OPT BYVAL Start AS LONG, OPT BYVAL Length AS LONG) AS TextRange
        METHOD Runs <2015> (OPT BYVAL Start AS LONG, OPT BYVAL Length AS LONG) AS TextRange
        METHOD TrimText <2016> () AS TextRange
        PROPERTY GET TEXT <0> () AS STRING
        PROPERTY SET TEXT <0> (BYVAL Rhs AS STRING)
        METHOD InsertAfter <2017> (OPT BYVAL NewText AS STRING) AS TextRange
        METHOD InsertBefore <2018> (OPT BYVAL NewText AS STRING) AS TextRange
        METHOD InsertDateTime <2019> (BYVAL DateTimeFormat AS LONG, OPT BYVAL InsertAsField AS LONG) AS TextRange
        METHOD InsertSlideNumber <2020> () AS TextRange
        METHOD InsertSymbol <2021> (BYVAL FontName AS STRING, BYVAL CharNumber AS LONG, OPT BYVAL UNICODE AS LONG) AS TextRange
        PROPERTY GET FONT <2022> () AS Int_Font
        PROPERTY GET ParagraphFormat <2023> () AS ParagraphFormat
        PROPERTY GET IndentLevel <2024> () AS LONG
        PROPERTY SET IndentLevel <2024> (BYVAL Rhs AS LONG)
        METHOD SELECT <2025> ()
        METHOD Cut <2026> ()
        METHOD COPY <2027> ()
        METHOD DELETE <2028> ()
        METHOD Paste <2029> () AS TextRange
        METHOD ChangeCase <2030> (BYVAL PB_Type AS LONG)
        METHOD AddPeriods <2031> ()
        METHOD RemovePeriods <2032> ()
        METHOD FIND <2033> (BYVAL FindWhat AS STRING, OPT BYVAL After AS LONG, OPT BYVAL MatchCase AS LONG, OPT BYVAL WholeWords _
            AS LONG) AS TextRange
        METHOD REPLACE <2034> (BYVAL FindWhat AS STRING, BYVAL ReplaceWhat AS STRING, OPT BYVAL After AS LONG, OPT BYVAL _
            MatchCase AS LONG, OPT BYVAL WholeWords AS LONG) AS TextRange
        METHOD RotatedBounds <2035> (BYREF X1 AS SINGLE, BYREF Y1 AS SINGLE, BYREF X2 AS SINGLE, BYREF Y2 AS SINGLE, BYREF X3 AS _
            SINGLE, BYREF Y3 AS SINGLE, BYREF x4 AS SINGLE, BYREF y4 AS SINGLE)
        PROPERTY GET LanguageID <2036> () AS LONG
        PROPERTY SET LanguageID <2036> (BYVAL LanguageID AS LONG)
        METHOD RtlRun <2037> ()
        METHOD LtrRun <2038> ()
        METHOD PasteSpecial <2039> (OPT BYVAL DataType AS LONG, OPT BYVAL DisplayAsIcon AS LONG, OPT BYVAL IconFileName AS _
            STRING, OPT BYVAL IconIndex AS LONG, OPT BYVAL IconLabel AS STRING, OPT BYVAL Link AS LONG) AS TextRange
    END INTERFACE
    
    ' Interface Name  : Ruler
    INTERFACE Ruler $IID_PowerPoint_Ruler
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TabStops <2003> () AS TabStops
        PROPERTY GET Levels <2004> () AS RulerLevels
    END INTERFACE
    
    ' Interface Name  : RulerLevels
    INTERFACE RulerLevels $IID_PowerPoint_RulerLevels
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS RulerLevel
    END INTERFACE
    
    ' Interface Name  : RulerLevel
    INTERFACE RulerLevel $IID_PowerPoint_RulerLevel
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET FirstMargin <2003> () AS SINGLE
        PROPERTY SET FirstMargin <2003> (BYVAL FirstMargin AS SINGLE)
        PROPERTY GET LeftMargin <2004> () AS SINGLE
        PROPERTY SET LeftMargin <2004> (BYVAL LeftMargin AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : TabStops
    INTERFACE TabStops $IID_PowerPoint_TabStops
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS TabStop
        PROPERTY GET DefaultSpacing <2003> () AS SINGLE
        PROPERTY SET DefaultSpacing <2003> (BYVAL DefaultSpacing AS SINGLE)
        METHOD ADD <2004> (BYVAL PB_Type AS LONG, BYVAL Position AS SINGLE) AS TabStop
    END INTERFACE
    
    ' Interface Name  : TabStop
    INTERFACE TabStop $IID_PowerPoint_TabStop
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TYPE <2003> () AS LONG
        PROPERTY SET TYPE <2003> (BYVAL PB_Type AS LONG)
        PROPERTY GET Position <2004> () AS SINGLE
        PROPERTY SET Position <2004> (BYVAL Position AS SINGLE)
        METHOD CLEAR <2005> ()
    END INTERFACE
    
    ' Interface Name  : Int_Font
    INTERFACE Int_Font $IID_PowerPoint_Int_Font
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET COLOR <2003> () AS ColorFormat
        PROPERTY GET BOLD <2004> () AS LONG
        PROPERTY SET BOLD <2004> (BYVAL BOLD AS LONG)
        PROPERTY GET Italic <2005> () AS LONG
        PROPERTY SET Italic <2005> (BYVAL Italic AS LONG)
        PROPERTY GET Shadow <2006> () AS LONG
        PROPERTY SET Shadow <2006> (BYVAL Shadow AS LONG)
        PROPERTY GET Emboss <2007> () AS LONG
        PROPERTY SET Emboss <2007> (BYVAL Emboss AS LONG)
        PROPERTY GET Underline <2008> () AS LONG
        PROPERTY SET Underline <2008> (BYVAL Underline AS LONG)
        PROPERTY GET Subscript <2009> () AS LONG
        PROPERTY SET Subscript <2009> (BYVAL Subscript AS LONG)
        PROPERTY GET Superscript <2010> () AS LONG
        PROPERTY SET Superscript <2010> (BYVAL Superscript AS LONG)
        PROPERTY GET BaselineOffset <2011> () AS SINGLE
        PROPERTY SET BaselineOffset <2011> (BYVAL BaselineOffset AS SINGLE)
        PROPERTY GET Embedded <2012> () AS LONG
        PROPERTY GET Embeddable <2013> () AS LONG
        PROPERTY GET SIZE <2014> () AS SINGLE
        PROPERTY SET SIZE <2014> (BYVAL SIZE AS SINGLE)
        PROPERTY GET NAME <2015> () AS STRING
        PROPERTY SET NAME <2015> (BYVAL PB_Name AS STRING)
        PROPERTY GET NameFarEast <2016> () AS STRING
        PROPERTY SET NameFarEast <2016> (BYVAL NameFarEast AS STRING)
        PROPERTY GET NameAscii <2017> () AS STRING
        PROPERTY SET NameAscii <2017> (BYVAL NameAscii AS STRING)
        PROPERTY GET AutoRotateNumbers <2018> () AS LONG
        PROPERTY SET AutoRotateNumbers <2018> (BYVAL AutoRotateNumbers AS LONG)
        PROPERTY GET NameOther <2019> () AS STRING
        PROPERTY SET NameOther <2019> (BYVAL NameOther AS STRING)
        PROPERTY GET NameComplexScript <2020> () AS STRING
        PROPERTY SET NameComplexScript <2020> (BYVAL NameComplexScript AS STRING)
    END INTERFACE
    
    ' Interface Name  : ParagraphFormat
    INTERFACE ParagraphFormat $IID_PowerPoint_ParagraphFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Alignment <2003> () AS LONG
        PROPERTY SET Alignment <2003> (BYVAL Alignment AS LONG)
        PROPERTY GET Bullet <2004> () AS BulletFormat
        PROPERTY GET LineRuleBefore <2005> () AS LONG
        PROPERTY SET LineRuleBefore <2005> (BYVAL LineRuleBefore AS LONG)
        PROPERTY GET LineRuleAfter <2006> () AS LONG
        PROPERTY SET LineRuleAfter <2006> (BYVAL LineRuleAfter AS LONG)
        PROPERTY GET LineRuleWithin <2007> () AS LONG
        PROPERTY SET LineRuleWithin <2007> (BYVAL LineRuleWithin AS LONG)
        PROPERTY GET SpaceBefore <2008> () AS SINGLE
        PROPERTY SET SpaceBefore <2008> (BYVAL SpaceBefore AS SINGLE)
        PROPERTY GET SpaceAfter <2009> () AS SINGLE
        PROPERTY SET SpaceAfter <2009> (BYVAL SpaceAfter AS SINGLE)
        PROPERTY GET SpaceWithin <2010> () AS SINGLE
        PROPERTY SET SpaceWithin <2010> (BYVAL SpaceWithin AS SINGLE)
        PROPERTY GET BaseLineAlignment <2011> () AS LONG
        PROPERTY SET BaseLineAlignment <2011> (BYVAL BaseLineAlignment AS LONG)
        PROPERTY GET FarEastLineBreakControl <2012> () AS LONG
        PROPERTY SET FarEastLineBreakControl <2012> (BYVAL FarEastLineBreakControl AS LONG)
        PROPERTY GET WordWrap <2013> () AS LONG
        PROPERTY SET WordWrap <2013> (BYVAL WordWrap AS LONG)
        PROPERTY GET HangingPunctuation <2014> () AS LONG
        PROPERTY SET HangingPunctuation <2014> (BYVAL HangingPunctuation AS LONG)
        PROPERTY GET TextDirection <2015> () AS LONG
        PROPERTY SET TextDirection <2015> (BYVAL TextDirection AS LONG)
    END INTERFACE
    
    ' Interface Name  : BulletFormat
    INTERFACE BulletFormat $IID_PowerPoint_BulletFormat
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET VISIBLE <0> () AS LONG
        PROPERTY SET VISIBLE <0> (BYVAL PB_Visible AS LONG)
        PROPERTY GET Character <2003> () AS LONG
        PROPERTY SET Character <2003> (BYVAL Character AS LONG)
        PROPERTY GET RelativeSize <2004> () AS SINGLE
        PROPERTY SET RelativeSize <2004> (BYVAL RelativeSize AS SINGLE)
        PROPERTY GET UseTextColor <2005> () AS LONG
        PROPERTY SET UseTextColor <2005> (BYVAL UseTextColor AS LONG)
        PROPERTY GET UseTextFont <2006> () AS LONG
        PROPERTY SET UseTextFont <2006> (BYVAL UseTextFont AS LONG)
        PROPERTY GET FONT <2007> () AS Int_Font
        PROPERTY GET TYPE <2008> () AS LONG
        PROPERTY SET TYPE <2008> (BYVAL PB_Type AS LONG)
        PROPERTY GET STYLE <2009> () AS LONG
        PROPERTY SET STYLE <2009> (BYVAL STYLE AS LONG)
        PROPERTY GET StartValue <2010> () AS LONG
        PROPERTY SET StartValue <2010> (BYVAL StartValue AS LONG)
        METHOD Picture <2011> (BYVAL Picture AS STRING)
        PROPERTY GET Number <2012> () AS LONG
    END INTERFACE
    
    ' Interface Name  : TextStyles
    INTERFACE TextStyles $IID_PowerPoint_TextStyles
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL PB_Type AS LONG) AS TextStyle
    END INTERFACE
    
    ' Interface Name  : TextStyle
    INTERFACE TextStyle $IID_PowerPoint_TextStyle
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Ruler <2003> () AS Ruler
        PROPERTY GET TextFrame <2004> () AS TextFrame
        PROPERTY GET Levels <2005> () AS TextStyleLevels
    END INTERFACE
    
    ' Interface Name  : TextStyleLevels
    INTERFACE TextStyleLevels $IID_PowerPoint_TextStyleLevels
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Level AS LONG) AS TextStyleLevel
    END INTERFACE
    
    ' Interface Name  : TextStyleLevel
    INTERFACE TextStyleLevel $IID_PowerPoint_TextStyleLevel
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET ParagraphFormat <2003> () AS ParagraphFormat
        PROPERTY GET FONT <2004> () AS Int_Font
    END INTERFACE
    
    ' Interface Name  : HeaderFooter
    INTERFACE HeaderFooter $IID_PowerPoint_HeaderFooter
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET VISIBLE <2003> () AS LONG
        PROPERTY SET VISIBLE <2003> (BYVAL PB_Visible AS LONG)
        PROPERTY GET TEXT <2004> () AS STRING
        PROPERTY SET TEXT <2004> (BYVAL TEXT AS STRING)
        PROPERTY GET UseFormat <2005> () AS LONG
        PROPERTY SET UseFormat <2005> (BYVAL UseFormat AS LONG)
        PROPERTY GET Format <2006> () AS LONG
        PROPERTY SET Format <2006> (BYVAL Format AS LONG)
    END INTERFACE
    
    ' Interface Name  : Int__Presentation
    ' ClassID         : $CLSID_PowerPoint_Presentation
    INTERFACE Int__Presentation $IID_PowerPoint_Int__Presentation
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET SlideMaster <2003> () AS Int__Master
        PROPERTY GET TitleMaster <2004> () AS Int__Master
        PROPERTY GET HasTitleMaster <2005> () AS LONG
        METHOD AddTitleMaster <2006> () AS Int__Master
        METHOD ApplyTemplate <2007> (BYVAL FileName AS STRING)
        PROPERTY GET TemplateName <2008> () AS STRING
        PROPERTY GET NotesMaster <2009> () AS Int__Master
        PROPERTY GET HandoutMaster <2010> () AS Int__Master
        PROPERTY GET Slides <2011> () AS Slides
        PROPERTY GET PageSetup <2012> () AS PageSetup
        PROPERTY GET ColorSchemes <2013> () AS ColorSchemes
        PROPERTY GET ExtraColors <2014> () AS ExtraColors
        PROPERTY GET SlideShowSettings <2015> () AS SlideShowSettings
        PROPERTY GET Fonts <2016> () AS Fonts
        PROPERTY GET Windows <2017> () AS DocumentWindows
        PROPERTY GET Tags <2018> () AS Tags
        PROPERTY GET DefaultShape <2019> () AS Shape
        PROPERTY GET BuiltInDocumentProperties <2020> () AS IDISPATCH
        PROPERTY GET CustomDocumentProperties <2021> () AS IDISPATCH
        PROPERTY GET VBProject <2022> () AS IDISPATCH
        PROPERTY GET ReadOnly <2023> () AS LONG
        PROPERTY GET FullName <2024> () AS STRING
        PROPERTY GET NAME <2025> () AS STRING
        PROPERTY GET PATH <2026> () AS STRING
        PROPERTY GET Saved <2027> () AS LONG
        PROPERTY SET Saved <2027> (BYVAL Saved AS LONG)
        PROPERTY GET LayoutDirection <2028> () AS LONG
        PROPERTY SET LayoutDirection <2028> (BYVAL LayoutDirection AS LONG)
        METHOD NewWindow <2029> () AS DocumentWindow
        METHOD FollowHyperlink <2030> (BYVAL Address AS STRING, OPT BYVAL SubAddress AS STRING, OPT BYVAL NewWindow AS INTEGER, _
            OPT BYVAL AddHistory AS INTEGER, OPT BYVAL ExtraInfo AS STRING, OPT BYVAL PB_Method AS LONG, OPT BYVAL _
            HeaderInfo AS STRING)
        METHOD AddToFavorites <2031> ()
        METHOD Unused <2032> ()
        PROPERTY GET PrintOptions <2033> () AS PrintOptions
        METHOD PrintOut <2034> (OPT BYVAL PB_From AS LONG, OPT BYVAL PB_To AS LONG, OPT BYVAL PrintToFile AS STRING, OPT BYVAL _
            COPIES AS LONG, OPT BYVAL PB_Collate AS LONG)
        METHOD SAVE <2035> ()
        METHOD SaveAs <2036> (BYVAL FileName AS STRING, OPT BYVAL FileFormat AS LONG, OPT BYVAL EmbedTrueTypeFonts AS LONG)
        METHOD SaveCopyAs <2037> (BYVAL FileName AS STRING, OPT BYVAL FileFormat AS LONG, OPT BYVAL EmbedTrueTypeFonts AS LONG)
        METHOD EXPORT <2038> (BYVAL PATH AS STRING, BYVAL FilterName AS STRING, OPT BYVAL ScaleWidth AS LONG, OPT BYVAL _
            ScaleHeight AS LONG)
        METHOD CLOSE <2039> ()
        METHOD SetUndoText <2040> (BYVAL TEXT AS STRING)
        PROPERTY GET Container <2041> () AS IDISPATCH
        PROPERTY GET DisplayComments <2042> () AS LONG
        PROPERTY SET DisplayComments <2042> (BYVAL DisplayComments AS LONG)
        PROPERTY GET FarEastLineBreakLevel <2043> () AS LONG
        PROPERTY SET FarEastLineBreakLevel <2043> (BYVAL FarEastLineBreakLevel AS LONG)
        PROPERTY GET NoLineBreakBefore <2044> () AS STRING
        PROPERTY SET NoLineBreakBefore <2044> (BYVAL NoLineBreakBefore AS STRING)
        PROPERTY GET NoLineBreakAfter <2045> () AS STRING
        PROPERTY SET NoLineBreakAfter <2045> (BYVAL NoLineBreakAfter AS STRING)
        METHOD UpdateLinks <2046> ()
        PROPERTY GET SlideShowWindow <2047> () AS SlideShowWindow
        PROPERTY GET FarEastLineBreakLanguage <2048> () AS LONG
        PROPERTY SET FarEastLineBreakLanguage <2048> (BYVAL FarEastLineBreakLanguage AS LONG)
        METHOD WebPagePreview <2049> ()
        PROPERTY GET DefaultLanguageID <2050> () AS LONG
        PROPERTY SET DefaultLanguageID <2050> (BYVAL DefaultLanguageID AS LONG)
        PROPERTY GET CommandBars <2051> () AS IDISPATCH
        PROPERTY GET PublishObjects <2052> () AS PublishObjects
        PROPERTY GET WebOptions <2053> () AS WebOptions
        PROPERTY GET HTMLProject <2054> () AS IDISPATCH
        METHOD ReloadAs <2055> (BYVAL cp AS LONG)
        METHOD MakeIntoTemplate <2056> (BYVAL IsDesignTemplate AS LONG)
        PROPERTY GET EnvelopeVisible <2057> () AS LONG
        PROPERTY SET EnvelopeVisible <2057> (BYVAL EnvelopeVisible AS LONG)
        METHOD sblt <2058> (BYVAL s AS STRING)
        PROPERTY GET VBASigned <2059> () AS LONG
        PROPERTY GET SnapToGrid <2061> () AS LONG
        PROPERTY SET SnapToGrid <2061> (BYVAL SnapToGrid AS LONG)
        PROPERTY GET GridDistance <2062> () AS SINGLE
        PROPERTY SET GridDistance <2062> (BYVAL GridDistance AS SINGLE)
        PROPERTY GET Designs <2063> () AS Designs
        METHOD Merge <2064> (BYVAL PATH AS STRING)
        METHOD CheckIn <2065> (OPT BYVAL SaveChanges AS INTEGER, OPT BYVAL PB_Comments AS VARIANT, OPT BYVAL MakePublic AS _
            VARIANT)
        METHOD CanCheckIn <2066> () AS INTEGER
        PROPERTY GET Signatures <2067> () AS IDISPATCH
        PROPERTY GET RemovePersonalInformation <2068> () AS LONG
        PROPERTY SET RemovePersonalInformation <2068> (BYVAL RemovePersonalInformation AS LONG)
        METHOD SendForReview <2069> (OPT BYVAL Recipients AS STRING, OPT BYVAL Subject AS STRING, OPT BYVAL ShowMessage AS _
            INTEGER, OPT BYVAL IncludeAttachment AS VARIANT)
        METHOD ReplyWithChanges <2070> (OPT BYVAL ShowMessage AS INTEGER)
        METHOD EndReview <2071> ()
        PROPERTY GET HasRevisionInfo <2072> () AS LONG
        METHOD AddBaseline <2073> (OPT BYVAL FileName AS STRING)
        METHOD RemoveBaseline <2074> ()
        PROPERTY GET PasswordEncryptionProvider <2075> () AS STRING
        PROPERTY GET PasswordEncryptionAlgorithm <2076> () AS STRING
        PROPERTY GET PasswordEncryptionKeyLength <2077> () AS LONG
        PROPERTY GET PasswordEncryptionFileProperties <2078> () AS INTEGER
        METHOD SetPasswordEncryptionOptions <2079> (BYVAL PasswordEncryptionProvider AS STRING, BYVAL _
            PasswordEncryptionAlgorithm AS STRING, BYVAL PasswordEncryptionKeyLength AS LONG, BYVAL _
            PasswordEncryptionFileProperties AS INTEGER)
        PROPERTY GET Password <2080> () AS STRING
        PROPERTY SET Password <2080> (BYVAL Password AS STRING)
        PROPERTY GET WritePassword <2081> () AS STRING
        PROPERTY SET WritePassword <2081> (BYVAL WritePassword AS STRING)
        PROPERTY GET Permission <2082> () AS IDISPATCH
        PROPERTY GET SharedWorkspace <2083> () AS IDISPATCH
        PROPERTY GET Sync <2084> () AS IDISPATCH
        METHOD SendFaxOverInternet <2085> (OPT BYVAL Recipients AS STRING, OPT BYVAL Subject AS STRING, OPT BYVAL ShowMessage AS _
            INTEGER)
        PROPERTY GET DocumentLibraryVersions <2086> () AS IDISPATCH
    END INTERFACE
    
    ' Interface Name  : Tags
    INTERFACE Tags $IID_PowerPoint_Tags
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL PB_Name AS STRING) AS STRING
        METHOD ADD <2003> (BYVAL PB_Name AS STRING, BYVAL Value AS STRING)
        METHOD DELETE <2004> (BYVAL PB_Name AS STRING)
        METHOD AddBinary <2005> (BYVAL PB_Name AS STRING, BYVAL FilePath AS STRING)
        METHOD BinaryValue <2006> (BYVAL PB_Name AS STRING) AS LONG
        METHOD NAME <2007> (BYVAL Index AS LONG) AS STRING
        METHOD Value <2008> (BYVAL Index AS LONG) AS STRING
    END INTERFACE
    
    ' Interface Name  : MouseTracker
    INTERFACE MouseTracker $IID_PowerPoint_MouseTracker
        INHERIT IUNKNOWN
    
        METHOD OnTrack(BYVAL X AS SINGLE, BYVAL Y AS SINGLE) AS LONG
        METHOD EndTrack(BYVAL X AS SINGLE, BYVAL Y AS SINGLE) AS LONG
    END INTERFACE
    
    ' Interface Name  : MouseDownHandler
    INTERFACE MouseDownHandler $IID_PowerPoint_MouseDownHandler
        INHERIT IUNKNOWN
    
        METHOD OnMouseDown(BYVAL activeWin AS IUNKNOWN) AS LONG
    END INTERFACE
    
    ' Interface Name  : OCXExtender
    ' ClassID         : $CLSID_PowerPoint_OLEControl
    INTERFACE OCXExtender $IID_PowerPoint_OCXExtender
        INHERIT IDISPATCH
    
        PROPERTY GET VISIBLE <-2147418105> () AS INTEGER
        PROPERTY SET VISIBLE <-2147418105> (BYVAL PB_Visible AS INTEGER)
        PROPERTY GET LEFT <-2147418109> () AS SINGLE
        PROPERTY SET LEFT <-2147418109> (BYVAL PB_Left AS SINGLE)
        PROPERTY GET Top <-2147418108> () AS SINGLE
        PROPERTY SET Top <-2147418108> (BYVAL Top AS SINGLE)
        PROPERTY GET Height <-2147418107> () AS SINGLE
        PROPERTY SET Height <-2147418107> (BYVAL Height AS SINGLE)
        PROPERTY GET WIDTH <-2147418106> () AS SINGLE
        PROPERTY SET WIDTH <-2147418106> (BYVAL PB_Width AS SINGLE)
        PROPERTY GET ZOrderPosition <-2147417882> () AS LONG
        PROPERTY GET NAME <-2147418112> () AS STRING
        PROPERTY SET NAME <-2147418112> (BYVAL PB_Name AS STRING)
        PROPERTY GET AltHTML <-2147417881> () AS STRING
        PROPERTY SET AltHTML <-2147417881> (BYVAL AltHTML AS STRING)
    END INTERFACE
    
    ' Interface Name  : OCXExtenderEvents
    ' ClassID         : $CLSID_PowerPoint_Event_OCXExtenderEvents
    CLASS Class_OCXExtenderEvents $CLSID_PowerPoint_Event_OCXExtenderEvents AS EVENT
        INTERFACE OCXExtenderEvents $IID_PowerPoint_OCXExtenderEvents
            INHERIT IDISPATCH
    
            METHOD GotFocus <-2147417888> ()
                ' Insert your code here
            END METHOD
    
            METHOD LostFocus <-2147417887> ()
                ' Insert your code here
            END METHOD
    
        END INTERFACE
    END CLASS
    
    ' Interface Name  : EApplication
    ' ClassID         : $CLSID_PowerPoint_Event_EApplication
    ' ProgID          : $PROGID_PowerPoint_Application
    ' Version ProgID  : $PROGID_PowerPoint_Application11
    CLASS Class_EApplication $CLSID_PowerPoint_Event_EApplication AS EVENT
        INTERFACE EApplication $IID_PowerPoint_EApplication
            INHERIT IDISPATCH
    
            METHOD WindowSelectionChange <2001> (BYVAL Sel AS Selection)
                ' Insert your code here
            END METHOD
    
            METHOD WindowBeforeRightClick <2002> (BYVAL Sel AS Selection, BYREF IN CANCEL AS INTEGER)
                ' Insert your code here
            END METHOD
    
            METHOD WindowBeforeDoubleClick <2003> (BYVAL Sel AS Selection, BYREF IN CANCEL AS INTEGER)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationClose <2004> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationSave <2005> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationOpen <2006> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD NewPresentation <2007> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationNewSlide <2008> (BYVAL Sld AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD WindowActivate <2009> (BYVAL Pres AS IDISPATCH, BYVAL Wn AS DocumentWindow)
                ' Insert your code here
            END METHOD
    
            METHOD WindowDeactivate <2010> (BYVAL Pres AS IDISPATCH, BYVAL Wn AS DocumentWindow)
                ' Insert your code here
            END METHOD
    
            METHOD SlideShowBegin <2011> (BYVAL Wn AS SlideShowWindow)
                ' Insert your code here
            END METHOD
    
            METHOD SlideShowNextBuild <2012> (BYVAL Wn AS SlideShowWindow)
                ' Insert your code here
            END METHOD
    
            METHOD SlideShowNextSlide <2013> (BYVAL Wn AS SlideShowWindow)
                ' Insert your code here
            END METHOD
    
            METHOD SlideShowEnd <2014> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationPrint <2015> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD SlideSelectionChanged <2016> (BYVAL SldRange AS SlideRange)
                ' Insert your code here
            END METHOD
    
            METHOD ColorSchemeChanged <2017> (BYVAL SldRange AS SlideRange)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationBeforeSave <2018> (BYVAL Pres AS IDISPATCH, BYREF IN CANCEL AS INTEGER)
                ' Insert your code here
            END METHOD
    
            METHOD SlideShowNextClick <2019> (BYVAL Wn AS SlideShowWindow, BYVAL nEffect AS Effect)
                ' Insert your code here
            END METHOD
    
            METHOD AfterNewPresentation <2020> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD AfterPresentationOpen <2021> (BYVAL Pres AS IDISPATCH)
                ' Insert your code here
            END METHOD
    
            METHOD PresentationSync <2022> (BYVAL Pres AS IDISPATCH, BYVAL SyncEventType AS LONG)
                ' Insert your code here
            END METHOD
    
        END INTERFACE
    END CLASS
    
    ' Interface Name  : Table
    INTERFACE Table $IID_PowerPoint_Table
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Columns <2003> () AS Columns
        PROPERTY GET Rows <2004> () AS Rows
        METHOD Cell <2005> (BYVAL PB_Row AS LONG, BYVAL PB_Column AS LONG) AS Cell
        PROPERTY GET TableDirection <2006> () AS LONG
        PROPERTY SET TableDirection <2006> (BYVAL TableDirection AS LONG)
        METHOD MergeBorders <2007> ()
    END INTERFACE
    
    ' Interface Name  : Columns
    INTERFACE Columns $IID_PowerPoint_Columns
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS COLUMN
        METHOD ADD <2003> (OPT BYVAL BeforeColumn AS LONG) AS COLUMN
    END INTERFACE
    
    ' Interface Name  : Column
    INTERFACE COLUMN $IID_PowerPoint_Column
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Cells <2003> () AS CellRange
        METHOD SELECT <2004> ()
        METHOD DELETE <2005> ()
        PROPERTY GET WIDTH <2006> () AS SINGLE
        PROPERTY SET WIDTH <2006> (BYVAL PB_Width AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : Rows
    INTERFACE Rows $IID_PowerPoint_Rows
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Row
        METHOD ADD <2003> (OPT BYVAL BeforeRow AS LONG) AS Row
    END INTERFACE
    
    ' Interface Name  : Row
    INTERFACE Row $IID_PowerPoint_Row
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Cells <2003> () AS CellRange
        METHOD SELECT <2004> ()
        METHOD DELETE <2005> ()
        PROPERTY GET Height <2006> () AS SINGLE
        PROPERTY SET Height <2006> (BYVAL Height AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : CellRange
    INTERFACE CellRange $IID_PowerPoint_CellRange
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Cell
        PROPERTY GET Borders <2003> () AS Borders
    END INTERFACE
    
    ' Interface Name  : Cell
    INTERFACE Cell $IID_PowerPoint_Cell
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Shape <2003> () AS Shape
        PROPERTY GET Borders <2004> () AS Borders
        METHOD Merge <2005> (BYVAL MergeTo AS Cell)
        METHOD Split <2006> (BYVAL NumRows AS LONG, BYVAL NumColumns AS LONG)
        METHOD SELECT <2007> ()
        PROPERTY GET Selected <2008> () AS INTEGER
    END INTERFACE
    
    ' Interface Name  : Borders
    INTERFACE Borders $IID_PowerPoint_Borders
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL BorderType AS LONG) AS LineFormat
    END INTERFACE
    
    ' Interface Name  : Panes
    INTERFACE Panes $IID_PowerPoint_Panes
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Pane
        PROPERTY GET PARENT <2002> () AS IDISPATCH
    END INTERFACE
    
    ' Interface Name  : Pane
    INTERFACE Pane $IID_PowerPoint_Pane
        INHERIT IDISPATCH
    
        PROPERTY GET PARENT <2000> () AS IDISPATCH
        METHOD Activate <2001> ()
        PROPERTY GET Active <2002> () AS LONG
        PROPERTY GET Application <2003> () AS IDISPATCH
        PROPERTY GET ViewType <2004> () AS LONG
    END INTERFACE
    
    ' Interface Name  : DefaultWebOptions
    INTERFACE DefaultWebOptions $IID_PowerPoint_DefaultWebOptions
        INHERIT IDISPATCH
    
        PROPERTY GET IncludeNavigation <2001> () AS LONG
        PROPERTY SET IncludeNavigation <2001> (BYVAL IncludeNavigation AS LONG)
        PROPERTY GET FrameColors <2002> () AS LONG
        PROPERTY SET FrameColors <2002> (BYVAL FrameColors AS LONG)
        PROPERTY GET ResizeGraphics <2003> () AS LONG
        PROPERTY SET ResizeGraphics <2003> (BYVAL ResizeGraphics AS LONG)
        PROPERTY GET ShowSlideAnimation <2004> () AS LONG
        PROPERTY SET ShowSlideAnimation <2004> (BYVAL ShowSlideAnimation AS LONG)
        PROPERTY GET OrganizeInFolder <2005> () AS LONG
        PROPERTY SET OrganizeInFolder <2005> (BYVAL OrganizeInFolder AS LONG)
        PROPERTY GET UseLongFileNames <2006> () AS LONG
        PROPERTY SET UseLongFileNames <2006> (BYVAL UseLongFileNames AS LONG)
        PROPERTY GET RelyOnVML <2007> () AS LONG
        PROPERTY SET RelyOnVML <2007> (BYVAL RelyOnVML AS LONG)
        PROPERTY GET AllowPNG <2008> () AS LONG
        PROPERTY SET AllowPNG <2008> (BYVAL AllowPNG AS LONG)
        PROPERTY GET ScreenSize <2009> () AS LONG
        PROPERTY SET ScreenSize <2009> (BYVAL ScreenSize AS LONG)
        PROPERTY GET Encoding <2010> () AS LONG
        PROPERTY SET Encoding <2010> (BYVAL Encoding AS LONG)
        PROPERTY GET UpdateLinksOnSave <2011> () AS LONG
        PROPERTY SET UpdateLinksOnSave <2011> (BYVAL UpdateLinksOnSave AS LONG)
        PROPERTY GET CheckIfOfficeIsHTMLEditor <2012> () AS LONG
        PROPERTY SET CheckIfOfficeIsHTMLEditor <2012> (BYVAL CheckIfOfficeIsHTMLEditor AS LONG)
        PROPERTY GET AlwaysSaveInDefaultEncoding <2013> () AS LONG
        PROPERTY SET AlwaysSaveInDefaultEncoding <2013> (BYVAL AlwaysSaveInDefaultEncoding AS LONG)
        PROPERTY GET Fonts <2014> () AS IDISPATCH
        PROPERTY GET FolderSuffix <2015> () AS STRING
        PROPERTY GET TargetBrowser <2016> () AS LONG
        PROPERTY SET TargetBrowser <2016> (BYVAL TargetBrowser AS LONG)
        PROPERTY GET SaveNewWebPagesAsWebArchives <2017> () AS LONG
        PROPERTY SET SaveNewWebPagesAsWebArchives <2017> (BYVAL SaveNewWebPagesAsWebArchives AS LONG)
        PROPERTY GET HTMLVersion <2018> () AS LONG
        PROPERTY SET HTMLVersion <2018> (BYVAL HTMLVersion AS LONG)
    END INTERFACE
    
    ' Interface Name  : WebOptions
    INTERFACE WebOptions $IID_PowerPoint_WebOptions
        INHERIT IDISPATCH
    
        PROPERTY GET IncludeNavigation <2001> () AS LONG
        PROPERTY SET IncludeNavigation <2001> (BYVAL IncludeNavigation AS LONG)
        PROPERTY GET FrameColors <2002> () AS LONG
        PROPERTY SET FrameColors <2002> (BYVAL FrameColors AS LONG)
        PROPERTY GET ResizeGraphics <2003> () AS LONG
        PROPERTY SET ResizeGraphics <2003> (BYVAL ResizeGraphics AS LONG)
        PROPERTY GET ShowSlideAnimation <2004> () AS LONG
        PROPERTY SET ShowSlideAnimation <2004> (BYVAL ShowSlideAnimation AS LONG)
        PROPERTY GET OrganizeInFolder <2005> () AS LONG
        PROPERTY SET OrganizeInFolder <2005> (BYVAL OrganizeInFolder AS LONG)
        PROPERTY GET UseLongFileNames <2006> () AS LONG
        PROPERTY SET UseLongFileNames <2006> (BYVAL UseLongFileNames AS LONG)
        PROPERTY GET RelyOnVML <2007> () AS LONG
        PROPERTY SET RelyOnVML <2007> (BYVAL RelyOnVML AS LONG)
        PROPERTY GET AllowPNG <2008> () AS LONG
        PROPERTY SET AllowPNG <2008> (BYVAL AllowPNG AS LONG)
        PROPERTY GET ScreenSize <2009> () AS LONG
        PROPERTY SET ScreenSize <2009> (BYVAL ScreenSize AS LONG)
        PROPERTY GET Encoding <2010> () AS LONG
        PROPERTY SET Encoding <2010> (BYVAL Encoding AS LONG)
        PROPERTY GET FolderSuffix <2011> () AS STRING
        METHOD UseDefaultFolderSuffix <2012> ()
        PROPERTY GET TargetBrowser <2013> () AS LONG
        PROPERTY SET TargetBrowser <2013> (BYVAL TargetBrowser AS LONG)
        PROPERTY GET HTMLVersion <2014> () AS LONG
        PROPERTY SET HTMLVersion <2014> (BYVAL HTMLVersion AS LONG)
    END INTERFACE
    
    ' Interface Name  : PublishObjects
    INTERFACE PublishObjects $IID_PowerPoint_PublishObjects
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS PublishObject
    END INTERFACE
    
    ' Interface Name  : PublishObject
    INTERFACE PublishObject $IID_PowerPoint_PublishObject
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET HTMLVersion <2003> () AS LONG
        PROPERTY SET HTMLVersion <2003> (BYVAL HTMLVersion AS LONG)
        PROPERTY GET SourceType <2004> () AS LONG
        PROPERTY SET SourceType <2004> (BYVAL SourceType AS LONG)
        PROPERTY GET RangeStart <2005> () AS LONG
        PROPERTY SET RangeStart <2005> (BYVAL RangeStart AS LONG)
        PROPERTY GET RangeEnd <2006> () AS LONG
        PROPERTY SET RangeEnd <2006> (BYVAL RangeEnd AS LONG)
        PROPERTY GET SlideShowName <2007> () AS STRING
        PROPERTY SET SlideShowName <2007> (BYVAL SlideShowName AS STRING)
        PROPERTY GET SpeakerNotes <2008> () AS LONG
        PROPERTY SET SpeakerNotes <2008> (BYVAL SpeakerNotes AS LONG)
        PROPERTY GET FileName <2009> () AS STRING
        PROPERTY SET FileName <2009> (BYVAL FileName AS STRING)
        METHOD Publish <2010> ()
    END INTERFACE
    
    ' Interface Name  : MasterEvents
    ' ClassID         : $CLSID_PowerPoint_Event_MasterEvents
    CLASS Class_MasterEvents $CLSID_PowerPoint_Event_MasterEvents AS EVENT
        INTERFACE MasterEvents $IID_PowerPoint_MasterEvents
            INHERIT IUNKNOWN
    
        END INTERFACE
    END CLASS
    
    ' Interface Name  : Int__PowerRex
    ' ClassID         : $CLSID_PowerPoint_PowerRex
    INTERFACE Int__PowerRex $IID_PowerPoint_Int__PowerRex
        INHERIT IDISPATCH
    
        METHOD OnAsfEncoderEvent <2001> (BYVAL erorCode AS VARIANT, BYVAL bstrErrorDesc AS VARIANT)
    END INTERFACE
    
    ' Interface Name  : Comments
    INTERFACE Comments $IID_PowerPoint_Comments
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Comment
        METHOD ADD <2003> (BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL Author AS STRING, BYVAL AuthorInitials AS STRING, _
            BYVAL TEXT AS STRING) AS Comment
    END INTERFACE
    
    ' Interface Name  : Comment
    INTERFACE Comment $IID_PowerPoint_Comment
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Author <2003> () AS STRING
        PROPERTY GET AuthorInitials <2004> () AS STRING
        PROPERTY GET TEXT <2005> () AS STRING
        PROPERTY GET DateTime <2006> () AS DOUBLE
        PROPERTY GET AuthorIndex <2007> () AS LONG
        PROPERTY GET LEFT <2008> () AS SINGLE
        PROPERTY GET Top <2009> () AS SINGLE
        METHOD DELETE <2010> ()
    END INTERFACE
    
    ' Interface Name  : Designs
    INTERFACE Designs $IID_PowerPoint_Designs
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS Design
        METHOD ADD <2003> (BYVAL designName AS STRING, OPT BYVAL Index AS LONG) AS Design
        METHOD LOAD <2004> (BYVAL TemplateName AS STRING, OPT BYVAL Index AS LONG) AS Design
        METHOD Clone <2005> (BYVAL pOriginal AS Design, OPT BYVAL Index AS LONG) AS Design
    END INTERFACE
    
    ' Interface Name  : Design
    INTERFACE Design $IID_PowerPoint_Design
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET SlideMaster <2003> () AS Int__Master
        PROPERTY GET TitleMaster <2004> () AS Int__Master
        PROPERTY GET HasTitleMaster <2005> () AS LONG
        METHOD AddTitleMaster <2006> () AS Int__Master
        PROPERTY GET Index <2007> () AS LONG
        PROPERTY GET NAME <2008> () AS STRING
        PROPERTY SET NAME <2008> (BYVAL PB_Name AS STRING)
        PROPERTY GET Preserved <2009> () AS LONG
        PROPERTY SET Preserved <2009> (BYVAL Preserved AS LONG)
        METHOD MoveTo <2010> (BYVAL toPos AS LONG)
        METHOD DELETE <2011> ()
    END INTERFACE
    
    ' Interface Name  : DiagramNode
    INTERFACE DiagramNode $IID_PowerPoint_DiagramNode
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        METHOD AddNode <10> (OPT BYVAL POS AS LONG, OPT BYVAL NodeType AS LONG) AS DiagramNode
        METHOD DELETE <11> ()
        METHOD MoveNode <12> (BYVAL TargetNode AS DiagramNode, BYVAL POS AS LONG)
        METHOD ReplaceNode <13> (BYVAL TargetNode AS DiagramNode)
        METHOD SwapNode <14> (BYVAL TargetNode AS DiagramNode, OPT BYVAL SwapChildren AS INTEGER)
        METHOD CloneNode <15> (BYVAL CopyChildren AS INTEGER, BYVAL TargetNode AS DiagramNode, OPT BYVAL POS AS LONG) AS _
            DiagramNode
        METHOD TransferChildren <16> (BYVAL ReceivingNode AS DiagramNode)
        METHOD NextNode <17> () AS DiagramNode
        METHOD PrevNode <18> () AS DiagramNode
        PROPERTY GET PARENT <100> () AS IDISPATCH
        PROPERTY GET Children <101> () AS DiagramNodeChildren
        PROPERTY GET Shape <102> () AS Shape
        PROPERTY GET ROOT <103> () AS DiagramNode
        PROPERTY GET Diagram <104> () AS Diagram
        PROPERTY GET Layout <105> () AS LONG
        PROPERTY SET Layout <105> (BYVAL PB_Type AS LONG)
        PROPERTY GET TextShape <106> () AS Shape
    END INTERFACE
    
    ' Interface Name  : DiagramNodeChildren
    INTERFACE DiagramNodeChildren $IID_PowerPoint_DiagramNodeChildren
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS DiagramNode
        METHOD AddNode <10> (OPT BYVAL Index AS VARIANT, OPT BYVAL NodeType AS LONG) AS DiagramNode
        METHOD SelectAll <11> ()
        PROPERTY GET PARENT <100> () AS IDISPATCH
        PROPERTY GET COUNT <101> () AS LONG
        PROPERTY GET FirstChild <103> () AS DiagramNode
        PROPERTY GET LastChild <104> () AS DiagramNode
    END INTERFACE
    
    ' Interface Name  : DiagramNodes
    INTERFACE DiagramNodes $IID_PowerPoint_DiagramNodes
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS DiagramNode
        METHOD SelectAll <10> ()
        PROPERTY GET PARENT <100> () AS IDISPATCH
        PROPERTY GET COUNT <101> () AS LONG
    END INTERFACE
    
    ' Interface Name  : Diagram
    INTERFACE Diagram $IID_PowerPoint_Diagram
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <100> () AS IDISPATCH
        PROPERTY GET Nodes <101> () AS DiagramNodes
        PROPERTY GET TYPE <102> () AS LONG
        PROPERTY GET AutoLayout <103> () AS LONG
        PROPERTY SET AutoLayout <103> (BYVAL AutoLayout AS LONG)
        PROPERTY GET Reverse <104> () AS LONG
        PROPERTY SET Reverse <104> (BYVAL Reverse AS LONG)
        PROPERTY GET AutoFormat <105> () AS LONG
        PROPERTY SET AutoFormat <105> (BYVAL AutoFormat AS LONG)
        METHOD Convert <10> (BYVAL PB_Type AS LONG)
        METHOD FitText <11> ()
    END INTERFACE
    
    ' Interface Name  : TimeLine
    INTERFACE TimeLine $IID_PowerPoint_TimeLine
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET MainSequence <2003> () AS Sequence
        PROPERTY GET InteractiveSequences <2004> () AS Sequences
    END INTERFACE
    
    ' Interface Name  : Sequences
    INTERFACE Sequences $IID_PowerPoint_Sequences
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Sequence
        METHOD ADD <2003> (OPT BYVAL Index AS LONG) AS Sequence
    END INTERFACE
    
    ' Interface Name  : Sequence
    INTERFACE Sequence $IID_PowerPoint_Sequence
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS Effect
        METHOD AddEffect <2003> (BYVAL PB_Shape AS Shape, BYVAL effectId AS LONG, OPT BYVAL Level AS LONG, OPT BYVAL trigger AS _
            LONG, OPT BYVAL Index AS LONG) AS Effect
        METHOD Clone <2004> (BYVAL PB_Effect AS Effect, OPT BYVAL Index AS LONG) AS Effect
        METHOD FindFirstAnimationFor <2005> (BYVAL PB_Shape AS Shape) AS Effect
        METHOD FindFirstAnimationForClick <2006> (BYVAL CLICK AS LONG) AS Effect
        METHOD ConvertToBuildLevel <2007> (BYVAL PB_Effect AS Effect, BYVAL Level AS LONG) AS Effect
        METHOD ConvertToAfterEffect <2008> (BYVAL PB_Effect AS Effect, BYVAL After AS LONG, OPT BYVAL DimColor AS LONG, OPT _
            BYVAL DimSchemeColor AS LONG) AS Effect
        METHOD ConvertToAnimateBackground <2009> (BYVAL PB_Effect AS Effect, BYVAL AnimateBackground AS LONG) AS Effect
        METHOD ConvertToAnimateInReverse <2010> (BYVAL PB_Effect AS Effect, BYVAL animateInReverse AS LONG) AS Effect
        METHOD ConvertToTextUnitEffect <2011> (BYVAL PB_Effect AS Effect, BYVAL unitEffect AS LONG) AS Effect
    END INTERFACE
    
    ' Interface Name  : Effect
    INTERFACE Effect $IID_PowerPoint_Effect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Shape <2003> () AS Shape
        PROPERTY SET Shape <2003> (BYVAL PB_Shape AS Shape)
        METHOD MoveTo <2004> (BYVAL toPos AS LONG)
        METHOD MoveBefore <2005> (BYVAL PB_Effect AS Effect)
        METHOD MoveAfter <2006> (BYVAL PB_Effect AS Effect)
        METHOD DELETE <2007> ()
        PROPERTY GET Index <2008> () AS LONG
        PROPERTY GET Timing <2009> () AS Timing
        PROPERTY GET EffectType <2010> () AS LONG
        PROPERTY SET EffectType <2010> (BYVAL EffectType AS LONG)
        PROPERTY GET EffectParameters <2011> () AS EffectParameters
        PROPERTY GET TextRangeStart <2012> () AS LONG
        PROPERTY GET TextRangeLength <2013> () AS LONG
        PROPERTY GET Paragraph <2014> () AS LONG
        PROPERTY SET Paragraph <2014> (BYVAL Paragraph AS LONG)
        PROPERTY GET DisplayName <2015> () AS STRING
        PROPERTY GET EXIT <2016> () AS LONG
        PROPERTY SET EXIT <2016> (BYVAL PB_Exit AS LONG)
        PROPERTY GET Behaviors <2017> () AS AnimationBehaviors
        PROPERTY GET EffectInformation <2018> () AS EffectInformation
    END INTERFACE
    
    ' Interface Name  : Timing
    INTERFACE Timing $IID_PowerPoint_Timing
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Duration <2003> () AS SINGLE
        PROPERTY SET Duration <2003> (BYVAL Duration AS SINGLE)
        PROPERTY GET TriggerType <2004> () AS LONG
        PROPERTY SET TriggerType <2004> (BYVAL TriggerType AS LONG)
        PROPERTY GET TriggerDelayTime <2005> () AS SINGLE
        PROPERTY SET TriggerDelayTime <2005> (BYVAL TriggerDelayTime AS SINGLE)
        PROPERTY GET TriggerShape <2006> () AS Shape
        PROPERTY SET TriggerShape <2006> (BYVAL TriggerShape AS Shape)
        PROPERTY GET RepeatCount <2007> () AS LONG
        PROPERTY SET RepeatCount <2007> (BYVAL RepeatCount AS LONG)
        PROPERTY GET RepeatDuration <2008> () AS SINGLE
        PROPERTY SET RepeatDuration <2008> (BYVAL RepeatDuration AS SINGLE)
        PROPERTY GET SPEED <2009> () AS SINGLE
        PROPERTY SET SPEED <2009> (BYVAL SPEED AS SINGLE)
        PROPERTY GET Accelerate <2010> () AS SINGLE
        PROPERTY SET Accelerate <2010> (BYVAL Accelerate AS SINGLE)
        PROPERTY GET Decelerate <2011> () AS SINGLE
        PROPERTY SET Decelerate <2011> (BYVAL Decelerate AS SINGLE)
        PROPERTY GET AutoReverse <2012> () AS LONG
        PROPERTY SET AutoReverse <2012> (BYVAL AutoReverse AS LONG)
        PROPERTY GET SmoothStart <2013> () AS LONG
        PROPERTY SET SmoothStart <2013> (BYVAL SmoothStart AS LONG)
        PROPERTY GET SmoothEnd <2014> () AS LONG
        PROPERTY SET SmoothEnd <2014> (BYVAL SmoothEnd AS LONG)
        PROPERTY GET RewindAtEnd <2015> () AS LONG
        PROPERTY SET RewindAtEnd <2015> (BYVAL RewindAtEnd AS LONG)
        PROPERTY GET Restart <2016> () AS LONG
        PROPERTY SET Restart <2016> (BYVAL Restart AS LONG)
    END INTERFACE
    
    ' Interface Name  : EffectParameters
    INTERFACE EffectParameters $IID_PowerPoint_EffectParameters
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Direction <2003> () AS LONG
        PROPERTY SET Direction <2003> (BYVAL Direction AS LONG)
        PROPERTY GET Amount <2004> () AS SINGLE
        PROPERTY SET Amount <2004> (BYVAL Amount AS SINGLE)
        PROPERTY GET SIZE <2005> () AS SINGLE
        PROPERTY SET SIZE <2005> (BYVAL SIZE AS SINGLE)
        PROPERTY GET Color2 <2006> () AS ColorFormat
        PROPERTY GET Relative <2007> () AS LONG
        PROPERTY SET Relative <2007> (BYVAL Relative AS LONG)
        PROPERTY GET FontName <2008> () AS STRING
        PROPERTY SET FontName <2008> (BYVAL FontName AS STRING)
    END INTERFACE
    
    ' Interface Name  : EffectInformation
    INTERFACE EffectInformation $IID_PowerPoint_EffectInformation
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET AfterEffect <2003> () AS LONG
        PROPERTY GET AnimateBackground <2004> () AS LONG
        PROPERTY GET AnimateTextInReverse <2005> () AS LONG
        PROPERTY GET BuildByLevelEffect <2006> () AS LONG
        PROPERTY GET DIM <2007> () AS ColorFormat
        PROPERTY GET PlaySettings <2008> () AS PlaySettings
        PROPERTY GET SoundEffect <2009> () AS SoundEffect
        PROPERTY GET TextUnitEffect <2010> () AS LONG
    END INTERFACE
    
    ' Interface Name  : AnimationBehaviors
    INTERFACE AnimationBehaviors $IID_PowerPoint_AnimationBehaviors
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS AnimationBehavior
        METHOD ADD <2003> (BYVAL PB_Type AS LONG, OPT BYVAL Index AS LONG) AS AnimationBehavior
    END INTERFACE
    
    ' Interface Name  : AnimationBehavior
    INTERFACE AnimationBehavior $IID_PowerPoint_AnimationBehavior
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET Additive <2003> () AS LONG
        PROPERTY SET Additive <2003> (BYVAL Additive AS LONG)
        PROPERTY GET Accumulate <2004> () AS LONG
        PROPERTY SET Accumulate <2004> (BYVAL Accumulate AS LONG)
        PROPERTY GET TYPE <2005> () AS LONG
        PROPERTY SET TYPE <2005> (BYVAL PB_Type AS LONG)
        PROPERTY GET MotionEffect <2006> () AS MotionEffect
        PROPERTY GET ColorEffect <2007> () AS ColorEffect
        PROPERTY GET ScaleEffect <2008> () AS ScaleEffect
        PROPERTY GET RotationEffect <2009> () AS RotationEffect
        PROPERTY GET PropertyEffect <2010> () AS PropertyEffect
        PROPERTY GET Timing <2011> () AS Timing
        METHOD DELETE <2012> ()
        PROPERTY GET CommandEffect <2013> () AS CommandEffect
        PROPERTY GET FilterEffect <2014> () AS FilterEffect
        PROPERTY GET SetEffect <2015> () AS SetEffect
    END INTERFACE
    
    ' Interface Name  : MotionEffect
    INTERFACE MotionEffect $IID_PowerPoint_MotionEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET ByX <2003> () AS SINGLE
        PROPERTY SET ByX <2003> (BYVAL ByX AS SINGLE)
        PROPERTY GET ByY <2004> () AS SINGLE
        PROPERTY SET ByY <2004> (BYVAL ByY AS SINGLE)
        PROPERTY GET FromX <2005> () AS SINGLE
        PROPERTY SET FromX <2005> (BYVAL FromX AS SINGLE)
        PROPERTY GET FromY <2006> () AS SINGLE
        PROPERTY SET FromY <2006> (BYVAL FromY AS SINGLE)
        PROPERTY GET ToX <2007> () AS SINGLE
        PROPERTY SET ToX <2007> (BYVAL ToX AS SINGLE)
        PROPERTY GET ToY <2008> () AS SINGLE
        PROPERTY SET ToY <2008> (BYVAL ToY AS SINGLE)
        PROPERTY GET PATH <2009> () AS STRING
        PROPERTY SET PATH <2009> (BYVAL PATH AS STRING)
    END INTERFACE
    
    ' Interface Name  : ColorEffect
    INTERFACE ColorEffect $IID_PowerPoint_ColorEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET By <2003> () AS ColorFormat
        PROPERTY GET FROM <2004> () AS ColorFormat
        PROPERTY GET TO <2005> () AS ColorFormat
    END INTERFACE
    
    ' Interface Name  : ScaleEffect
    INTERFACE ScaleEffect $IID_PowerPoint_ScaleEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET ByX <2003> () AS SINGLE
        PROPERTY SET ByX <2003> (BYVAL ByX AS SINGLE)
        PROPERTY GET ByY <2004> () AS SINGLE
        PROPERTY SET ByY <2004> (BYVAL ByY AS SINGLE)
        PROPERTY GET FromX <2005> () AS SINGLE
        PROPERTY SET FromX <2005> (BYVAL FromX AS SINGLE)
        PROPERTY GET FromY <2006> () AS SINGLE
        PROPERTY SET FromY <2006> (BYVAL FromY AS SINGLE)
        PROPERTY GET ToX <2007> () AS SINGLE
        PROPERTY SET ToX <2007> (BYVAL ToX AS SINGLE)
        PROPERTY GET ToY <2008> () AS SINGLE
        PROPERTY SET ToY <2008> (BYVAL ToY AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : RotationEffect
    INTERFACE RotationEffect $IID_PowerPoint_RotationEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET By <2003> () AS SINGLE
        PROPERTY SET By <2003> (BYVAL By AS SINGLE)
        PROPERTY GET FROM <2004> () AS SINGLE
        PROPERTY SET FROM <2004> (BYVAL PB_From AS SINGLE)
        PROPERTY GET TO <2005> () AS SINGLE
        PROPERTY SET TO <2005> (BYVAL PB_To AS SINGLE)
    END INTERFACE
    
    ' Interface Name  : PropertyEffect
    INTERFACE PropertyEffect $IID_PowerPoint_PropertyEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET PROPERTY <2003> () AS LONG
        PROPERTY SET PROPERTY <2003> (BYVAL PB_Property AS LONG)
        PROPERTY GET Points <2004> () AS AnimationPoints
        PROPERTY GET FROM <2005> () AS VARIANT
        PROPERTY SET FROM <2005> (BYVAL PB_From AS VARIANT)
        PROPERTY GET TO <2006> () AS VARIANT
        PROPERTY SET TO <2006> (BYVAL PB_To AS VARIANT)
    END INTERFACE
    
    ' Interface Name  : AnimationPoints
    INTERFACE AnimationPoints $IID_PowerPoint_AnimationPoints
        INHERIT IDISPATCH
    
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD Meth__Index <10> (BYVAL Index AS LONG) AS VARIANT
        PROPERTY GET COUNT <11> () AS LONG
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD ITEM <0> (BYVAL Index AS LONG) AS AnimationPoint
        METHOD ADD <2003> (OPT BYVAL Index AS LONG) AS AnimationPoint
        PROPERTY GET Smooth <2004> () AS LONG
        PROPERTY SET Smooth <2004> (BYVAL Smooth AS LONG)
    END INTERFACE
    
    ' Interface Name  : AnimationPoint
    INTERFACE AnimationPoint $IID_PowerPoint_AnimationPoint
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        METHOD DELETE <2003> ()
        PROPERTY GET Time <2004> () AS SINGLE
        PROPERTY SET Time <2004> (BYVAL Time AS SINGLE)
        PROPERTY GET Value <2005> () AS VARIANT
        PROPERTY SET Value <2005> (BYVAL Value AS VARIANT)
        PROPERTY GET Formula <2006> () AS STRING
        PROPERTY SET Formula <2006> (BYVAL Formula AS STRING)
    END INTERFACE
    
    ' Interface Name  : CanvasShapes
    INTERFACE CanvasShapes $IID_PowerPoint_CanvasShapes
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET Creator <2002> () AS LONG
        PROPERTY GET PARENT <1> () AS IDISPATCH
        PROPERTY GET COUNT <2> () AS LONG
        METHOD ITEM <0> (BYVAL Index AS VARIANT) AS Shape
        PROPERTY GET PropGet__NewEnum <-4> () AS IUNKNOWN
        METHOD AddCallout <10> (BYVAL PB_Type AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddConnector <11> (BYVAL PB_Type AS LONG, BYVAL BeginX AS SINGLE, BYVAL BeginY AS SINGLE, BYVAL EndX AS SINGLE, _
            BYVAL EndY AS SINGLE) AS Shape
        METHOD AddCurve <12> (BYVAL SafeArrayOfPoints AS VARIANT) AS Shape
        METHOD AddLabel <13> (BYVAL ORIENTATION AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddLine <14> (BYVAL BeginX AS SINGLE, BYVAL BeginY AS SINGLE, BYVAL EndX AS SINGLE, BYVAL EndY AS SINGLE) AS _
            Shape
        METHOD AddPicture <15> (BYVAL FileName AS STRING, BYVAL LinkToFile AS LONG, BYVAL SaveWithDocument AS LONG, BYVAL _
            PB_Left AS SINGLE, BYVAL Top AS SINGLE, OPT BYVAL PB_Width AS SINGLE, OPT BYVAL Height AS SINGLE) AS Shape
        METHOD AddPolyline <16> (BYVAL SafeArrayOfPoints AS VARIANT) AS Shape
        METHOD AddShape <17> (BYVAL PB_Type AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS SINGLE, _
            BYVAL Height AS SINGLE) AS Shape
        METHOD AddTextEffect <18> (BYVAL PresetTextEffect AS LONG, BYVAL TEXT AS STRING, BYVAL FontName AS STRING, BYVAL _
            FontSize AS SINGLE, BYVAL FontBold AS LONG, BYVAL FontItalic AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS _
            SINGLE) AS Shape
        METHOD AddTextbox <19> (BYVAL ORIENTATION AS LONG, BYVAL PB_Left AS SINGLE, BYVAL Top AS SINGLE, BYVAL PB_Width AS _
            SINGLE, BYVAL Height AS SINGLE) AS Shape
        METHOD BuildFreeform <20> (BYVAL EditingType AS LONG, BYVAL X1 AS SINGLE, BYVAL Y1 AS SINGLE) AS FreeformBuilder
        METHOD RANGE <21> (BYVAL Index AS VARIANT) AS ShapeRange
        METHOD SelectAll <22> ()
        PROPERTY GET Background <100> () AS Shape
    END INTERFACE
    
    ' Interface Name  : AutoCorrect
    INTERFACE AutoCorrect $IID_PowerPoint_AutoCorrect
        INHERIT IDISPATCH
    
        PROPERTY GET DisplayAutoCorrectOptions <2001> () AS INTEGER
        PROPERTY SET DisplayAutoCorrectOptions <2001> (BYVAL DisplayAutoCorrectOptions AS INTEGER)
        PROPERTY GET DisplayAutoLayoutOptions <2002> () AS INTEGER
        PROPERTY SET DisplayAutoLayoutOptions <2002> (BYVAL DisplayAutoLayoutOptions AS INTEGER)
    END INTERFACE
    
    ' Interface Name  : Options
    INTERFACE Options $IID_PowerPoint_Options
        INHERIT IDISPATCH
    
        PROPERTY GET DisplayPasteOptions <2001> () AS LONG
        PROPERTY SET DisplayPasteOptions <2001> (BYVAL DisplayPasteOptions AS LONG)
    END INTERFACE
    
    ' Interface Name  : CommandEffect
    INTERFACE CommandEffect $IID_PowerPoint_CommandEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TYPE <2003> () AS LONG
        PROPERTY SET TYPE <2003> (BYVAL PB_Type AS LONG)
        PROPERTY GET COMMAND <2004> () AS STRING
        PROPERTY SET COMMAND <2004> (BYVAL COMMAND AS STRING)
    END INTERFACE
    
    ' Interface Name  : FilterEffect
    INTERFACE FilterEffect $IID_PowerPoint_FilterEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET TYPE <2003> () AS LONG
        PROPERTY SET TYPE <2003> (BYVAL PB_Type AS LONG)
        PROPERTY GET Subtype <2004> () AS LONG
        PROPERTY SET Subtype <2004> (BYVAL Subtype AS LONG)
        PROPERTY GET Reveal <2005> () AS LONG
        PROPERTY SET Reveal <2005> (BYVAL Reveal AS LONG)
    END INTERFACE
    
    ' Interface Name  : SetEffect
    INTERFACE SetEffect $IID_PowerPoint_SetEffect
        INHERIT IDISPATCH
    
        PROPERTY GET Application <2001> () AS IDISPATCH
        PROPERTY GET PARENT <2002> () AS IDISPATCH
        PROPERTY GET PROPERTY <2003> () AS LONG
        PROPERTY SET PROPERTY <2003> (BYVAL PB_Property AS LONG)
        PROPERTY GET TO <2004> () AS VARIANT
        PROPERTY SET TO <2004> (BYVAL PB_To AS VARIANT)
    END INTERFACE
    Gerard Guerin
    Humanisoft
    www.humanisoft.com

  • #2
    Code:
    '====RUN THE SLIDE SHOW====
        oSettings = oPresentation.SlideShowSettings
        oSettings.StartingSlide = 1
        oSettings.EndingSlide = 2
        oSettings.Run()
    You really should test OBJRESULT after setting properties and executing methods to see if anything bad happened.

    I "think" you can also (alternatively?) query the PB ERR variable, looking for error #99 (ERR_OBJECTERROR)
    Michael Mattias
    Tal Systems (retired)
    Port Washington WI USA
    [email protected]
    http://www.talsystems.com

    Comment


    • #3
      I just testing and I got error 99 with this line...

      Code:
      SET oPresentation = oApp.Presentations.open(File)
      I will try to figure what append with that
      Gerard Guerin
      Humanisoft
      www.humanisoft.com

      Comment


      • #4
        Maybe you ned to be using....
        Code:
        METHOD OpenOld <2004>  _
           (BYVAL FileName AS STRING, OPT BYVAL ReadOnly AS LONG, _ 
           OPT BYVAL Untitled AS LONG, _ 
            OPT BYVAL  WithWindow AS LONG) AS IDISPATCH
        ???
        Michael Mattias
        Tal Systems (retired)
        Port Washington WI USA
        [email protected]
        http://www.talsystems.com

        Comment


        • #5
          OpenOld does not help, same problem....


          Here a sample in VB and it work great....

          Code:
              Dim oPPTApp As PowerPoint.Application
              Dim oPPTPres As PowerPoint.Presentation
              Dim sPresentationFile As String
              Dim oSettings As PowerPoint.SlideShowSettings
          
              ' Get a reference to PowerPoint app
              Set oPPTApp = New PowerPoint.Application
          
              oPPTApp.Visible = True
              
              sPresentationFile = "d:\temp\test.ppt"
              Set oPPTPres = oPPTApp.Presentations.Open(sPresentationFile)
          
              Set oSettings = oPPTPres.SlideShowSettings
              oSettings.StartingSlide = 1
              oSettings.EndingSlide = 2
              oSettings.Run
          Gerard Guerin
          Humanisoft
          www.humanisoft.com

          Comment


          • #6
            Does

            Code:
            SET oPresentation = oApp.Presentations.open(File)
            want file to be in Unicode? Try:

            Code:
            SET oPresentation = oApp.Presentations.open(ucode$(File))
            Sincerely,

            Steve Rossell
            PowerBASIC Staff

            Comment


            • #7
              that work with unicode

              Thank a lot Steve
              Gerard Guerin
              Humanisoft
              www.humanisoft.com

              Comment


              • #8
                PowerPoint slides are automatically set up in landscape (horizontal) layout , Can change the slide orientation to portrait (vertical) layout .

                Anybody can help me?

                Comment


                • #9
                  Since you're asking here, is it safe to assume you want to set portrait mode with PowerBASIC COM?

                  Have you searched the PowerPoint include file for the word portrait?
                  Dale

                  Comment


                  • #10
                    See: PageSetup.SlideOrientation property (PowerPoint)


                    Forum: http://www.jose.it-berater.org/smfforum/index.php

                    Comment


                    • #11
                      i found something in https://docs.microsoft.com/en-us/off...ideorientation

                      Example

                      This example sets orientation of all slides in the active presentation to vertical (portrait).

                      VB
                      Application.ActivePresentation.PageSetup.SlideOrientation = msoOrientationVertical


                      I try to convert to powerbasic code.and have same problem.

                      Comment

                      Working...
                      X