VBA 插入图片并旋转图片,可明明只有一张图片，为什么变成了二张？多谢

VBA 插入图片并旋转图片,可明明只有一张图片，为什么变成了二张？谢谢
Dim MyRange As Range
Dim Obj As Object
Set MyRange = ActiveDocument.GoTo(wdGoToPage, wdGoToAbsolute, 3)
Set Obj = ActiveDocument.Shapes.AddPicture(App.Path & "\Ripple.jpg", False, True, 50, 25, 100, 150, MyRange)
ActiveDocument.Shapes(1).Duplicate.IncrementRotation 30 '按顺时针方向旋转 30 度。

[解决办法]
.Duplicate不就是建立shape的副本嘛。如果你只要旋转，那直接....shapes(1).insrementRotation 30。