Application Property

Applies To

ActionSetting object, ActionSettings collection object, AddIn object, AddIns collection object, Adjustments object, AnimationSettings object, BulletFormat object, CalloutFormat object, ColorFormat object, ColorScheme object, ColorSchemes collection object, ConnectorFormat object, DocumentWindow object, DocumentWindows collection object, ExtraColors object, FillFormat object, Font object, Fonts collection object, FreeformBuilder object, GroupShapes collection object, HeaderFooter object, HeadersFooters object, HyperLink object, HyperLinks collection object, LineFormat object, LinkFormat object, Master object, NamedSlideShow object, NamedSlideShows collection object, ObjectVerbs object, OLEFormat object, PageSetup object, ParagraphFormat object, PictureFormat object, PlaceholderFormat object, Placeholders collection object, PlaySettings object, Presentation object, Presentations collection object, PrintOptions object, PrintRange object, PrintRanges collection object, RGBColor object, Ruler object, RulerLevel object, RulerLevels collection object, Selection object, ShadowFormat object, Shape object, ShapeNode object, ShapeNodes collection object, ShapeRange collection object, Shapes collection object, Slide object, SlideRange collection object, Slides collection object, SlideShowSettings object, SlideShowTransition object, SlideShowView object, SlideShowWindow object, SlideShowWindows collection object, SoundEffect object, TabStop object, TabStops collection object, Tags object, TextEffectFormat object, TextFrame object, TextRange object, TextStyle object, TextStyleLevel object, TextStyleLevels collection object, TextStyles collection object, ThreeDFormat object, View object.

Description

Returns an Application object that represents the creator of the specified object. Read-only.

Example

In this example, a Presentation object is passed to the procedure. The procedure adds a slide to the presentation and then saves the presentation in the folder where PowerPoint is running.

Sub AddAndSave(pptPres As Presentation)
    pptPres.Slides.Add 1, 1
    pptPres.SaveAs pptPres.Application.Path & "\Added Slide"
End Sub

This example displays the name of the application that created each linked OLE object on slide one in the active presentation.

For Each s In ActivePresentation.Slides(1).Shapes
    If s.Type = msoLinkedOLEObject Then
        MsgBox s.OLEFormat.Object.Application.Name
    End If
Next