View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Pa Maher Pa Maher is offline
external usenet poster
 
Posts: 17
Default Flickering screen while processing macro

Tom I'm working on a new project.
In this case I want to copy the format.
When I use
worksheets("Sheet1").Range("A1").copy Worksheets("Summary").Range("B9")
the text is copied but the green fill and bold text is not

"Tom Ogilvy" wrote:

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.

--
Regards,
Tom Ogilvy

"Pa Maher" wrote:

Based on input from the User, a macro takes data from several worksheets and
inputs the data to a form which then is further updated by the user. The
screen flickers as the program copies and pastes data.

Is there some way to mask the flicker by using a "splash screen" (if I am
using the term properly), which would disappear when the update is completed?

The displayed message would read:
"Please wait while CAIS is being created" and also include a creation
graphic that I have.

Thanks in advance!