Object Model Reference : Classes : T : TextRange : Methods : TextRange.ChangeCase |
Sub ChangeCase(Case As cdrTextChangeCase)
Member of TextRange
The ChangeCase method changes the case of the text in a text range.
The following VBA example converts the text to uppercase.
Sub Test() |
Dim t As Text |
Dim s As Shape |
Dim d As Document |
Set d = CreateDocument |
Set s = d.ActiveLayer.CreateParagraphText(2, 2, 8, 8, _ |
"This is an example.") |
Set t = s.Text |
t.Story.ChangeCase cdrTextUpperCase |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.