مهارات ستغير حياتك مع الاكسل

1- كود الساعة الرقمية
Sub digital_clock()
Range("b2").Value = Now
Application.OnTime Now + TimeValue("00:00:01"), "digital_clock"
End Sub
----------------------------------------------------
2- اسم الخط المستخدم للساعة الرقمية :
DigifacceWide
www.wfonts.com...