推 work901125:沒錯，太強了，馬上來研究語法，感謝^^ 04/10 11:46
※ 編輯: soyoso (118.171.122.26 臺灣), 10/16/2020 08:31:15
下方寫於Workbook_SheetSelectionChange觸發事件內
=========================================
Dim r As Range, c As Range
Dim rc As Range
Set r = ActiveCell.EntireRow
Set c = ActiveCell.EntireColumn
Set rc = Application.Union(r, c)
rc.Activate
Target.Activate
=========================================
※ 引述《work901125 (※米蟲※)》之銘言：
: 軟體:
: MS OFFICE EXCEL
: 版本:
: 2003
: 問題：
: 我承認標題下的很怪XD
: 因為要找資料的關係
: 假如說我滑鼠選擇C4，則C列整列及第4欄整欄就被反白選取
: 看起來變成一個十字架，有這功能嗎?
: 我現在是C列整列選擇→變色→第四欄整欄選擇→變色→下一筆
: 但是太麻煩/慢了。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.39.165.177