Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve la ruta de acceso del archivo en el que está almacenado el icono para un objeto OLE. String de solo lectura.
Sintaxis
expresión. IconPath
expresión Expresión que devuelve un objeto 'OLEFormat'.
Ejemplo
En este ejemplo se muestra la ruta de acceso de cada uno de los objetos OLE incrustados que se muestran como iconos en el documento activo.
Dim shapeLoop As Shape
For Each shapeLoop In ActiveDocument.Shapes
If shapeLoop.Type = msoEmbeddedOLEObject Then
If shapeLoop.OLEFormat.DisplayAsIcon = True Then _
Msgbox shapeLoop.OLEFormat.IconPath
End If
Next shapeLoop
Vea también
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.