国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

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

2024-08-23 19:53:34
字體:
供稿:網(wǎng)友

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

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

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

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

  這得使用VBA代碼來完成,方法如下:

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

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

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

  ②在小窗口中的上面,左邊選擇Worksheet名稱,右邊選擇SelectionChange事件。下面就可以在其內(nèi)部輸入代碼了,代碼如下:

  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窗口并關(guān)閉,回到Excel窗口,效果就出來了。

  知識擴(kuò)展:

  部分代碼解釋:

  Columns().Interior.ColorIndex = 0

  x = ActiveCell.Column

  Columns(x).Interior.ColorIndex = 13

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

  y = ActiveCell.Row

  Rows(y).Interior.ColorIndex = 13

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


發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 九龙坡区| 常山县| 沙坪坝区| 荃湾区| 临江市| 盘锦市| 平凉市| 三江| 游戏| 兴化市| 长垣县| 昆明市| 甘谷县| 连平县| 西乡县| 温宿县| 大渡口区| 迁安市| 田东县| 武冈市| 和龙市| 红安县| 右玉县| 麻栗坡县| 佛山市| 屏边| 临城县| 蚌埠市| 鸡东县| 文成县| 宁远县| 山阳县| 印江| 固始县| 克东县| 玛多县| 安陆市| 二连浩特市| 东城区| 安西县| 托里县|