Application.ScreenUpdating 問題
- 帖子
- 163
- 主題
- 45
- 精華
- 0
- 積分
- 246
- 點名
- 1
- 作業系統
- win7
- 軟體版本
- ie
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2015-7-8
- 最後登錄
- 2025-3-8
|
Application.ScreenUpdating 問題
各位師兄:
請問以下的程式有什麼問題?? 我次移動滑鼠, 螢幕都會還會在跳?? 謝謝
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
With Range("a1048576")
If Range("a1048576") = "198635" Then
Columns("L").EntireColumn.Hidden = False
Else
Columns("L").EntireColumn.Hidden = True
End If
End With
Application.ScreenUpdating = True
End Sub |
|
|
|
|
|
|
|
發表於 2017-9-28 18:25
| 
