office word中利用宏编程批量调节图片的亮度和对比度

Sub '调节亮度和对比度()' 调节亮度和对比度 宏For i = 1 To ActiveDocument.InlineShapes.Count'0~1对应-100%~100%范围ActiveDocument.InlineShapes(i).PictureFormat.Brightness = 0.275 '将嵌入型图片的亮度设置为-45%ActiveDocument.InlineShapes(i).PictureFormat.Contrast = 0.825 '将嵌入型图片的对比度设置为65%Next iFor i = 1 To ActiveDocument.Shapes.CountIf ActiveDocument.Shapes(i).Type = msoPicture Then '假设浮动型对象是图片时才处理ActiveDocument.Shapes(i).PictureFormat.Brightness = 0.275 '将浮动型图片的亮度设置为-40%ActiveDocument.Shapes(i).PictureFormat.Contrast = 0.825 '将浮动型图片的对比度设置为65%End IfNext iMsgBox "处理完毕！" End Sub

步骤：在word中新建一个宏，然后复制上述代码到里面，点击运行后提示“处理完成”，然后保存宏以后用

 

总结

以上是生活随笔为你收集整理的office word中利用宏编程批量调节图片的亮度和对比度的全部内容，希望文章能够帮你解决所遇到的问题。

如果觉得生活随笔网站内容还不错，欢迎将生活随笔推荐给好友。