久久国产成人av_抖音国产毛片_a片网站免费观看_A片无码播放手机在线观看,色五月在线观看,亚洲精品m在线观看,女人自慰的免费网址,悠悠在线观看精品视频,一级日本片免费的,亚洲精品久,国产精品成人久久久久久久

分享

Excle工作表基本操作

 gblhp 2015-02-16

區(qū)域也是Excel工作表的基本操作對象,,其操作也比較簡單,,看下面的代碼

Sub test()
Range("A1:B2").Select '選中A1到B2單元格
Range("A1:B2").Interior.Color = vbRed '設置A1到B2單元格的底色為紅色
Range("A1:B2").Merge '合并A1到B2單元格
End Sub

下面的代碼是設置邊框用的

Sub Macro1()

Range("A1:B2").Select
Selection.Borders(xlDiagonalDown).LineStyle = xlNone  '斜線無
Selection.Borders(xlDiagonalUp).LineStyle = xlNone    '斜線無
With Selection.Borders(xlEdgeLeft)                    '左邊線
.LineStyle = xlContinuous          '線條類型
.ColorIndex = 0                             '顏色
.TintAndShade = 0                      '漸變色
.Weight = xlThin                          '線條粗細
End With
With Selection.Borders(xlEdgeTop)        '頂邊線
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlEdgeBottom)     '底邊線
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlEdgeRight)      '右邊線
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlInsideVertical)  '里堅線
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
With Selection.Borders(xlInsideHorizontal)  '里橫線
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
End Sub

代碼中selection代表表格中被選中的區(qū)域,在上面的代碼中即range("A1:B2"),。對于一些設置格式的代碼通常是不用自己來寫的,只要錄制一個宏就可以了,,關于怎么錄制宏請參見錄制宏,。

 

    本站是提供個人知識管理的網(wǎng)絡存儲空間,,所有內(nèi)容均由用戶發(fā)布,,不代表本站觀點。請注意甄別內(nèi)容中的聯(lián)系方式、誘導購買等信息,,謹防詐騙,。如發(fā)現(xiàn)有害或侵權內(nèi)容,請點擊一鍵舉報,。
    轉(zhuǎn)藏 分享 獻花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多