使用vba在powerpoint中复制对象？

Question

我想使用VBA代码在powerpoint中复制一个选定的对象。我在下面提到了以下代码

public static boolean isEven(int number) {
    boolean truefalse = false;
    if(number%2 == 0){
        truefalse =  true;
    }
    return truefalse;
}

但是我想指定我的值而不是获取对象值。所以，请提前帮助和感谢！

Answer 1

假设您选择了一个形状，您可以像这样设置值：

' Sets the size and position of the first shape in a selection
Sub SetShapeSizeAndPosition()
  With ActiveWindow.Selection.ShapeRange(1)
    .Width = 100
    .Height = 100
    .Left = 100
    .Top = 100
  End With
End Sub