Adding UserForms

This page shows how you can easily add forms to your sheet. You may have seen the forms in the generic macros or some of the other files. I use the userforms to keep track of how long something is taking. I document how to use the userforms to do this in this page because I often forget how to do this.

Step 1: Insert Form and Lay out

Right click and go to the properties fro changing the colours etc.


Finishing with the buttons


When you just want to continue, use the userform1.hide

When you want to completely get out of the program use the END statement



This is how to show the time taken. The trick is to use bot the vbModeless and the DoEvents

    time7 = Time
    time_difference = (time7 - time1) * 60 * 60 * 24

    UserForm13.Label1 = " Link Colour - Max Cols " & max_col & " Max Rows " & max_row
    UserForm13.Label2 = " Start Time " & time6 & " End " & time2 & Chr(10) & Chr(10) & _
                        " Time Taken " & Format(time_difference, "##.00")
    UserForm13.Show vbModeless


The screenshot will remain until you close it.


    Unload UserForm13