Compartir a través de

Propiedad Font.Application (PowerPoint)

  • Artículo

Devuelve un objeto Application que representa al creador del objeto especificado.

Sintaxis

expresión. Aplicación

expresión Variable que representa un objeto Font.

Valor devuelto

Aplicación

Ejemplo:

En este ejemplo, se pasa un objeto Presentation al procedimiento. El procedimiento agrega una diapositiva a la presentación y, a continuación, guarda la presentación en la carpeta donde se ejecuta Microsoft PowerPoint.

Sub AddAndSave(pptPres As Presentation)

    pptPres.Slides.Add 1, 1

    pptPres.SaveAs pptPres.Application.Path & "\Added Slide"

End Sub

En este ejemplo se muestra el nombre de la aplicación que creó cada objeto OLE vinculado en la diapositiva uno de la presentación activa.

For Each shpOle In ActivePresentation.Slides(1).Shapes

    If shpOle.Type = msoLinkedOLEObject Then

        MsgBox shpOle.OLEFormat.Application.Name

    End If

Next

Consulte también

Objeto Font

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.