office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

格式复制-格式刷 复制一个形状Shape的格式给另一个形状Shape

2020-05-25 10:37:00
zstmtony
原创
2949


 复制一个形状Shape的格式给另一个形状Shape

格式复制-格式刷
Sub active()
    With ActivePresentation
        .Slides(2).Shapes(1).PickUp
        .Slides(4).Shapes(3).Apply
    End With
End Sub

分享