|
本DLL,应用于EXCEL,通过VB实现Camera设备图片的截取,并自动压缩为JPG格式,节约磁盘空间。
适用于,公司员工或商品照片的批量截取。
内置了多种灵活的处理方式,方便从EXCEL直接VBA引用。
具体参数设置,请看附件中的相关文档。
可应用于Excel 2000后的各个版本。
注:很久以前发布过一个简单版本的,现在应很多朋友的要求小小的升级了一下, 谢谢使用。
操作说明:
1.启动程序,画面如下:
注:如果Camera设备(摄像机,照相机,视频,摄像头……)没插好,上面将会是一片空白,请关闭本窗口,安装好设备后再运行。
2 .右击列表框(右边那个大空白的区域),会弹好如下,选择待摄像人员的对话框。
注:本程序只提取单一的数据,换话句说,读到列表框的东西,将会自动进行过滤,避免重复数据的出现。
再注:所选择名字将会出现在待摄影列表,请务必选择正确。跨表读取请先激活该工作表,然后再运行本命令。这里要说的不是那个错别字,跨表读取,就是要选切换到该工作表,然后再右击列表框运行里面的添加待摄像列表。
3.读入数据后,效果如下图:
4.点击拍照,然后在视频区域会出现一个黑框,移动黑框,选择所需要的图片,然后点击裁剪,图片将以列表框中第一个数据为文件名,保存在工作簿所有文件夹下的Pic文件夹中。并且删除列表框中的第一个数据。
注:批量操作中,录入者,只要在导入待摄像人员后,点击-拍照-选择区域-裁剪,这样的重复动作来完成所需操作。
再注:图片质量下水平滚动条可用于调节生成图片的质量。可选范围50-100,值起小质量越差所生成的文件也就越小,90的质量对于100的质量,体积就差好几倍。所有生成图像尺寸为:156*188,对于任何证件的应用应该是足够了。
三注:将会替换同名的文件。
没安置任何后门,不倒置怀二胎,请安心放心舒心,最后谢谢使用。
Camera_Photo.rar
(386.2 KB, 下载次数: 1843)
请先运行压缩包里的 请先运行本文件注册组件.bat 批处理文件,否则,应该会出现 找不到工程或库 。
出现如下情况,步骤:
1:把丢失:GetPhoto前的勾去掉,然后确定
2:点击 工具-引用-浏览-(找到目录文件下的yvhf.dll)-打开-保存,再使用就可以了。
[ 本帖最后由 yvhf 于 2010-9-3 16:36 编辑 ] |
|