Rem http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.xlfileformat.aspx
Set objArgs = WScript.Arguments
FullName = objArgs(0)
FileName = Left(FullName, InstrRev(FullName, ".")-1)
Set objExcel = CreateObject("Excel.application")
objExcel.application.visible=false
objExcel.application.displayalerts=false
set objExcelBook = objExcel.Workbooks.Open(FullName)
objExcelBook.SaveAs FileName & "(SysAutoConv)",51
objExcel.Application.Quit
objExcel.Quit
Set objExcel = Nothing
set objExcelBook = Nothing
import java.io.IOException;
/**
*
* @author lidongbo
* @date 2012-10-15
*/
public class VBAUtils {
public static final void xls2xlsx(String filePath) throws IOException{
//TODO:测试
Runtime.getRuntime().exec("cscript \"" + "C:\\aaa\\xls2xlsx.vbs\" \"" + filePath + "\"");
}
public static void main(String[] args) throws IOException {
xls2xlsx("C:\\aaa\\aaa.xls");
}
}
如果出现以下异常
Microsoft Office Excel 不能访问文件“XXXxls”。 可能的原因有:? 文件名称或路径不存在。? 文件正被其他程序使用。 ? 您正要保存的工作簿与当前打开的工作簿同名
解决办法如下
?Windows 2008 Server x64
Please make this folder.
C:\Windows\SysWOW64\config\systemprofile\Desktop
?Windows 2008 Server x86
Please make this folder.
C:\Windows\System32\config\systemprofile\Desktop
...instead of dcomcnfg.exe.
This operation took away office automation problems in my system.
A Desktop folder seems to be necessary in the systemprofile folder to open file by Excel.
It disappears from Windows2008, Windows2003 had the folder,
and I think it cause this error.
在C:\Windows\System32\config\systemprofile和C:\Windows\SysWOW64\config\systemprofile目录下创建名为Desktop目录即可解决问题。
- 大小: 1.1 KB
分享到:
相关推荐
使用vba 批量合并文件夹下的所有xls、xlsx文件
VBA模糊查询示例(使用单元格区域数据).xls
使用VBA,打开一个新的EXCEL文件,只要在EXCEL宏里运行以下代码(里面的文件夹地址一定要改成你要合并的EXCEL所在的文件夹地址) Sub cfl() Dim fs, f, f1, fc, s, x, rowss, columnss Set fs = CreateObject(...
card.xls内含VBA编写的宏代码。主要具有工具栏自动生成、消灭,截取设备卡片源数据,生成卡片,建立新文件夹并生成卡片文件,根据需要建立sheets电子表,并且实现自动连续输出打印的功能。 文件已经使用360安全卫生...
通过使用Free Spire.XLS for .NET,开发人员可以快速方便的查看,生成,读写以及自定义编辑Excel文件。Spire.XLS for .NET支持Excel 97-2003, Excel 2007, Excel 2010 and Excel 2013。它还支持C#, VB.NET, ASP.NET...
Excel VBA工程项目密码移除,可适用于xls、xlsx、xlsm等格式,亲测有效!注意看使用说明
xls2xml 使用vba生成xml文件,两种方式
因为有些程序不能处理excel2007版,所以我们要将xlsx格式另存为2003版xls格式。如果是一大堆文件需要转换,则可以使用宏来实现将xlsx文件批量另存为xls文件。
微软Excel VBA手册,Excel VBA 对象属性方法及使用示例。Excel VBA 对象属性方法及使用示例。
\示例\数据记录\”文件夹中,含有两个工作簿test1.xls 、test2.xls (当然,可以不限于两个),在test1.xls 工作簿中含有三张工作表,在test2.xls 工作簿中含有两张工作表,现在使用一段VBA 代码合并这两个工作簿到...
《财务会计管理系统》范例文件使用说明: 本套《财务会计管理系统》包括以下6个子系统: 1. 会计科目及期初余额管理系统.xls 用于设置会计科目及期初余额。 登陆用户名:hxl,密码:11111 2. 会计凭证管理系统.xls ...
数据,数据的解析和绘图操作是在VBA中完成的 ---2009-12-18 今天查找资料翻出来了这段代码,发现里边的类确实是空的,我说怎么总挨骂 呢,当时肯定打包的时候晕透了把另一个本该删除的类打包进去了。我无法 替换...
将要合并的excel表全部...执行vba.xls里面的“表合并”宏,即可完成合并和数据行数统计,结果在新建的excel文件中的最后两张sheet中。 (统计行数的数组设为200维,若有更多张表,可进自行修改arr和str_arr数组维数)
本文件主要介绍使用VBA程序对CATIA数模(*.CATPart、*.CATProduct、*.CATDrawing)进行自动化处理,旨在提高工作效率、改进数模质量和减少重复劳动,例如: 1) 零件设计程序组Part.catvba:全部适应+等轴测图、...
现在我将WPS VBA与WPS2012放在一起,请先安装WPS2012(如果你的电脑中有WPS的其他版本就不需要安装了,我测试过该WPS VBA与WPS2007到WPS2012等版本都兼容),再安装WPS VBA就可使用VBA强大的二次开发功能了!...
1、压缩内包含:帐号信息、VBA代码调试代码,2007版本文件(用07版excel编写,扩展名:xlsm),2003版本excel,扩展名:.xls. 2、如果你的excel 第一次可以运行 第二次运行时候卡死,并且 进入查看VBA代码中 工具...
SQLite3_StdCall.dll是一个很小且非常简单的C .dll,它使得可以使用VBA中的标准SQLite3 .dll。 它只是将调用从VBA传递到SQLite,而无需更改参数,但这允许StdCall调用约定(仅限VB6和VBA)。 SQLiteForExcel.xls...
本文件主要介绍使用VBA程序对CATIA数模(*.CATPart、*.CATProduct、*.CATDrawing)进行自动化处理,旨在提高工作效率、改进数模质量和减少重复劳动,例如: 1) 零件设计程序组Part.catvba:全部适应+等轴测图、...
下载后需要启用宏(因为要运行VBA脚本嘛), 放心没有病毒的。 如果不会启用宏操作, 就到我的站:http://www.topnorth.cn 的原贴里看看方法。 原贴地址:http://www.topnorth.cn/post/19.html 下载地址: ...