View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Harold Good Harold Good is offline
external usenet poster
 
Posts: 81
Default ScreenUpdating doesn't prevent updating screen on Worksheet_Calculate

Hi, I have the following code below. E30 is a formula on the Categories
worksheet that refers to the Budget worksheet. So when I make an entry
in Budget worksheet, it triggers this code. But, unfortunately, the
screen also updates and displays the Categories worksheet momentarily.
Very distracting for every budget entry.

I've put ScreenUpdating = false, but the ScreenUpdating happens before
it gets to that line.
Is there any way to prevent this happening?

Thanks,
Harold

Private Sub Worksheet_Calculate()
'this hides the message rows on Categories page if Budget Total is
greater than 1
Application.ScreenUpdating = False
Sheets("Categories").Unprotect Password:="xxx"
Application.EnableEvents = False
If Sheets("Categories").Range("E30").Value 1 Then
Sheets("Categories").Rows("32:33").EntireRow.Hidde n = False
Else
If Sheets("Categories").Range("E30").Value = 0 Then
Sheets("Categories").Rows("32:33").EntireRow.Hidde n = True
End If
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
Sheets("Categories").Protect Password:="xxx"
End Sub