View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
JLGWhiz[_2_] JLGWhiz[_2_] is offline
external usenet poster
 
Posts: 1,565
Default Display Current date

Hi Sam, Try UserForm_Initialize instead of UserForm_Activate.


"sam" wrote in message
...
Thanks for the help steve, I have used a textbox and similar code like
yours:

Private Sub UserForm_Activate()
Me.ReqDt.Value = Date
End Sub

But for some reason the textbox still doesnt display the system date when
i
launch the userform. This code is place at the top of my vb code for
userform. could it be an issue with where i put this code?

Thanks in Advance


"Steve Yandl" wrote:

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