亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

Apply an AutoFormat to an Excel Spreadsheet

 更新時(shí)間:2007年06月12日 00:00:00   作者:  
Script Code

復(fù)制代碼 代碼如下:

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) 

相關(guān)文章

最新評(píng)論