excel醒目閱讀設置（Excel的十字閱讀模式）

2023-04-21 04:46:45 2

Sub 十字閱讀模式(c As Range)

Cells.Interior.Color = xlNone '全部單元格為無顏色

c.EntireRow.Interior.Color = vbYellow '橫為黃色

c.EntireColumn.Interior.Color = vbRed '列為紅色

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

'十字閱讀模式,這是表格觸發事件，必須寫在裡面

Call 模塊1.十字閱讀模式(Target)

End Sub