返回列表 上一主題 發帖

選取所有框線

yen956

帖子
522 
主題
36 
精華
1 
積分
603 
點名
0  
作業系統
win xp sp3 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2012-12-13 
最後登錄
2021-7-11 
1# 跳轉到 »
發表於 2016-3-19 15:10 | 顯示全部帖子
本帖最後由 yen956 於 2016-3-19 15:12 編輯

Borders(i) 常數表
7   選取區的左邊 xlEdgeLeft = 7
8   選取區的上面 xlEdgeTop = 8
9   選取區的下面 xlEdgeBottom = 9
10 選取區的右邊 xlEdgeRight = 10
11 選取區內部的垂直線 xlInsideVertical = 11
12 選取區內部的水平線 xlInsideHorizontal = 12

＊如果想要在選取區畫大斜線,
   則先將選取區合併為一格, 再用Borders(5) 或 Borders(6)

請用遂步執行, 遂步觀察即可

Sub 畫格線測試()
Range("B2:G7").Select
With Selection
    For i = 7 To 12
        .Borders(i).LineStyle = xlContinuous
        .Borders(i).Weight = xlMedium
    Next
End With
End Sub

TOP

        靜思自在 : 太陽光大、父母恩大、君子量大，小人氣大。
返回列表 上一主題