返回列表 上一主題 發帖

該怎麼做到才能使選取欄位的那一整行變色?

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1447 
主題
40 
精華
0 
積分
1471 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2025-5-5 
1# 跳轉到 »
發表於 2024-1-31 19:29 | 顯示全部帖子
本帖最後由 Andy2483 於 2024-1-31 19:33 編輯

回復 1# coafort


    謝謝前輩發表此主題
請先參考以下連結帖
https://forum.twbts.com/viewthre ... ht=COWWW&page=1
或是再說明用途情境/上傳範例
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1447 
主題
40 
精華
0 
積分
1471 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2025-5-5 
2#
發表於 2024-2-1 13:51 | 顯示全部帖子
回復 3# coafort


    謝謝前輩回復
以下是單純選取格的整欄底色變黃色的情境,請前輩參考
游標選取[E9]執行結果:


工作表模組下植入:
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
   Me.UsedRange.EntireColumn.Interior.ColorIndex = xlNone
   '↑令本表使用格的整欄底色為無色
   .EntireColumn.Interior.ColorIndex = 6
   '↑令選取格的整欄底色為黃色
End With
End Sub
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

        靜思自在 : 每天無所事事，是人生的消費者，積極、有用才是人生的創造者。
返回列表 上一主題