Application.Screenupdating=False when "Find&Replace" is used

**FallingDown** · 03-02-2012, 11:25 AM

Hi all

is there any way to set to Application.Screenupdating=False when a user uses "Find&Replace"?
Obivously it should set it back to true once all values have been replaced.

Thanks so much!
FD

**Domski** · 03-02-2012, 11:43 AM

Do you mean manually or within VBA?

Dom

**FallingDown** · 03-02-2012, 12:05 PM

Hi Dom

Either or
But I guess VBA would be better

Thx

**FallingDown** · 03-05-2012, 11:44 AM

Hi all

Any solution to this available?
Thx

**Domski** · 03-05-2012, 11:48 AM

Like this:

Sub Example()

    On Error GoTo ErrorHandler
    Application.ScreenUpdating = False

    ' find/replace code

CleanExit:
    Application.ScreenUpdating = True
    Exit Sub

ErrorHandler:
    MsgBox Err & " - " & Err.Description
    Resume CleanExit

End Sub

Dom