VBA编程批量提取图片并自动插入到Excel中指定的单元格小工具

文章目录

• • 引言
  • 实现的功能
  • 代码实现
  • 运行结果
  • 回顾总结

引言

本期分享的这款小工具能批量提取图片信息，并按照某种匹配方式自动插入到Excel中某一个单元格内。

为什么想起来写这款工具呢？起因就是前几年的疫情期间，学校会频繁的索要各种截图，如健康码、核算检测报告、疫苗接种情况，不只是学生的而是家庭成员的，然后逐一填到固定表格里，每次都要整理很久，因此写了这款小工具。

疫情虽然过去了，但这款小工具一直保留着，经过稍加修改让它拥有更多的出场机会。

举个例子，学校里都喜欢搞一些实践打卡活动，比如家务劳动、去社区志愿服务、观看宣传视频等等，就需要家长拍照片打卡，再整理汇总成表格上交。此时这款小工具就能充分发挥作用，省去大量的体力劳动了。

一起来看看它能做什么？又是如何实现的呢？

实现的功能

程序运行后，会提示用户输入图片存放的路径，如果没有输入路径程序会提醒用户输入路径信息。输入了正确的路径信息后，程序会顺次读取图片信息，并自动按照表格大小缩放比例插入到Excel表格中。

那么就有人疑惑了，它是怎么知道要插入在哪一个格子里的？那么多同学，不会串行了吧？当然不会啦，可以根据学生的姓名、学号等去匹配。当时考虑学生的姓名可能会有重复，所以就选择了学号。前提是将图片下载到本地，并将图片的名字保存为学生的学号，这样图片和学生本人就关联上了。

我们继续往下看，都是用了哪些编程技能实现的吧。

代码实现

主要功能函数实现

编程基础知识

主要是用到了以下两个函数，关于它们的详细信息可以到网上搜索或直接查看vba的联机手册。

InStr