Cut (方法) #

#本示例将第一张工作表中的第一个形状剪切到剪贴板
def test():
    shapes = Application.Worksheets.Item(1).Shapes
    shapes.Item(1).Cut()

#本示例判断如果活动工作表中第二个形状为六角星，则剪切到剪贴板
def test():
    shapes = ActiveSheet.Shapes
    if shapes.Item(2).AutoShapeType == msoShape6pointStar:
        shapes.Item(2).Cut()