wps中的图片怎么剪切?

wps中的图片怎么剪切?有网友发来问题,他有在wps里面有批量图片,要想调整到统一大小,该如何处理呢?其实这种问题,无外乎就两种思路了,第一就是手动,第二就是使用VBA了,如果想手动的话,其实还是挺麻烦的,你要先选择所有图片,然后再统一调整,但是在wps里面,要选中所有图片,就没有Excel那么方便了(此处略去……),我们采用的方法,是使用VBA来做,即使再多的图片,也在10秒钟内搞定;

导入图片

假设我们就导入这些图片了,大小嘛,有的相同, 有的不同,尺寸是各异的,我们的目标就是要调整到统一大小;可以在插入选项卡下面,批量导入,也可以单张导入,这个就看你自己的需要了;

设置大小

wps中按Alt+F11,把下面的代码粘贴进去,然后按F5执行就可以了;(你可以修改代码中的15和9分别为你需要的尺寸即可)

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

office办公软件教程 » wps中的图片怎么剪切?

本文链接:wps中的图片怎么剪切?https://www.officeapi.cn/112255.html

OFFICE,天天学一点,进步多一点

联系我们