Excel VBA :單元格背景設定方法介紹，程式設計進階必經之路

2021-06-15 10:22:14

No.1

Excel表格製作過程中，需要對錶格進行一個美觀修飾，這樣就提高了工作表的格局，一個漂亮的工作表，不僅體現了公司的辦公技術階層，更是對外宣傳的一個最直接門戶。

本節介紹，如何設定單元格以及圖形控制項類的背景顏色和背景圖案。

首先，看上圖，我們會用到圖中的一個物件：Interior

此物件可使用單元格的Range.Iterior返回。

如：Range("A1").Interior

就表示返回A1單元格的內部物件，接下來對它進行屬性設定，就會改變A1單元格的內部格式。

Interior屬性有如下幾種：

利用上述屬性可以設定單元格內部顏色，填充圖案，和填充顏色以及顏色的明暗度等等。

下面有一個示例來具體看一下，設定不同屬性值帶來的變化。

No.2

程式碼

設定單元格Interior屬性

Private Sub CommandButton1_Click()Dim cell As RangeSet cell = ActiveSheet.Rows(3)With cell.Interior.Color = QBColor(11) '背景顏色.TintAndShade = 0.5 '灰度值.Pattern = xlPatternChecker '填充圖案.PatternColor = 15 '填充圖案顏色End WithEnd Sub

滾動條改變背景灰度

Private Sub ScrollBar1_Change()Dim xV As DoublexV = Me.ScrollBar1.Value / 10Me.TextBox1.Value = xVsetBackColor xV'呼叫函數End Sub

設定背景顏色和灰度函數

Private Sub setBackColor(xV As Double)Dim cell As RangeSet cell = ActiveSheet.CellsWith cell.Interior.Color = QBColor(12).TintAndShade = xVEnd WithEnd Sub

Interor物件對於VBA程式設計十分有用，其屬性也不多，屬於比較容易掌握的一類物件，所以，在工作當中，可以多學習此類屬性應用。

歡迎關注、收藏

---END---

Excel VBA :單元格背景設定方法介紹，程式設計進階必經之路

熱門文章