Try

Application.screenupdating = false

your code

Application.screenupdating=true

Mike

Try this:

Application.ScreenUpdating = FALSE
....run your code....
Application.ScreenUpdating = TRUE

If the process may take a while, consider using the Status Bar to display
progress:
Application.StatusBar = "Processing sheet 3 of 12"

Return it to the default behavior with:
Application.StatusBar = FALSE

Does that help?
--------------------------

Regards,

Ron (XL2003, Win XP)
Microsoft MVP (Excel)

at the top of the macro put in

Application.ScreenUpdating = False

at the end of the macro

Application.ScreenUpdating = true

if you really want a splash screen:
http://www.j-walk.com/ss/excel/tips/tip39.htm

maybe combined with

http://www.j-walk.com/ss/excel/tips/tip34.htm

If your code has command like

worksheets("Sheet1").Activate
range("A1").Select
selection.Copy
worksheets("Summary").activate
Range("B9").Select
Activesheet.Paste

that could be done with

worksheets("Sheet1").Range("A1").copy Worksheets("Summary").Range("B9")

or if you only need the contents of the cell and not the formatting

Worksheets("Summary").Range("B9").Value =  _
  worksheets("Sheet1").Range("A1").Value

These types of commands are silent.  IF Summary was the activesheet and
range B9 was in view, you would see its value change, but if some other sheet
was active, you would see very little.