使用旁竖汪shell语句,例子:
Sub RAR()Shell "C:\Program 运仔Files\WinRAR\WinRAR.exe", 纤明vbNormalFocus
End Sub
第一步,注册: REGSVR32 eztoolse.dll (DLL的名字,修改成你自己的)把这个复制到记事本 然后扩展名改成 BAT把BAT 文件跟DLL 放到同一文件夹下,双击BAT 文件 注册第二步: ALT+F11打开VBE 工具菜单---引用 刚才的渣伏DLL
第三步: dim a as new XXX ( 会自动d出关键字 选择你刚才引用的 DLL 中的你自己喊敏定义的类)如渗携
然后就可以 用 a.XX 的方式 来调用 DLL 中的接口程序了
Dim ReturnValueReturnValue = Shell("碰禅C:\Program Files\Microtek\ScanWizard 5\ScanWizard5.exe", 1) '扫描路径及程序(可以设为实际的)为:"C:\Program Files\Microtek\笑举尘ScanWizard 5\ScanWizard5.exe"
AppActivate ReturnValue
End Sub
2.VBA控制外部答握扫描程序的参数可能性不大。
3.建议批量扫描图片存到一个文件夹中可以批量改名,扫描程序一般能自动给图片编号的,可以在EXCEL表中建立索引。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)