اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

برمجة زرين احداهما لزيادة التاريخ يوم واحد والآخر لإنقاص التاريخ ايضا يوم واحد


Alaaq3
إذهب إلى أفضل إجابة Solved by أ / محمد صالح,

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته : الاخوة الاعزاء : اريد  برمجة زرين احداهما كلما اضغط عليه يقوم بزيادة التاريخ يوم واحد والآخر بالاعكس . ارجو تعديل النموذج المرفق

XXXX.PNG

تاريخ اليوم.xlsm

رابط هذا التعليق
شارك

  • أفضل إجابة

يمكنك استعمال هذا الكود

Private Sub CommandButton1_Click()
TextBox1.Value = Format(DateAdd("d", -1, CDate(TextBox1.Value)), "YYYY/MM/DD")
End Sub

Private Sub CommandButton2_Click()
TextBox1.Value = Format(DateAdd("d", 1, CDate(TextBox1.Value)), "YYYY/MM/DD")
End Sub

بالتوفيق 

  • Like 2
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information