返回列表 上一主題 發帖

格線問題

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 3

帖子
559 
主題
58 
精華
0 
積分
626 
點名
0  
作業系統
win8 
軟體版本
office2013 
閱讀權限
50 
性別
男 
來自
TW 
註冊時間
2010-11-22 
最後登錄
2024-6-14 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-3-29 09:18 | 顯示全部帖子

格線問題

Dear 大大

        問題如下圖：
        不知道為什麼，在excel 2013執行沒問題，在2007就會產生錯誤
        請指導一下

收藏 分享
學習才能提升自己

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 3

帖子
559 
主題
58 
精華
0 
積分
626 
點名
0  
作業系統
win8 
軟體版本
office2013 
閱讀權限
50 
性別
男 
來自
TW 
註冊時間
2010-11-22 
最後登錄
2024-6-14 
2#
發表於 2016-3-29 13:54 | 顯示全部帖子
回復 2# ikboy


    有試過，沒有用。
學習才能提升自己

TOP

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 3

帖子
559 
主題
58 
精華
0 
積分
626 
點名
0  
作業系統
win8 
軟體版本
office2013 
閱讀權限
50 
性別
男 
來自
TW 
註冊時間
2010-11-22 
最後登錄
2024-6-14 
3#
發表於 2016-3-29 13:55 | 顯示全部帖子
自己修改成如下，在2007、2013試跑過，可以解決。
   
    工作表5.Range(Cells(11, 12), Cells(22, C)).Select
   
    With Selection
               .Borders.LineStyle = xlContinuous '格線
               .Font.Name = "新細明體"           '字體
               .Font.Size = 14                   '字型大小
               .ShrinkToFit = True               '字體縮至欄寬大小
               .HorizontalAlignment = xlGeneral  '左右置中
               .VerticalAlignment = xlCenter     '上下置中
    End With
學習才能提升自己

TOP

        靜思自在 : 修行要繫緣修心，藉事練心，隨處養心。
返回列表 上一主題