一、编写vbs文件
test.vbs文件中vb代码如下:
dim args
set args = wscript.arguments
Dim objXL
Set objXL = CreateObject("Excel.Application")
With objXL
.Workbooks.Open (args(0))
.Application.Run "InAndOut"
.ActiveWorkbook.Save
.Workbooks.Close
.Application.Quit
End With
Set objXL = Nothing
解释: args(0)是接收下表为0的参数,也就是第一个参数
.Application.Run "InAndOut"的InAndOut是excel文件中宏的名称二、java调用vb
Runtime.getRuntime().exec("cmd /c start f:/test.vbs f:/test.xls")
解释: 运行f盘下test.vbs文件,参数为f盘test.xls,在vb文件中.Workbooks.Open (args(0))读取的args(0)则是test.xls。
test.vbs文件中vb代码如下:
dim args
set args = wscript.arguments
Dim objXL
Set objXL = CreateObject("Excel.Application")
With objXL
.Workbooks.Open (args(0))
.Application.Run "InAndOut"
.ActiveWorkbook.Save
.Workbooks.Close
.Application.Quit
End With
Set objXL = Nothing
解释: args(0)是接收下表为0的参数,也就是第一个参数
.Application.Run "InAndOut"的InAndOut是excel文件中宏的名称二、java调用vb
Runtime.getRuntime().exec("cmd /c start f:/test.vbs f:/test.xls")
解释: 运行f盘下test.vbs文件,参数为f盘test.xls,在vb文件中.Workbooks.Open (args(0))读取的args(0)则是test.xls。
解决方案 »
- Map.Entry求助,谢谢谢谢........
- 一个面试题,给一个任意字符组成的字符串统计每个字符出现的次数(有中文)?
- 我想做一个智能点的粘贴板.java能够捕获别的程序下的ctr+C键吗
- 运行一个小程序,出现错误
- 求ftp客户端的java包
- 请教一个关于Java.util.logging.Logger的问题
- 心情不好 散分啦
- 请问有输出货币大写的CLASS吗
- (在线等待)用JTable显示查询数据库的内容,第二次查询后点击JTable,显示数据会回到第一次显示内容,如何改变?谢谢。
- 为什么在JPanel上加滚动条不成功啊,滚动条不能滚动
- 网站视频播放客户端播放视频路径被重定向报302错误
- 大神求教
Windows无法访问指定设备路径或文件,您可能没有合适的权限访问这个项目.
然后360就将它作为病毒删掉了。
Runtime.getRuntime().exec("cmd /c start f:/test.vbs f:/test.xls")
这一句完整的java是怎么写代码才不会报错的?
360是误杀,你把360关掉