讓Excel活動單元格所在行和列都著上背景顏色的VBA代碼

　　在Excel中，為了增強活動單元格的對比性，有時候我們常常需要修改其背景顏色、字體、字號等，用來區分和其它單元格的對比!

　　本教程，讓我們一起來學習，如何讓Excel活動單元格所在行和列都著上背景顏色，首先看下圖。

　　上圖中，即C3單元格，被鼠標選中，說明是活動的單元格，如何做才能做到如上圖的效果，C3活動單元格所在的行和列，其背景顏色都著上顏色，這樣可以方便我們觀察單元格，正確的錄入數據。

　　這得使用VBA代碼來完成，方法如下：

　　首先在Excel窗口中，按下鍵盤上的組合鍵：Alt + F11

　　這個時候，會彈出VBA窗口。

　　①右鍵點擊左邊列表中的 Sheet1 並選中查看代碼。這樣就會彈出一小個VBA輸入窗口。

　　②在小窗口中的上面，左邊選擇Worksheet名稱，右邊選擇SelectionChange事件。下面就可以在其內部輸入代碼了，代碼如下：

　　Private Sub Worksheet_SelectionChange(ByVal Target As Range)

　　Columns().Interior.ColorIndex = 0

　　x = ActiveCell.Column

　　Columns(x).Interior.ColorIndex = 13

　　y = ActiveCell.Row

　　Rows(y).Interior.ColorIndex = 13

　　End Sub

　　最後，保存VBA窗口並關閉，回到Excel窗口，效果就出來了。

　　知識擴展：

　　部分代碼解釋：

　　Columns().Interior.ColorIndex = 0

　　x = ActiveCell.Column

　　Columns(x).Interior.ColorIndex = 13

　　如上代碼的功能，是讓活動單元格所在列著上背景顏色的代碼。

　　y = ActiveCell.Row

　　Rows(y).Interior.ColorIndex = 13

　　如上代碼的功能，是讓活動單元格所在行著上背景顏色的代碼。