日日操夜夜添-日日操影院-日日草夜夜操-日日干干-精品一区二区三区波多野结衣-精品一区二区三区高清免费不卡

公告:魔扣目錄網為廣大站長提供免費收錄網站服務,提交前請做好本站友鏈:【 網站目錄:http://www.ylptlb.cn 】, 免友鏈快審服務(50元/站),

點擊這里在線咨詢客服
新站提交
  • 網站:51998
  • 待審:31
  • 小程序:12
  • 文章:1030137
  • 會員:747

文章介紹excel選中行變色的效果以及實現選中行變色的VBA代碼。

  在excel中如果行數過多,經常核對數據的準確性,容易錯行跳行,所以才有本文的小技巧:excel選中行變色。

  當我們在excel工作表中,鼠標隨便選擇某一行的某一個單元格,那么選中行變色。

  下面是excel選中行變色的動畫效果展示:

  excel選中行變色的操作步驟如下:

  在工作表名稱上單擊右鍵,比如"Sheet1"工作表,選擇“查看代碼”,復制下面的代碼,然后關閉VBE編輯器,回到excel工作表測試效果,任意單擊一個單元格,相應的選中行將變色。

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error Resume Next
Cells.FormatConditions.Delete
With Target.EntireRow.FormatConditions
.Delete
.Add xlExpression, , "TRUE"
.Item(1).Interior.ColorIndex = 7
End With
End Sub

  上面這段代碼嚴謹之處在于,如果單元格本身填充了顏色,以前的顏色不會消去。

  下面這段代碼依然可以實現選中行變色,但是如果單元格自身填充了顏色,當鼠標選擇整行后,以前的填充色將會被自動消去。而且不支持多選,比如選擇幾行,變色的仍然只有一行。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Rows.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 7
End Sub

分享到:
標簽:代碼 單元格 變色 選中 Word2013教程
用戶無頭像

網友整理

注冊時間:

網站:5 個   小程序:0 個  文章:12 篇

  • 51998

    網站

  • 12

    小程序

  • 1030137

    文章

  • 747

    會員

趕快注冊賬號,推廣您的網站吧!
最新入駐小程序

數獨大挑戰2018-06-03

數獨一種數學游戲,玩家需要根據9

答題星2018-06-03

您可以通過答題星輕松地創建試卷

全階人生考試2018-06-03

各種考試題,題庫,初中,高中,大學四六

運動步數有氧達人2018-06-03

記錄運動步數,積累氧氣值。還可偷

每日養生app2018-06-03

每日養生,天天健康

體育訓練成績評定2018-06-03

通用課目體育訓練成績評定