麻辣家族討論版版 » Excel程式區 » 請教Worksheet_SelectionChange ?

返回列表下一主題上一主題發帖

[發問] 請教Worksheet_SelectionChange ?

大學生 Rank: 4

帖子: 759
主題: 249
精華: 0
積分: 1021
點名: 0
作業系統: windows 11
軟體版本: OFFICE2021
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-9-29

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2015-12-15 08:42 | 只看該作者

[發問] 請教Worksheet_SelectionChange ?

是使用 Worksheet_SelectionChange 嗎???
請問下面的語法?
滑鼠停在某row ,則所在row 的A到P 變色 (Interior.ColorIndex=35)
滑鼠移走變回原來一樣
就是有一ROW的的A到P有色彩

樓主熱帖

收藏

高中生 Rank: 3 Rank: 3

帖子: 522
主題: 36
精華: 1
積分: 603
點名: 0
作業系統: win xp sp3
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2012-12-13
最後登錄: 2021-7-11

2^#

發表於 2015-12-15 14:58 | 只看該作者

應該是,
試試看:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1:P65536].Interior.ColorIndex = xlNone
Range("A" & Target.Row, "P" & Target.Row).Interior.ColorIndex = 35
End Sub

複製代碼

大學生 Rank: 4

帖子: 759
主題: 249
精華: 0
積分: 1021
點名: 0
作業系統: windows 11
軟體版本: OFFICE2021
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2024-9-29

3^#

發表於 2015-12-15 19:06 | 只看該作者

應該是,
試試看:
yen956 發表於 2015-12-15 14:58

謝謝可以用

靜思自在 : 口說一句好話，如口出蓮花；口說一句壞話如口吐毒蛇。

返回列表下一主題上一主題