2023.3.29 23:00更新 3.0版本
    看到大家这么热情,我就顺手优化了一下代码,这下子只要求水印的图片格式是png就好了,其它都没有要求了,随便起名子,随便放几张水印图都可以,其实不需要PNG也是可以的,只不过水印还是建议用PNG,因为背景可以透明。等我有空再看看哪些能再优化,或者是加一些其它的功能。
----------------------
2023.3.29 下午16:00更新  
睡一个午觉起来,发现还是有不少同学喜欢的,我看了一下代码,有好多地方可以优化,像输入最大水印图片数这里就不应该存在,这里会容易造成程序崩溃,我就删除了这一步。唯一要注意的是水印的图片命名要水印x.png,x为1-1000的整数,其实这也不需要的,我懒得写取水印图片的文件名了。
---------------------------
最近发现Excel真是无所不能啊,不但能处理数据,还能干一些杂活,看到有网友拿来玩俄罗斯方块,还能处理音频文件,还能搞图片
于是我也来试搞一下图片添加水印功能。
关于图片添加水印,这个貌似很多同志会吐槽,拿Excel来搞是不是多此一举,嗯,如果单纯的是添加水印,确实一大堆软件比比皆是,且都很出色。
我只想说随机添加图片水印,貌似没有一个软件在弄吧,如果有请大家发给我一个,记得之前有网友在悬赏这个,是不同的水印添加到一个图片上,然后生成不同的水印图片,可能他是想拿来作宣传什么用的,当时我也在关注,不过好像真的没有相关的软件做这个功能,都是批量添加同一个水印。
今天拿Excel来搞,上述问题就可以迎刃而解了。
我又拿Excel来搞事情了,批量随机添加水印图片v3.0(更新3.0更稳定易用)

1.png


使用说明:
1、请做好你的随机水印图片,要求水印图片为PNG格式。
2、把水印图片与本Excel文件放在同一文件夹下。
3、点击运行批量随机添加水印按钮。
4、程序会弹出对话框,选择你要处理的图片即可。
5、程序运行完毕,会在本Excel路径下生成一个添加水印的图的文件夹,添加水印的图片会以原文件名保存到这里。
我里面有测试图,欢迎大家测试,另如果大家有点VBA的基础,可以随便更改水印的位置、高度、宽度,倾斜度等。如下是图片的一些相关参数。
我又拿Excel来搞事情了,批量随机添加水印图片v3.0(更新3.0更稳定易用)

页面提取自-5A-DLC扯淡篇.jpg


下载链接:https://wwgb.lanzout.com/iQwt20rg7cib
之前发过关于VBA的相关帖子,希望大家给点热心。有什么关于VBA的可以留言,大家相互学习。
Word-VBA多个关键词批量替换、批量转换成PDF、批量doc转docx
ExcelVBA遍历代码(批量替换、批量取消合并单元格、批量处理字段顺序等)
https://www.52pojie.cn/thread-1736414-1-1.html
Excel按列分拣整理文件-按指定文件名复制文件到相应的文件夹中
简单明了的EXCEL批量重命名3.0,支持选择后缀名,支持反悔功能

广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!