Animations for User Interfaces

How to create animations for user interfaces in Excel with VBA. Watch the video below:

Here’s the complete VBA code:

Sub test()

‘ test Macro
‘ Select 6 shapes

End Sub

Sub btnGO()
ActiveSheet.Shapes.Range(Array(“btnGO”)).Visible = False
ActiveSheet.Shapes.Range(Array(“ovalGo”)).Visible = True
ActiveSheet.Shapes.Range(Array(“rectGo”)).Visible = True
ActiveSheet.Shapes.Range(Array(“btnStop”)).Visible = True
ActiveSheet.Shapes.Range(Array(“ovalStop”)).Visible = False
ActiveSheet.Shapes.Range(Array(“rectStop”)).Visible = False

End Sub

Sub btnStop()
ActiveSheet.Shapes.Range(Array(“btnGO”)).Visible = True
ActiveSheet.Shapes.Range(Array(“ovalGo”)).Visible = False
ActiveSheet.Shapes.Range(Array(“rectGo”)).Visible = False
ActiveSheet.Shapes.Range(Array(“btnStop”)).Visible = False
ActiveSheet.Shapes.Range(Array(“ovalStop”)).Visible = True
ActiveSheet.Shapes.Range(Array(“rectStop”)).Visible = True

End Sub

Published by

Dinesh Kumar Takyar

Welcome to! My aim is to help you learn MS Excel including VBA. I always felt that a good way to learn something was to find solutions to problems in that domain. That is why I share these Excel videos with you. Mostly these are questions asked during my corporate training sessions. I've been training individuals and companies in computers since 1991. I did my B. Sc. (Vordiplom), M. Sc. (Diplom) and Ph.D. (Dr. rer. nat.) from Hamburg, Germany. The best thing about solving some of my visitor's questions is that I also gain new insights. For more Excel VBA solutions you may like to visit my YouTube channel: For a structured Excel VBA training course online you can visit:

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.