Apply an AutoFormat to an Excel Spreadsheet
更新時間：2007年06月12日 00:00:00 作者：
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)
復制代碼 代碼如下:
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)
相關文章
這篇文章主要介紹了使用js讓圖片組成動畫,這樣就可以用js做動畫了，大家參考使用吧2014-01-01
今天分析一下, 終于找到原因. 舊版本的js文件寫的瀏覽器判斷有異常, 所以導致插入點一直在頭部. 今天修復之2014-05-05
屏蔽鼠標右鍵、Ctrl+n、shift+F10、F5刷新、退格鍵 的javascript代碼
屏蔽鼠標右鍵、Ctrl+n、shift+F10、F5刷新、退格鍵 的javascript代碼...2007-04-04
這篇文章主要介紹了javascript中eval函數(shù)用法,實例分析了javascript中eval函數(shù)的使用技巧,非常具有實用價值,需要的朋友可以參考下2015-04-04
這篇文章教大家學習使用Bootstrap表單控件，具有一定的參考價值，感興趣的小伙伴們可以參考一下2017-03-03
當前世界上有很多種瀏覽器，除了我們熟知的IE, Firefox, Opera, Safari四大瀏覽器之外，世界上還有近百種瀏覽器，有時候我們需要判斷瀏覽器與版本方便后續(xù)的操作，一句話瀏覽器的兼容性太差了，缺少標準2014-05-05
這篇文章主要針對Bootstrap布局組件應用進行實例講解，感興趣的小伙伴們可以參考一下2016-02-02
這篇文章給大家分享了基于bootstrap打造的特色進度條效果，非常不錯，具有參考借鑒價值，需要的朋友參考下吧2017-05-05
今天小編就為大家分享一篇layui table數(shù)據(jù)修改的回顯方法，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2019-09-09
javascript 通用簡單的table選項卡實現(xiàn)
鑒于UI妹妹每次交付過來的選項卡都夾帶了多多少少的js，而且每遇到選項卡就加一點js，造成垃圾低劣代碼逐漸堆積過多了，一直想做一個通用簡潔的選項卡庫。2010-05-05