当前位置: 首页 > 图文教程 > 网络编程 > Javascript > Apply an AutoFormat to an Excel Spreadsheet

Javascript
编辑浪子版表单验证类
JavaScript脚本语言在网页中的简单应用
getElementById在任意一款浏览器中都可以用吗的疑问回复
“增强js程序代码的健壮性”之我见大量示例代码
javascript之卸载鼠标事件的代码
静态页面下用javascript操作ACCESS数据库(读增改删)的代码
javascript操作文本框readOnly
用javascript实现gb2312转utf-8的脚本
网站被黑的假象--ARP欺骗之页面中加入一段js
(JS实现)MapBar中坐标的加密和解密的脚本
几款极品的javascript压缩混淆工具
[原创]由亿起发(eqifa.com)的页面发现顶部的http://16a.us/8.js想到的js解密
JavaScript中的new的使用方法与注意事项
分别用两个函数实现的菜单
非常不错的模拟打字效果,目前仅支持纯文本、BR标签、和P标签
用javascript实现的支持lrc歌词的播放器
JS加ASP二级域名转向的代码
效果直逼flash的Div+Css+Js菜单
input之怎么清除默认值
用xhtml+css写的相册自适应 - 类似九宫格[兼容 ff ie6 ie7 opear ]

Javascript 中的 Apply an AutoFormat to an Excel Spreadsheet


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 57 ::
收藏到网摘: n/a

Script Code
复制代码 代码如下:

Const xpRangeAutoFormatList2 = 11
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Add()
Set objWorksheet = objWorkbook.Worksheets(1)
k = 1
For i = 1 to 10
For j = 1 to 10
objWorksheet.Cells(i,j) = k
k = k + 1
Next
Next
Set objRange = objWorksheet.UsedRange
objRange.AutoFormat(xpRangeAutoFormatList2)