0
是否有人知道如何將以下內容應用於除前兩行之外的工作表?將Application.ScreenUpdating應用到除第一行以外的所有工作表中
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
Cells.Interior.ColorIndex = 0
Target.Interior.ColorIndex = 23
Cells.Font.ColorIndex = 0
Target.Font.ColorIndex = 2
Cells.Font.Bold = False
Target.Font.Bold = True
Application.ScreenUpdating = True
End Sub
感謝
正是!非常感謝,只是無法得到它......正在使用'如果ROW> 2'......完全忘記了目標! – SMORF 2014-10-10 15:12:51
請標記爲幫助未來訪客的答案! – 2014-10-10 15:13:55