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

.

Modeless

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")
    DoEvents
    UserForm13.Show vbModeless

.

The screenshot will remain until you close it.

.

    Unload UserForm13