ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: zl1st

[已解决] 求一段能获取文件夹内图片特定属性的代码

[复制链接]

TA的精华主题

TA的得分主题

发表于 2022-5-25 05:55 来自手机 | 显示全部楼层
我解决之法是查找出所有文件,列出文件所所有属性,你筛选下就好

TA的精华主题

TA的得分主题

发表于 2022-5-25 09:10 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
用VBA直接调用win32 API gdiplus库即可以很轻松读出来

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-5-25 10:42 | 显示全部楼层
lilyhcn1 发表于 2022-5-25 05:55
我解决之法是查找出所有文件,列出文件所所有属性,你筛选下就好

如何列出?请指教。

TA的精华主题

TA的得分主题

发表于 2022-5-25 10:47 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2022-5-25 10:50 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
WIA法,也可以用GDI+API


111.png

图片Compression.zip

1.04 KB, 下载次数: 26

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2022-5-25 11:13 来自手机 | 显示全部楼层
zl1st 发表于 2022-5-25 10:42
如何列出?请指教。

列文件代码有了,列图片的exif还没好的软件

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-5-25 11:57 | 显示全部楼层
wanghan519 发表于 2022-5-25 04:47
mogrify +compress -layers merge $_只是去掉压缩,合并图层,不一定对所有非NONE都起作用,试试吧,而 ...

您写的代码我测试了一下,能够成功将压缩格式保存的TIF转成未压缩,能把含背景图层的TIF合并图层。这些图在word,看图软件也看不出问题。但我用的一个十几年前的小众软件通不过,说是文件IO错误,是一个未知的TIFF文件。用PS查看了一下,转换后的图片压缩去掉了,图层也合并了,但另存时图层那个复选框是选中状态,说明有些地方参数可能还要增加才可以。
谢谢您的帮助,能够筛选出来已经帮了我大忙了。转不转没关系,因为有个中间过程还需要把修改过的图片重新插入刷新,不规范的图片比例也很小,手动也够了。
头脑僵化、英语太差,学新东西不成了。以前搞命令行还是DOS时代的arj呢。
谢谢!

TA的精华主题

TA的得分主题

 楼主| 发表于 2022-5-25 12:11 | 显示全部楼层
perfect131 发表于 2022-5-25 10:50
WIA法,也可以用GDI+API

经测试,代码正确,可否帮忙修改遍历指定文件夹,结果输出到EXCEL文档。
谢谢!

TA的精华主题

TA的得分主题

发表于 2022-5-25 13:26 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
zl1st 发表于 2022-5-25 11:57
您写的代码我测试了一下,能够成功将压缩格式保存的TIF转成未压缩,能把含背景图层的TIF合并图层。这些图 ...

我这转完用PS打开另存不会选中图层(问下PS用的哪个版本我想试试),上网搜了一下,确实有说imagemagick合并图层后不干净的,给出的解决办法是先tif转psd,再psd合并图层转tif,不知道行不行:
  1. Get-ChildItem -Recurse *.tif | % {if ((identify -format '%C' $_) -ne 'NONE') {convert $_ tmp.psd; convert +compress -layers merge tmp.psd $_}}
复制代码




TA的精华主题

TA的得分主题

 楼主| 发表于 2022-5-25 15:25 | 显示全部楼层
wanghan519 发表于 2022-5-25 13:26
我这转完用PS打开另存不会选中图层(问下PS用的哪个版本我想试试),上网搜了一下,确实有说imagemagick ...

我用的是 22.1.0绿色版的,现在这个命令处理完还是有图层复选框选中,而且还多了一个tmp.psd。
这些图片打开应用都没问题,就是不支持我的这个小众软件。
我用的这个软件是网友十几年前从方正畅流分离制作的 方正 pdfcreator 3140,专门解释方正PS到PDF的。这个软件对tif要求太高,LZW压缩存储的TIF换成网上方正 pdfcreator3108版就没问题,但3108有我接受不了的不足。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-18 01:44 , Processed in 0.044632 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表