كيفية إنشاء وتصميم ساعة رقمية ديجيتال بأبسط الطرق على الإكسل في قناة أبو راشد إكسل Abo Rashed Excel
ฝัง
- เผยแพร่เมื่อ 20 ต.ค. 2024
- كيفية إنشاء وتصميم ساعة رقمية ديجيتال بأبسط الطرق على الإكسل في قناة أبو راشد إكسل Abo Rashed Excel
تمت بالبساطة والسهولة ودون تعقيدات بأكواد VB Excel وإليكم الأكواد المستخدمة :
Private Sub Com_Click()
If Com.Caption = "تشغيل" Then
Com.Caption = "إيقاف"
Else
Com.Caption = "تشغيل"
End If
Do
For i = 1 To 50000000: Next i
DoEvents
sht.Range("b2").Value = Time
Loop Until Com.Caption = "تشغيل"
End Sub
حيث أن Com اسم المفتاح .
sht اسم الشيت
b2 اسم الخلية التي فيها الساعة .
ماشاء الله تبارك الرحمن بالتوفيق ، شغل جميل جدا ❤❤
جزاك الله خيرا
جزاك الله خيرا
وانت بخير وسعادة
ما شاء الله الله يحفظك يا رب كنت بتمنى تخلي تسيب الكود عشان الناس تستفاد منه
الكود بالفيديو