返回列表 上一主題 發帖

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

本帖最後由 Andy2483 於 2024-1-31 19:33 編輯

回復 1# coafort


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

TOP

回復 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

        靜思自在 : 要比誰更受誰.不要比誰更怕誰。
返回列表 上一主題