从文件夹中批量提取图片到EXCEl表.docx
《从文件夹中批量提取图片到EXCEl表.docx》由会员分享，可在线阅读，更多相关《从文件夹中批量提取图片到EXCEl表.docx（14页珍藏版）》请在冰豆网上搜索。
从文件夹中批量提取图片到EXCEl表
一批文件夹，每个文件夹里面都有两张图片，现要将每个文件夹中提取一张图片到EXCEl表中，后期还要找的到。
以下是这一批文件夹原本的名称
这是某一个文件夹打开后的样子
一、统一重命名文件夹
在这批文件夹所在的文件夹内新建一个TXT文件，txt文件名字随便写。
TXT文件中输入：
seta=1930
setlocalEnableDelayedExpansion
FOR/f"tokens=*"%%iIN（'dir/a:
d/b'）DO（
set/Aa+=1
ren"%%i""电控贴膜!
a!
"
）
如图：
（注意：
我个人因为工作，命名需要从1931开始命名，所以会把a设为1930，一般人可以设成0，前面的名字就自己看着办，我设置成“电控贴膜”也是自己工作需要）
保存后，将TXT文件改成bat文件。
改动保存时，会弹出一个扩展名改变后会影响文件之类的话，点确定修改就行。
然后双击这个新改好的bat文件运行，就能把文件夹名字重新命名了。
小编寄语：
我这个其实还有个弊端，就是万一你开始就有名称，想要保留，就保留不了了。
所以希望大神可以补充一下，如何能保留原有的名称，直接加成后缀或者前缀，但是如果大家的目的最终跟我一样是希望导图片到EXCEl表格，尽量把这个文件名编的有规律一点，不然比较麻烦。
二、把文件夹内的文件重命名。
把上文中的bat文件重新改回txt,当然你可以直接新建一个（不知道要不要把原来的那个bat删除，后面实验的人可以试一下）。
TXT文件中原来的信息删除，重新输入：
@echooff&setlocalenabledelayedexpansion
for/f"delims="%%ain（'dir/ad/b'）do（
setn=1000
for/f"delims="%%bin（'dir/a-d/on/b"%%a\*.jpg"2^>nul'）do（
set/an+=1
setm=!
n:
~1!
ren"%%a\%%b""%%a_!
m!
%%~xb"
）
）
Pause
如图：
保存后关闭，再把这个文件改成bat文件，再次双击运行。
当出现这句话之后，就好了。
看一下成果吧：
贴膜变成电控贴膜了。
三、批量将每个文件夹中的其中一张一起提取到一个文件夹
原有的放着一大堆图片的，我命名叫“贴膜图片”，然后又新建了一个空文件夹“贴膜图片待传至表格”用来存储从每个文件夹中调取的图片。
先打开那个放着图片的文件夹，搜索你想要的图片的共同特征。
比如我自己只需要每个里面的一张图片，而每个文件夹里面都有_001,那么我自己就输入的就是：
_001，输入之后就能找到图片了。
CTRL+A全选，再复制粘贴到你新建的空白文件夹中，当然你可以通过其他自己熟悉的方式选中，粘贴，这个算不上技术的事了。
这样提取图片工作就完成了。
小编寄语：
这里完成之后，其实最好能够有方法把后缀_001全部去掉，不去掉，第四步工作就要多一步了。
所以哪位大神能有方法去掉，麻烦把方法添加一下。
四、新建EXCEL表格
按照自己的需求建立一份EXCEL表格。
这里看到里面除了序号和图片，还有个待用，这一列待会真的要用到。
因为毕竟要放图片，所以行高可以放大一点。
我自己设的行高是100，最后可以看一下，行高100，插进去的图片大概多大。
然后开始填写序号，这里面就要注意了，序号要和前面放到一起的图片的序号一致起来，连jpg都不要放过。
原则上，接下去要往下拉，如果你有办法把那些图片的后缀去掉，那这个直接下拉就行，我个人不太会，所以就没有去，导致下拉后序号不对。
那么遇到这种情况咋办呢？
就用常见的&就行。
在待用里输入=B2&"_001.jpg"
回车
左边下拉，右边下拉。
这边拉好之后其实是一个公式，只是你看不出来，所以，你可以把这一列再复制成为正儿八经的文本。
复制一下右边，选择一个空列，右击粘贴为“值“，在粘贴选项中，显示的叫“123”.
粘贴好之后把那些不需要的删掉，该插入列的插入，留下最终要的真正的序号，就是这个样子的
五、图片导入Excel表格
选择一张待传的图片右击，选择属性，把图片的位置拷贝下来。
我自己的是F:
\1.3电控版块\贴膜价格第二批\贴膜图片待传至表格
回到Excel表格，在待用一列的里面写上，具体里面的意思，看示意图。
="
\1.3电控版块\贴膜价格第二批\贴膜图片待传至表格\"&B2&"'height='100'>"
将上文提到的公式，下拉，得到所有公式。
再将这一列的公式进行复制，粘贴到txt文本。
再次在txt文件中将粘贴的内容全部选中，复制，回到Excel表格，在图片一列（标题下面的一个表格）右击后点击“选择性粘贴”，然后选中Unicode文本，确定后就可以了。
结果图可以看到，表格和图片插入高度都是选择“100”，但是插入之后，图片实际没有填满的，具体原因我也不太懂，有知道原因的大神，可以添加一下哦。
等粘贴好了之后原来不要的内容，比如待用那一列那个公式就可以删除。
展开阅读全文
相关搜索