2009-11-02 110 views

回答

3

发现:

With ActivePresentation.Slides(3).Shapes(1) 
    .PictureFormat.CropLeft = 10 
    .PictureFormat.CropTop = 10 
    .PictureFormat.CropRight = 10 
    .PictureFormat.CropBottom = 10 
End With