Flickering

[uk747]

I have 2 different excel workbooks when the second one is open and i start entering data in book 1 it flickers whenever i enter anything.

I do have macros on both. In Book 1 a couple of the macros are long and did flicker so I entered

Application.ScreenUpdating = False at the top of the macro


Application.ScreenUpdating = True at the bottom of the macro

that solved the problem on book 1, however when i now open Book 2 and enter stuff in Book 1 it flickers again

Is there a away to use something similar below to cover the whole book to stop it flickering

Application.ScreenUpdating = False


Application.ScreenUpdating = True

 

[wigi]

Hello

Welcome to MrExcel.

- Are you trying to work when at the same time a macro is running?

- What kind of macros do you have? Events like Worksheet_Change and others?

 

[uk747]

the 1st tab of the affected worksheet when I view code

I have :- (not sure where thats from actually or what it does)

Most of the macros are just recorded instructions which I did

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

 

[wigi]

So you have Worksheet_SelectionChange events? Are they coded correctly and in an optimized way?

 

[uk747]

So you have Worksheet_SelectionChange events? Are they coded correctly and in an optimized way?

Not sure what you mean???

 

[wigi]

What is the code in these selection change events?

 

[uk747]

What is the code in these selection change events?

there isnt any, when i right click on the tab then view code at the top it i

worksheet Selection Change

then underneath

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

How do i delete the above, i tried higlighting then deleting but when i reopen it it still appears

 

[wigi]

Delete that stuff, save your file, close it and reopen again.

Is it still there?

 

[uk747]

In Fact when i go into VBA Project for the excel workbook and double clikc on any of the woksheets, the below appears on every sheet.

Whats the easiet way to get rid of because Im not sure what it does and doesnt contain any code betwwen Private Sub and end sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub

 

[wigi]

Select all those codes and delete them ! (as long as there's no code between line 1 and line 2 - the End Sub).