vba - powerpoint vba texteffect 调整句柄

Question

我不知道如何在 powerpoint 2010 vba 中操作调整手柄（下面箭头指向的粉红色菱形）。myshape.adjustments.count 返回 0，因此任何将 myshape.Adjustments.Item(1) 设置为值的尝试都会返回错误。我使用文本框形状手动创建了文本，添加了斜角，然后添加了文本效果、变换、圆形。手柄可让您更改文本的弧线大小和宽度。这个句柄可以通过 vba 获得吗？

Answer 1

查看对象模型，TextEffect没有通过 VBA 提供的调整句柄。这看起来很奇怪，因为这似乎是一个调整句柄。也许这是一个错误或疏忽，无论如何，这是一个问题。

http://msdn.microsoft.com/en-us/library/office/ff193987.aspx

您可能可以使用 Shape 对象的这些属性来获得所需的结果：

shp.TextEffect.Parent.Rotation

shp.TextEffect.Parent.Width

.Rotation属性采用 0 到 180 之间的双精度类型值，0 表示不旋转，180 表示倒置。

.Widthproperty 采用 double 类型的值，我认为任何值都是允许的，只需设置形状的宽度，因此，根据您想要实现的目标使其变大或变小。