Previous Document Next Document

Object Model Reference : Classes : S : ShapeRange : Methods : ShapeRange.ApplyPostscriptFill
ShapeRange.ApplyPostscriptFill

Sub ApplyPostscriptFill(IndexOrName As Variant)

Description

Member of ShapeRange

The ApplyPostscriptFill method applies a specified PostScript fill to all the shapes in a shape range.

Parameter
Description
IndexOrName
Specifies the PostScript fill by its index number or name:
•
 
Index — Specifies the preset placeholder that uniquely identifies each fill
•
 
Name — Specifies the string that uniquely identifies each fill

VBA example

The following VBA example applies a PostScript fill to each text shape on the page.

Sub Test()
 Dim sr As ShapeRange
 Set sr = ActivePage.FindShapes(Type:=cdrTextShape)
 sr.ApplyPostscriptFill "Bricks"
End Sub

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.