mình có đoạn code tạo đồng hồ số như sau
mình muốn viết tiếng việt lên code này
(code này sẽ hoặc load từ 1 ô nào đó nhưng không biết cách làm
các cao thủ giúap đỡ dùm
Mã:
'dongho so cho du toan
Private Const Mycompany = " Du toan Pro 2011 "
Sub Ontimer()
Application.OnTime Now + TimeValue("00:00:01"), "ProTimer"
End Sub
Private Sub ProTimer()
'Application.Caption = Format(Now() - 1, "dddd ,dd/mm/yyyy hh:mm:ss") & Mycompany
Application.Caption = Format(Now(), "dddd ,dd/mm/yyyy hh:mm:ss") & Mycompany
'& Format(Now() - 1, "dddd, mm, dd,yyyy")
Ontimer
End Sub
Mã:
Private Const Mycompany = " Du toan Pro 2011 "
các cao thủ giúap đỡ dùm