Excel VBA教程:PresetTextEffect属性

返回或设置指定的艺术字对象的样式。 本属性的值相应于“‘艺术字’库”对话框内的格式(按从左至右和从上至下的顺序编号)。MsoPresetTextEffect 类型,可读写。

MsoPresetTextEffect 可为以下 MsoPresetTextEffect 常量之一。
msoTextEffect1
msoTextEffect10
msoTextEffect11
msoTextEffect12
msoTextEffect13
msoTextEffect14
msoTextEffect15
msoTextEffect16
msoTextEffect17
msoTextEffect18
msoTextEffect19
msoTextEffect2
msoTextEffect20
msoTextEffect21
msoTextEffect22
msoTextEffect23
msoTextEffect24
msoTextEffect25
msoTextEffect26
msoTextEffect27
msoTextEffect28
msoTextEffect29
msoTextEffect3
msoTextEffect30
msoTextEffect4
msoTextEffect5
msoTextEffect6
msoTextEffect7
msoTextEffect8
msoTextEffect9
msoTextEffectMixed

expression.PresetTextEffect

expression   必需。该表达式返回“应用于”列表中的对象之一。

说明

设置 PresetTextEffect属性的值,将使相应图形的许多其他格式属性自动得到设置。

示例

本示例将myDocument 中所有艺术字对象的样式设置为“‘艺术字’库”对话框内的第一个样式。


Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
    If s.Type = msoTextEffect Then
        s.TextEffect.PresetTextEffect = msoTextEffect1
    End If
Next

上页:Excel VBA教程:PresetShape属性 下页:Excel VBA教程:PresetTexture属性

Excel VBA教程:PresetTextEffect属性

Excel VBA教程:PresetTexture属性 Excel VBA教程:PresetThreeDFormat属性
Excel VBA教程:Previous属性 Excel VBA教程:PreviousSelections属性
Excel VBA教程:PrintArea属性 Excel VBA教程:PrintComments属性
Excel VBA教程:PrintErrors属性 Excel VBA教程:PrintGridlines属性
Excel VBA教程:PrintHeadings属性 Excel VBA教程:PrintNotes属性
Excel VBA教程:PrintObject属性 Excel VBA教程:PrintQuality属性
Excel VBA教程:PrintSettings属性 Excel VBA教程:PrintTitleColumns属性
Excel VBA教程:PrintTitleRows属性 Excel VBA教程:PrintTitles属性
Excel VBA教程:ProductCode属性 Excel VBA教程:ProgId属性
Excel VBA教程:PromptForSummaryInfo属性 Excel VBA教程:PromptString属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号