Just Give It A Try!
Step 1: Insert an Userform
Step 2: Locate the SHOWMODAL Property of The Userform and make it FALSE
Step 3: Design the userform you as you are seeing in video or you can design your own. it's up to you.
Step 4: Inert a New Module and paste the following code into it.
Sub ()
UserForm2.Show vbModeless
End Sub
Step 5: Double Click on a button on the userform which will start the clock and paste the following code in it.
Private Sub CommandButton1_Click()
Do
DoEvents
UserForm2.Label1.Caption = VBA.Time
Loop
End Sub
Step 6: Paste the following code to close the Timer
Private Sub CommandButton2_Click()
Unload UserForm2
End Sub
Step 7: Put a Button on the Sheet and assign macro named as "Open_Timer"
and it's done! enjoy friend.
By Kamal Bharakhda
No comments:
Post a Comment