Quick Steps

Flashbar documentation

2 Simple Steps to start working

  1. Start a Project from scratch using the Flashbar Workbook that you purchased or Export the Flashbar.BAS UserForm and the Flashbar.cls from the Flashbar Workbook and then Import these Files back into your own Project. The Flashbar is created dynamically and requires no additional Images or Shape Objects. To add the Class from scratch, perform the following. Insert a new Class Module into your Project. Name the Class Flashbar and then Copy & Paste in all of the Code for the Class Module from the Downloaded Flashbar.xlsm Workbook
  2. Call the NormalFlashbar() or ProgressFlashbar() Subroutines with your required parameters to run Flashbar - see the examples that come with Flashbar.xlsm

Acknowledgement

Flashbar was written by Mark Kubiszyn based upon a HTML5 CodePen by Stas Melnikov

  • the latest version is version 1
  • as per terms of the Software License, you should leave the following code attribution in situ

' © Copyright/Author:
' Mark Kubiszyn 2012-2017. All Rights Reserved
' Website/Follow:
' http://www.kubiszyn.co.uk/
' https://www.facebook.com/Kubiszyn.co.uk/
						

Purchase

You can Purchase Flashbar for £2.99 via FastSpring by clicking here

Configuration

Configuring the Flashbar is straightforward. Here is the Code to Initialise and Render a Red Flashbar animation with a Height of 3 in a Normal bar style, that fits the full width of the Worksheet:

 Public Bar As Flashbar
 Public intInterval As Integer

 Public Sub NormalFlashbar()

    If BarStep > Step Then Exit Sub

    Set Bar = New Flashbar

    Bar.Colour = rgbRed
    
    Bar.Height = 3

    Bar.Render

 End Sub
						
And here is the Code to Initialise and Render a Black Flashbar animation with a Height of 3 in a Progress bar style, that fits the full width of the Worksheet:

 Public Bar As Flashbar
 Public intInterval As Integer

 Public Sub ProgressFlashbar()

    If BarStep > Step Then Exit Sub

    Set Bar = New Flashbar

    Bar.Colour = RGB(0, 0, 0)
    
    Bar.Height = 3

    Bar.BarType = Progress

    Bar.Render

 End Sub
						

Other Settings

Other settings include rendering the Flashbar in a Pane if you use the Freeze Panes option in Excel and setting the Bar width, so for example you could display a Flashbar in the second Pane with a width of 60. To make the Flashbar Modal (ie. stop user interaction while the Flashbar is running) you can also set the Modal property to True):


 Public Sub ProgressFlashbar()

    Bar.PaneIndex = 2

    Bar.Width = 60

    Bar.Modal = True

 End Sub
						
Due to the fact that the Callback Subroutine must reside in a normal Code Module, I have added also added some editable settings at the top of the 'mdlFlashbar' Code Module that you can tweak. These include the Step (overall Speed of the Flashbar), the FadeStep (determines how quickly the Fade is applied to the Flashbar), the ProgressStep (used only for the Progress Style to increment the Bar Width as the Bar is rendered) and some Enum Colours to use for the Flashbar Bar Colour. Here are the settings:


' // the one and only Flashbar Class Object
Public Bar As Flashbar

' // used internally [do not edit]
Public BarStep As Integer

' // editable settings
'    Step.  1 is slowest.  default:=1
Private Const Step As Integer = 1

'    FadeStep.  tweak how the Flashbar fades out.  default:=25
Private Const FadeStep As Integer = 25

'    ProgressStep.  used only by a Progress style bar for the bar increment steps.  default:=150
Private Const ProgressStep As Integer = 150

' // Colour Enums
Private Enum RGBLongColour
    ' // default Flashbar Colours
    rgbBlack = 0
    rgbRed = 6184410
    rgbGreen = 4616993
End Enum
						

Screen Shots

The 'Normal' Flashbar in Red (creates a thin bar that goes from left to right at the top of the Worksheet until it fills up the entire Width, before dissapearing):

Flashbar - Normal

The 'Progress' Flashbar in Black (creates a thin bar that builds from left to right in stpes at the top of the Worksheet until it fills up the entire Width, before dissapearing):

Flashbar - Progress

Videos

Flashbar Demo:

Support

Support is only given to Purchased Software. You should only contact me on the Support Email address supplied by FastSpring - please provide proof of purchase ie. Email address or Order Reference

Changelog

16.10.2016 - Version 1 released