Object Model Reference : Classes : P : PatternFill : Properties : PatternFill.FilePath |
Property FilePath As String
Member of PatternFill
The FilePath property returns the full file path of the vector-pattern file used in a pattern.
The FilePath property returns a read-only value.
The following VBA example displays the file path of the full-color pattern of the selected shape.
Sub Test() |
Dim pf As PatternFill |
If ActiveShape.Fill.Type <> cdrPatternFill Then |
MsgBox "Select an object with a pattern fill" |
Exit Sub |
End If |
Set pf = ActiveShape.Fill.Pattern |
If pf.Type <> cdrFullColorPattern Then |
MsgBox "Select an object with a full color pattern fill" |
Exit Sub |
End If |
MsgBox pf.FilePath |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.