Excel單元格定位橫豎變色

1、在需要設置此功能的工作簿界面，按下Alt F11鍵，打開VBA編程界面，雙擊sheet，輸入如下代碼：

 

 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells.Interior.ColorIndex = xlNone

Target.EntireRow.Interior.ColorIndex = 24

Target.EntireColumn.Interior.ColorIndex = 24

End Sub

2、保存后關閉編程界面，回到工作簿，效果實現。