Word VBA教程:Adjustments对象

   
多种对象
Adjustments

包含指定“自选图形”或“艺术字”对象的调整值的集合。每个调整值代表调整控点进行调整的方式。因为某些调整控点可以通过两种方式进行调整(例如有些控点可以水平和垂直调整),所以一个图形的调整值可多于它的调整控点。一个图形最多可有 8 个调整值。

使用 Adjustments对象

可用Adjustments属性返回一个 Adjustments对象。可用 Adjustments( index ),可返回单个的调整值,其中的 index 是调整值的索引序号。

不同的图形有不同的调整值的数量,不同种类的调整值通过不同方式改变图形的几何特征,并且不同种类的调整值的有效范围不同。

注意   由于每个可调整的图形都分别具有一套调整值,所以调整特定图形操作的最佳方式是手动创建该图形的一个实例,在调整的同时启动宏记录器,然后检查记录下来的代码。

下表总结了不同种类的调整操作的有效调整值范围。在大多数情况下,如果指定值超过了有效值范围,则将最接近的有效值指定给该调整值。

调整的种类 有效值
线性(水平或垂直) 通常情况下,值 0.0 代表图形的左边或上边,而值 1.0 代表图形的右边或下边。有效值对应于通过手动对图形进行的有效调整。例如,如果手动将图形的调整控点拖至图形长度或宽度的一半,则相应的调整操作的最大值是 0.5。对于标注之类的图形,值 0.0 和 1.0 代表了标注线的起始和结束点定义的矩形的界限,负数和大于 1.0 的值都是有效值。
多向 调整值 1.0对应于图形的宽度。最大值是 0.5,即图形长度或宽度的一半。
角度 调整值是角度数值。如果指定值超过 - 180 到 180 这个范围,则该值会被换算成该范围中的值。

下面的示例在活动文档中添加一个右箭头的标注,并设置该标注的调整值。注意:虽然该图形只有三个调整控点,但是它却有四种调整方式。第三和第四种调整都对应于箭头的头颈之间的控点。


Set rac = ActiveDocument.Shapes _
    .AddShape(msoShapeRightArrowCallout, 10, 10, 250, 190)
With rac.Adjustments
    .Item(1) = 0.5    'adjusts width of text box
    .Item(2) = 0.15   'adjusts width of arrow head
    .Item(3) = 0.8    'adjusts length of arrow head
    .Item(4) = 0.4    'adjusts width of arrow neck
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号