以文件夹中批量提取图片到excel表.docxVIP

一批文件夹，每个文件夹里面都有两张图片，现要将每个文件夹中提取一张图片到EXCEl表中，后期还要找的到。 以下是这一批文件夹原本的名称 这是某一个文件夹打开后的样子 统一重命名文件夹 在这批文件夹所在的文件夹内新建一个TXT文件，txt文件名字随便写。 TXT文件中输入： set a=1930 setlocal EnableDelayedExpansion FOR /f tokens=* %%i IN (dir /a:d /b) DO ( set /A a+=1 ren %%i 电控贴膜!a! ) 如图：（注意：我个人因为工作，命名需要从1931开始命名，所以会把a设为1930，一般人可以设成0，前面的名字就自己看着办，我设置成“电控贴膜”也是自己工作需要） 保存后，将TXT文件改成bat文件。 改动保存时，会弹出一个扩展名改变后会影响文件之类的话，点确定修改就行。 然后双击这个新改好的bat文件运行，就能把文件夹名字重新命名了。 小编寄语：我这个其实还有个弊端，就是万一你开始就有名称，想要保留，就保留不了了。所以希望大神可以补充一下，如何能保留原有的名称，直接加成后缀或者前缀，但是如果大家的目的最终跟我一样是希望导图片到EXCEl表格，尽量把这个文件名编的有规律一点，不然比较麻烦。 把文件夹内的文件重命名。 把上文中的bat文件重新改回txt,当然你可以直接新建一个（不知道要不要把原来的那个bat删除，后面实验的人可以试一下）。 TXT文件中原来的信息删除，重新输入： @echo offsetlocal enabledelayedexpansion for /f delims= %%a in (dir /ad /b) do ( set n=1000 for /f delims= %%b in (dir /a-d /on /b %%a\*.jpg 2^nul) do ( set /a n+=1 set m=!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表格，在待用一列的里面写上，具体里面的意思，看示意图。 =tableimg src= F:\1.3电控版块\贴膜价格第二批\贴膜图片待传至表格\ B2 height=100 将上文提到的公式，下拉，得到所有公式。 再将这一列的公式进行复制，粘贴到txt文本。 再次在txt文件中将粘贴的内容全部选中，复制，回到Excel表格，在图片一列（标题下面的一个表格）右击后点击“选择性粘贴”，然后选中Unicode文本，确定后就可以了。 结果图可以看到，表格和图片插入高度都是选择“100”，