java 调用 vbs 操作excel

来源:互联网 发布:西安华山世知酒店 编辑:程序博客网 时间:2024/04/30 19:06

groovy代码(前提是安装有office软件)

 static void runVbs(String vbsPath, Object ... objects) {        String runVbs =  "cmd /c start ${vbsPath}"        if(objects) {  //args            objects.each {                if(it) {                    runVbs += " ${it}"                }            }        }        Runtime.getRuntime().exec(runVbs)    }

set-author.vbs

dim argsset args = wscript.argumentsDim objXLSet objXL = CreateObject("Excel.Application")    objXL.Application.DisplayAlerts = False    objXL.Workbooks.Open (args(0))    objXL.ActiveWorkbook.Author = args(1)    objXL.Save    objXL.Application.DisplayAlerts = True With objXL       .Workbooks.Close    .Application.QuitEnd WithSet objXL = Nothing

代码调用

                    runVbs("d:\\set-author.vbs",  "d:\\1.xls",  "张三")
0 0