excel单元格里面的一张图片裁剪 vba代码
时间: 2023-03-10 17:16:18 浏览: 497
Word VBA源代码
5星 · 资源好评率100%
A: 我可以提供一个简单的VBA代码来实现Excel单元格中图片的裁剪:Sub CutImage()Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
If Shp.Type = msoPicture Then
Shp.PictureFormat.CropLeft = 10
Shp.PictureFormat.CropRight = 10
Shp.PictureFormat.CropTop = 10
Shp.PictureFormat.CropBottom = 10
End If
Next
End Sub
阅读全文