Excel VBA教程:PresetLightingDirection属性

返回或设置光源相对于延伸图形的位置。MsoPresetLightingDirection 类型,可读写。

MsoPresetLightingDirection 可为以下 MsoPresetLightingDirection 常量之一。
msoLightingBottom
msoLightingBottomLeft
msoLightingBottomRight
msoLightingLeft
msoLightingNone
msoLightingRight
msoLightingTop
msoLightingTopLeft
msoLightingTopRight
msoPresetLightingDirectionMixed

expression.PresetLightingDirection

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

注意   如果延伸图形的表面是由线框构成的,就看不到所设置的光线效果。

示例

本示例使myDocument 中的第一个图形向上延伸,并使光线从左方照射。


Set myDocument = Worksheets(1)
With myDocument.Shapes(1).ThreeD
    .Visible = True
    .SetExtrusionDirection msoExtrusionTop
    .PresetLightingDirection = msoLightingLeft
End With

上页:Excel VBA教程:PresetGradientType属性 下页:Excel VBA教程:PresetLightingSoftness属性

Excel VBA教程:PresetLightingDirection属性

Excel VBA教程:PresetLightingSoftness属性 Excel VBA教程:PresetMaterial属性
Excel VBA教程:PresetShape属性 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属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号