I prefer using a label if I don't want users to be able to edit. For
example, if I create an appropriately sized Label1 inside UserForm1, then
this would do what you want.

'---------------------------------
Private Sub UserForm_Activate()
Label1.Caption = "Today is " & FormatDateTime(Date, vbLongDate)
End Sub

'--------------------------------

Steve Yandl




"sam" wrote in message
...
Hi All, How can I display current system date on my excel userform in one
of
the fields? Foe eg, lets say I have a Date Field on my userform, I want it
to
display current system date everytime Anyone opens the userform, also it
shouldnt be editable by the users, but just visible.

Thanks in Advance