var curTbl = document.getElementById(tableid);
var oXL = new ActiveXObject("Excel.Application");
//创建AX对象excel
var oWB = oXL.Workbooks.Add();
//获取workbook对象
var oSheet = oWB.ActiveSheet;
//激活当前sheet
var sel = document.body.createTextRange();
sel.moveToElementText(curTbl);
//把表格中的内容移到TextRange中
sel.select();
//全选TextRange中内容
sel.execCommand("Copy");
//复制TextRange中内容
oSheet.Paste();
//粘贴到活动的EXCEL中
oXL.Visible = true;
//设置excel可见属性
}
这种方式导出的Excel只有一个工作表,怎么样才能有多个工作表?
6 个解决方案
#1
oWB.Sheets.Add();
#2
多写几句可以吗?谢谢了!
#3
怎么样来激活这个工作表?
好人做到底!
大侠,帮帮忙!
好人做到底!
大侠,帮帮忙!
#4
oXM.Worksheets("Sheet2").Activate();
//oXM.Worksheets(1).Activate();
//oXM.Worksheets(1).Activate();
#5
oXL.Worksheets("Sheet2").Activate();
//oXL.Worksheets(1).Activate();
可查office目录下的VBAXL10.CHM
//oXL.Worksheets(1).Activate();
可查office目录下的VBAXL10.CHM
#6
眼泪啊,哗哗的....
谢了,等会好好去看看!
谢了,等会好好去看看!
#1
oWB.Sheets.Add();
#2
多写几句可以吗?谢谢了!
#3
怎么样来激活这个工作表?
好人做到底!
大侠,帮帮忙!
好人做到底!
大侠,帮帮忙!
#4
oXM.Worksheets("Sheet2").Activate();
//oXM.Worksheets(1).Activate();
//oXM.Worksheets(1).Activate();
#5
oXL.Worksheets("Sheet2").Activate();
//oXL.Worksheets(1).Activate();
可查office目录下的VBAXL10.CHM
//oXL.Worksheets(1).Activate();
可查office目录下的VBAXL10.CHM
#6
眼泪啊,哗哗的....
谢了,等会好好去看看!
谢了,等会好好去看看!