Excel VBA教程:IncrementTop方法

以指定的磅数为增量,垂直移动指定的图形。

expression.IncrementTop(Increment)

expression   必需。该表达式返回一个 Shape对象。

Increment   Single 类型,必需。以磅为单位指定图形垂直移动的距离。正值使图形向下移动,负值使图形向上移动。

Excel VBA教程:IncrementTop方法·示例

本示例复制myDocument 上的第一个图形,设置所复制的图形的填充格式,将其向右移动 70 磅,向上移动 50 磅,然后按顺时针方向旋转 30 度。


Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Duplicate
    .Fill.PresetTextured msoTextureGranite
    .IncrementLeft 70
    .IncrementTop -50
    .IncrementRotation 30
End With

上页:Excel VBA教程:IncrementRotationY方法 下页:Excel VBA教程:InputBox方法

Excel VBA教程:IncrementTop方法

Excel VBA教程:InputBox方法 Excel VBA教程:Insert方法
Excel VBA教程:InsertIndent方法 Excel VBA教程:Intersect方法
Excel VBA教程:Item方法 Excel VBA教程:Justify方法
Excel VBA教程:LargeScroll方法 Excel VBA教程:LegendEntries方法
Excel VBA教程:LineGroups方法 Excel VBA教程:LinkInfo方法
Excel VBA教程:LinkSources方法 Excel VBA教程:List方法
Excel VBA教程:ListFormulas方法 Excel VBA教程:ListNames方法
Excel VBA教程:Location方法 Excel VBA教程:MacroOptions方法
Excel VBA教程:MailLogoff方法 Excel VBA教程:MailLogon方法
Excel VBA教程:MakeConnection方法 Excel VBA教程:Merge方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号