如何批量处理word中图片的格式,调节亮度和对比度? 您所在的位置:网站首页 如何在word里调节图片透明度和亮度 如何批量处理word中图片的格式,调节亮度和对比度?

如何批量处理word中图片的格式,调节亮度和对比度?

2024-07-05 05:13| 来源: 网络整理| 查看: 265

每个word文件中有几百个带底纹的图片,需要将这些图片格式设置成的亮度为50,对比度为100,这样能去除底纹。请问如何批量处理?

 

还是让我帮你来出点子吧,怎么前面的都答非所问呢。新建一个宏,将如下代码原样复制粘贴进入后按F5执行即可。'Sub Macro1()    For i = 1 To ActiveDocument.InlineShapes.Count        ActiveDocument.InlineShapes(i).PictureFormat.Brightness = 0.5  '将嵌入型图片的亮度设置为50        ActiveDocument.InlineShapes(i).PictureFormat.Contrast = 1# '将嵌入型图片的对比度设置为100    Next i    For i = 1 To ActiveDocument.Shapes.Count       If ActiveDocument.Shapes(i).Type = msoPicture Then  '假设浮动型对象是图片时才处理            ActiveDocument.Shapes(i).PictureFormat.Brightness = 0.5  '将浮动型图片的亮度设置为50ActiveDocument.Shapes(i).PictureFormat.Contrast = 1# '将浮动型图片的对比度设置为100End If    Next i Msgbox "处理完毕!"'End Sub今后也推荐你使用我开发的《文件批量处理百宝箱V8.0》中的一些批量处理功能。



【本文地址】

公司简介

联系我们

今日新闻

    推荐新闻

    专题文章
      CopyRight 2018-2019 实验室设备网 版权所有