[英]How do I paste a Shape into the notes page of a Powerpoint presentation in VBA?
[英]How do I copy a Shape from one Powerpoint presentation to another in VBA?
我有 VBA 代码可以将符合特定条件的形状从一个 Powerpoint 演示文稿复制到下面的另一个。 但是,当它粘贴形状时,它会从原始位置偏移(向下和向右)。 如何在保持原始坐标的同时复制形状?
sourceShape.Copy
Presentations(2).Windows(1).Activate
ActivePresentation.Slides(x).Shapes.Paste (1)
也许简单:
Shape s=ActivePresentation.Slides(x).Shapes.Paste (1)
s.Left=sourceShape.Left
s.Top=sourceShape.Top
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.