İsmail Küçükşengün
Özel Üye
- Katılım
- 31 Ağustos 2005
- Mesajlar
- 1,534
- Excel Vers. ve Dili
- Excel 2003 - Türkçe
Merhabalar;
Private Sub UserForm_Activate()
On Error Resume Next
Do
Label1 = Format(Now, "dd.mm.yyyy hh:mm:ss")
DoEvents
Loop
End Sub
Kodu ile userforma tarih : 12.05.2006 09:51:30 olarak görünüyor.
Bunu günü de göstermesi için ( 12.05.2006 Cuma 09.51:30) olarak
görünmesi için ne gibi bir ilave gerekir.
Teşekkürler....
Private Sub UserForm_Activate()
On Error Resume Next
Do
Label1 = Format(Now, "dd.mm.yyyy hh:mm:ss")
DoEvents
Loop
End Sub
Kodu ile userforma tarih : 12.05.2006 09:51:30 olarak görünüyor.
Bunu günü de göstermesi için ( 12.05.2006 Cuma 09.51:30) olarak
görünmesi için ne gibi bir ilave gerekir.
Teşekkürler....