VBA to make the date and time continue to update

Hi,
I have a label that displays the date using the = now code

Me.lblDateIns = Now

When I open the form the date and time is correct, but it doesn't update while the form is open. Is there a way to make the date and time always correct while the form is open.

hmm,

This code runs the macro TextTime every second.
TextTime writes the time into Label1.

Sub Macro1()

Application.OnTime Now + TimeValue("00:00:01"), "TextTime"
UserForm1.Show

End Sub

Sub TextTime()
UserForm1.Controls("Label1").Value = Now
Application.OnTime Now + TimeValue("00:00:01"), "TextTime"
End Sub