wps中的图片怎么剪切?有网友发来问题,他有在wps里面有批量图片,要想调整到统一大小,该如何处理呢?其实这种问题,无外乎就两种思路了,第一就是手动,第二就是使用VBA了,如果想手动的话,其实还是挺麻烦的,你要先选择所有图片,然后再统一调整,但是在wps里面,要选中所有图片,就没有Excel那么方便了(此处略去……),我们采用的方法,是使用VBA来做,即使再多的图片,也在10秒钟内搞定;
导入图片
假设我们就导入这些图片了,大小嘛,有的相同, 有的不同,尺寸是各异的,我们的目标就是要调整到统一大小;可以在插入选项卡下面,批量导入,也可以单张导入,这个就看你自己的需要了;
设置大小
在wps中按Alt+F11,把下面的代码粘贴进去,然后按F5执行就可以了;(你可以修改代码中的15和9分别为你需要的尺寸即可)
【wps中的图片怎么剪切?】Sub FormatPics()Dim Shap As InlineShapeFor Each Shap In ActiveDocument.InlineShapesIf Shap.Type = wdInlineShapePicture ThenShap.LockAspectRatio = msoFalse ‘不锁定纵横比Shap.Width = CentimetersToPoints(15) ‘宽15CMShap.Height = CentimetersToPoints(9) ‘高9CMEnd IfNextEnd Sub
推荐阅读
- wps表格怎么替换文字?
- wps取消隐藏怎么操作?
- wps高亮重复项怎么用?
- wps怎么插入折线图?
- wps怎么设置中文版?
- wps表格怎么查找内容?
- wps全屏怎么关?
- wps按了怎么办
- wps分数怎么打出来?
- wps文档损坏怎么修复?