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

Javascript
实用的JS表单验证提示效果
CSS 直方图布局示例
jquery 动态调整textarea高度
jquery animate 动画效果使用说明
jquery checkbox全选反选效果代码
jquery (show,fadeOut,Animate)简单效果
JavaScript 抽奖效果实现代码 数字跳动版
javascript Math.random()随机数函数
jQuery 加上最后自己的验证
JavaScript 自动分号插入(JavaScript synat:auto semicolon insertion)
兼容多浏览器的iframe自适应高度(ie8 、谷歌浏览器4.0和 firefox3.5.3)
javascript 打印内容方法小结
jQuery toggle()设置CSS样式
javaScript parseInt字符转化为数字函数使用小结
模仿JQuery sortable效果 代码有错但值得看看
javascript 常见的闭包问题的解决办法
在js中单选框和复选框获取值的方式
按键盘方向键翻页跳转的javascript代码(支持ie,firefox)
js 操作table之 移动TR位置 兼容FF 跟 IE
csdn 论坛技术区平均给分功能

Javascript 中的 Apply an AutoFormat to an Excel Spreadsheet


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 115 ::
收藏到网摘: 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)