your code is probably activating sheets ....without seeing the code, this is
a guess . however, there's usually no need to activate sheets when updating
data

so
worksheets("Sheet1").Activate
range("A1").Copy
worksheets("Sheet2").Activate
range("A1").Pastespecial xlallvalues

can be replaced by

worksheets("Sheet1").range("A1").Copy
worksheets("Sheet2").range("A1").Pastespecial xlallvalues





"Derek Dowle" wrote in message
...
Usually the code

Application.ScreenUpdating = False
and
Application.ScreenUpdating = True

switches off and then switches on screen updating successfully without any
problems.

'Private Sub Worksheet_Activate()' of a worksheet calls a macro in the
Modules.

This macro jumps between worksheets to gather information. The
ScreenUpdating keeps the screen focused on the activated worksheet whilst
the
macro is running. Whilst the macros is running the active screen
flickers.
The macro does everything else asked of it.

What is the code please to stop the screen from flickering.

Many thanks
--
Derek Dowle