2019年11月2日
PPT图片剪裁
摘要： Sub CropPicture() Dim shp As Shape, picFile As String, n As Long Dim sld As Slide, pre As Presentation Dim RowCount As Long, ColCount As Long RowCount = 2 '上下裁剪为几部分 ColCount = 2 '... 阅读全文
posted @ 2019-11-02 21:15 wangway 阅读(270) 评论(0) 推荐(0)