@范恒宾的博客

一、需求背景  由于投标文件的需求，需要把文件中的所有图片变成“冲蚀”，即看起来是黑白的样子，由于网上的教程大多数是针对于单个图片，或者把图片变成非“嵌入式”的，再做统一调整。  投标文件中涉及到的图片较多，且不可能一一进行单独处理，所以考虑使用对应的批量工具或者脚本。然而工具没有找到（如果大家有，可以推荐一下），查看一些英文资料，发现如下的VB脚本。二、大小处理  调用VB宏：打开word，快速调用 “ALT+F11” 调出VB工具，进行运行Sub setpicsize() '设置图片大小Di

一、需求背景  由于投标文件的需求，需要把文件中的所有图片变成“冲蚀”，即看起来是黑白的样子，由于网上的教程大多数是针对于单个图片，或者把图片变成非“嵌入式”的，再做统一调整。  投标文件中涉及到的图片较多，且不可能一一进行单独处理，所以考虑使用对应的批量工具或者脚本。然而工具没有找到（如果大家有，可以推荐一下），查看一些英文资料，发现如下的VB脚本。二、冲蚀处理1.调用VB宏  打开word，快速调用 “ALT+F11” 调出VB工具，进行运行Sub Macro1()' 图片处理 宏'