2024年5月11日发(作者:)
1.创建实例并创建工作表
var XLObj = new ActiveXObject("ation");//创建Excel实例
var xlBook = ; //新增工作簿
var ExcelSheet = eets(1); //创建工作表
2.保存表格
("C:");
3. 使 Excel 通过 Application 对象可见
e = true;或者e=true;
4.打印
ut;或 者:ut;
5.关闭
(savechanges=false);或者 (savechanges=false);
6.结束进程
() 或者(); XLObj=null;
7.页面设置
rgin= 2/0.035; //页边距 左2厘米
argin = 3/0.035; //页边距 右3厘米,
gin = 4/0.035; //页边距 上4厘米,
Margin = 5/0.035; //页边距 下5厘米
Margin = 1/0.035; //页边距 页眉1厘米
Margin = 2/0.035; //页边距 页脚2厘米
Header = "页眉中部内容";
ader = "页眉左部内容";
eader = "页眉右部内容";
Footer = "页脚中部内容";
oter = "页脚左部内容";
ooter = "页脚右部内容";
8.对单元格操作,带*部分对于行,列,区域都有相应属性
(row,col).Value = "内容"; //设置单元格内容
(row,col). = 1; //设置单元格边框*()
(row,col).ndex = 1; //设置单元格底色*(1-黑色,
2-白色,3-红色,4-绿色,5-蓝色,6-黄色,7-粉红色,8-天蓝色,9-酱土色..可以多做尝试)
(row,col).n = 1; //设置单元格背景样式*(1-
无,2-细网格,3-粗网格,4-斑点,5-横线,6-竖线..可以多做尝试)
(row,col).ndex = 1; //设置字体颜色*(与上相
同)
(row,col). = 10; //设置为10号字*
(row,col). = "黑体"; //设置为黑体*
(row,col). = true; //设置为斜体*
(row,col). = true; //设置为粗体*
(row,col).ClearContents; //清除内容*
(row,col).WrapText=true; //设置为自动换行*
(row,col).HorizontalAlignment = 3; //水平对齐方式枚举* (1-常规,
2-靠左,3-居中,4-靠右,5-填充 6-两端对齐,7-跨列居中,8-分散对齐)
(row,col).VerticalAlignment = 2; //垂直对齐方式枚举*(1-靠
上,2-居中,3-靠下,4-两端对齐,5-分散对齐)
//行,列有相应操作:
(row).
s(col).
(startrow+":"+endrow). //如Rows("1:5")
即1到5行
s(startcol+":"+endcol). //如
Columns("1:5")即1到5列
//区域有相应操作:
(startcell+":"+endcell).Select;
//如Range("A2:H8")即A列第2格至H列第8格的整个区域
ion.
//合并单元格
(startcell+":"+endcell).MergeCells = true;
//如Range("A2:H8")即将A列第2格至H列第8格的整个区域合并为一个单元格
或者:("A2",(8, 8)).MergeCells = true;
9.设置行高与列宽
s(startcol+":"+endcol).ColumnWidth = 22;//设置从firstcol到
stopcol列的宽度为22
(startrow+":"+endrow).RowHeight = 22;//设置从firstrow到
stoprow行的宽度为22
Var myrange ((2,1),(2,6));
t()
t()// 好像不太管用
//设置该区域为自适应高度和宽度
使用JavaScript将表格内容导出到Excel的方式
1.整个表格拷贝到 EXCEL中
function CopyTable(tableid)
{
//整个表格拷贝到EXCEL中
var curTbl = mentById(tableid);
var oXL = new ActiveXObject("ation");
//创建AX对象excel
var oWB = ();
//获取workbook对象
var oSheet = Sheet;
//激活当前sheet
var sel = TextRange();
ElementText(curTbl);
//把表格中的内容移到TextRange中
();
//全选TextRange中内容
mmand("Copy");
//复制TextRange中内容
();
//粘贴到活动的EXCEL中
e = true;
//设置excel可见属性
}
2.把单元格内容拷贝到Excel,并 设置单元格格式.
function method2(tableid) //读取表格中每个单元到EXCEL中
{
var curTbl = mentById(tableid);
var oXL = new ActiveXObject("ation");
//创建AX对象excel
var oWB = ();
//获取workbook对象
var oSheet = Sheet;
//激活当前sheet
var Lenr = ;
var y=mentById('dropYear');
var m=mentById('dropMonth');
//取得表格行数
( 1, 1).value='商户名称:工商银行商城';
((1,1),(1,6)).Merge()
(2,1).value=日期
'+s[edIndex].value+'-'+s[edIndex].value;
((2,1),(2,6)).Merge()
( 3, 1).value='销售情况'
((3,1),(3,6)).Merge()
( 3, 1).HorizontalAlignment=3;
( 3, 1).=14;
( 3, 1). = true;
((4,1),(4,6)).Merge()
(4,1).value=mentById('lbMessage').innerText;
for (i = 0; i < Lenr; i++)
{
var Lenc = (i).;
//取得每行的列数
for (j = 0; j < Lenc; j++)
{
(i + 5, j + 1).value = (i).cells(j).innerText;
//赋值
}
}
(i+6,2).value=mentById('hidSum').value;
t();
;
t();
(4).RowHeight = 30;
e = true;
//设置excel可见属性
();
oXL = null;
idTmr = erval("Cleanup();",1);//强制释放资源
}
function Cleanup()//清除Excel资源
{
nterval(idTmr);
CollectGarbage();
}
使用JavaScript按照表格格式复制内容到剪切板
1.在Excel中进行粘贴
function copytable()
{
var content=''
var tb=mentById('GVmain');
var rows=;
for(var i=0;i<;i++)
{
var cells=rows[i].cells;
for(var j=0;j<;j++)
{
content +=cells[j].ng()+'t';
}
content +='n';
}
if(content!='')
{
a("text",content);
alert("复制成功!")
}
}
发布评论