返回列表 上一主題 發帖

[發問] xlEdgeLeft 可以當作引數傳給 Borders() 嗎?

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-1-7 12:06 | 顯示全部帖子

[發問] xlEdgeLeft 可以當作引數傳給 Borders() 嗎?

本帖最後由 linshin1999 於 2011-1-7 13:47 編輯

各位前輩你們好:儲存格劃框線如下所示:
  
  Range("F1:J51").Select
    With Selection.Borders(xlEdgeLeft)
        .LineStyle = xlDouble
        .Weight = xlThick
    End With
    With Selection.Borders(xlEdgeTop)
        .LineStyle = xlContinuous
        .Weight = xlMedium
    End With
    ......................................................................很多...很多..............
    其中.Borders(xlEdgeLeft)      xlEdgeLeft, 可以用引數的方式傳過去嗎?
          .LineStyle = xlDouble     xlDouble,     可以用引數的方式傳過去嗎?
          .Weight = xlThick           xlThick,       可以用引數的方式傳過去嗎?

如果可以的話會很方便,如果可以的話要如何寫? 謝謝!!
收藏 分享
V98

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
2#
發表於 2011-1-7 16:16 | 顯示全部帖子
木工版主: 你的意思是  xlEdgeLeft,xlDouble,xlMedium 它們都有一代碼,我只要傳代碼過去就可了嗎?

另外引數傳過去的意思是指,我寫一個副程式,只要把這些值當引數傳過就可以了,意思就如你所說的,謝謝!!
V98

TOP

linshin1999

帖子
199 
主題
45 
精華
0 
積分
252 
點名
0  
作業系統
windows 7 (X64) 
軟體版本
office 2010 (x64) 
閱讀權限
20 
性別
男 
來自
桃園 
註冊時間
2010-12-24 
最後登錄
2020-3-31 

論壇贊助勳章論壇榮譽勳章
3#
發表於 2011-1-7 17:04 | 顯示全部帖子
本帖最後由 linshin1999 於 2011-1-7 20:05 編輯

我要回家了,若有問題回家再找你,謝謝!!


木工版主謝啦!!以 數值型態傳過去就 OK 了!
V98

TOP

        靜思自在 : 有智慧才能分辨善惡邪正；有謙虛才能建立美滿人生。
返回列表 上一主題