VBA code to stop screen from flickering does not work

**joy_** · 11-05-2012, 11:58 AM

Hi there,

I have no clue why I can't use the "Application.ScreenUpdating = False/True" code on one of my macros. After I add them to the top and bottom of my macro code, the macro does not work anymore. In particular, the select function is removed and the macro is only left with the "ActiveWindow.SmallScroll Down:=-36".

Here is the macro that does NOT work with the addition of the screen updating code:

Please Login or Register  to view this content.

Here is a macro that worked perfectly alright with the addition of the screen updating code:

Please Login or Register  to view this content.

Please help!!!! THANKS SO MUCH!

Moderator's Edit: Use code tags when you post code. To do so (for future use), select your code and click on the # icon above.

**Moonie** · 11-05-2012, 01:48 PM

I'm still learning but this worked for me after testing:

Please Login or Register  to view this content.

**joy_** · 11-07-2012, 12:56 AM

Hey Moonie! Thanks for your comment. I tried your way of coding but it doesn't work )): The screen still flickers ): Any other advice from anyone else?

Thank you!!

**WasWodge** · 11-07-2012, 01:12 AM

The scrolldown doesn't serve any purpose.

Please Login or Register  to view this content.

(and being honest turning off the screenupdating won't make any difference if you are just selecting a cell)

**joy_** · 11-07-2012, 03:16 AM

Ohh. okay thanks anyway! It's just the the screen flickering makes things look rather unstable :/
It's a macro for a "Go to Top" button that is used repeatedly from different parts of the excel sheet, hence the need to select a cell at the end of the macro :/

**WasWodge** · 11-07-2012, 03:37 AM

It won't be the selecting of a single cell that is making the screen flicker, if you still have the flickering then really you should post the entire code.

**joy_** · 11-07-2012, 03:58 AM

Okay! This is my entire code without the screen updating code:

Sub GotoTop_Click()
ActiveWindow.SmallScroll Down:=-36
Range("C1").Select
End Sub

**WasWodge** · 11-07-2012, 05:15 AM

That is all the code is then it is literally just

Please Login or Register  to view this content.

**joy_** · 11-07-2012, 07:20 AM

OMG it works!!! Thanks so much WasWodge!

Sorry, I'm a VBA newbie >< Trying to complete a school project

**hawkdoc** · 11-12-2012, 11:30 AM

@Joy,
The reason the screen was "flickering" is because you were telling it to scroll down 36 lines BEFORE going directly to cell C1. Terminology is everything in programming.. :-)