2013-10-22 50 views
0

我已經創建了一個應用小計到工作表的宏。這一切都很好,但我一直無法添加一個邊界去跨小計行。使用條件格式我能夠突出顯示包含小計功能的單元格行。使用excel vba添加邊框到小計

是否可以爲VBA中的每個小計行添加邊框和顏色背景行?

+2

使用宏記錄看作爲源數據來自數據庫如何在VBA – sam092

+0

不可能的,因爲行的用於總結的數目而變化實現這一點。 – Andy5

+0

你只需要注意如何在代碼中完成格式化。你可以隨時更改目的地來應用格式 – sam092

回答

0

當然。對於邊界使用Border properties

例子:

With Rows(1).Borders(xlEdgeTop) 'Applies border settings to first row 
    .LineStyle = xlContinuous 
    .Weight = xlThin 
    .ColorIndex = xlAutomatic 
End With 

爲背景色,最簡單的,我認爲是使用ColorIndex property這樣的:

Rows(1).Interior.ColorIndex = 3 'Red background on first row 
+0

我知道關於邊框對象,它是如何讓它工作的每個小計行是我的問題 – Andy5

+0

所以你的問題是真的如何找到每個小計行?我不知道,我可能會遍歷行並查找包含「總計」值或公式存在的行。 – mattboy

1

使用.Find方法來尋找您小計任何功能。例如,如果您使用了COUNT,請查找單詞「count」。如果您使用了SUM,那麼查找單詞「total」。然後使用.offset方法計算實際總數的單元格數量,並使用邊框屬性添加邊框。例如,

With Worksheet.Range(c.address).Offset(0,2).Borders(xlEdgeTop) 
.Weight=xlMedium 
.Color=RGB(255,0,0) 
+0

多一點解釋會很好 - 也許會詳細介紹一下你的方法是如何工作的。例如,什麼是'c'?我可以想象這是有問題的單元,但你應該解釋一下。請記住,這個網站是針對那些在編碼方面很少經驗豐富的人以及那些有很多經驗的人。 –