2014-10-10 21 views
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 

感謝

回答

1

If Target.Row > 2 Then

這是什麼意思?

+0

正是!非常感謝,只是無法得到它......正在使用'如果ROW> 2'......完全忘記了目標! – SMORF 2014-10-10 15:12:51

+0

請標記爲幫助未來訪客的答案! – 2014-10-10 15:13:55

相關問題