Excel得到焦點變色

1.  點擊 Sheet 

2. 右鍵菜單  查看代碼

3. 複製以下代碼

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

On Error Resume Next

Cells.FormatConditions.Delete

With Target.EntireRow.FormatConditions

.Delete

.Add xlExpression, , "TRUE"

.Item(1).Interior.ColorIndex = 6

End With

End Sub

 

4. Excel-選項-信任中心-保存時從文件屬性中刪除我的信息