حاولت ان احذف التاريخ من الوقت

[MGS]

السلام عليكم

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

لماذا لا يتم التعامل مع هذه التوقيتات مع انى حاولت ان احذف التاريخ من الوقت ولكن ذلك يتم يدويا هل من معادله او كود لحذف التاريخ حتى يصبح التعامل مع الوقت ممكانا وذلك لكثره التوقيتات او التعامل معها بنفس الشكل

time.rar

[هشام شلبى]

السلام عليكم

=======

إذا كنت تقصد تغيير صيغة التاريخ فاليك هذا الشرح لتغيير الصيغة

hh.rar

[MGS]

اخى الفاضل شكرا لردك ولكن ليس الصيغه لو قمت بالنظر الى الخانه الخاصه ب shift سوف تلاحظ وجود معادله وهى تبين نوع فتره العمل ولا تعمل هذه المعادله مع الوقت والتاريخ ولكن لو وضعت الوقت فقط ستعمل المعادله لذا كنت اود ازاله التاريخ من الوقت من البيانات الموجوده فى خانه time لو اكمن ذلك بطريقه برمجيه او معادله مع العلم اننى استخدمت داله mid لقطع الوقت فقط ولم يصلح الأمر

[MGS]

قمت بتسجيل ماكرو لحذف التاريخ من الوقت

Sub time()

'

'

' time Macro

'

Range("A2").Select

ActiveCell.FormulaR1C1 = "1/0/1900 5:37:04 PM"

Range("A3").Select

ActiveCell.FormulaR1C1 = "1/0/1900 5:37:04 PM"

Range("A4").Select

ActiveCell.FormulaR1C1 = "1/0/1900 5:37:04 PM"

Range("A5").Select

ActiveCell.FormulaR1C1 = "1/0/1900 5:37:04 PM"

Range("A6").Select

ActiveCell.FormulaR1C1 = "1/0/1900 5:37:05 PM"

Range("A7").Select

End Sub

هل يمكن التعديل بحيث يحذف التاريخ ولكن لا يرتبط بوقت معين بمعنى عند وجود اى بيانات داخل هذه الخلايا يقوم بحذف التاريخ دون التقيد بالوقت

ارجو وجود حل

[عبدالله المجرب]

اخي الفاضل

بعد اذن الاستاذ هشام

جرب الاتي

• ضع هذه المعادلة في الخلية E2 ثم اسحبها للاسفل
  
  

  
  =DATE(YEAR(A2);MONTH(A2);DAY(A2))
  
  

  • ضع هذه المعادلة في الخلية C2 وبدل المعادلة الموجودة مسبقاً واسحبها للاسفل

 

 =IF(AND(A2>=E2+TIME(8;30;0);A2<=E2+TIME(16;29;0));"1SH";IF(AND(A2>=E2+TIME(16;30;0);A2<=E2+TIME(23;29;0));"2SH";IF(OR(AND(A2>=E2+TIME(23;30;0);A2<=E2+TIME(23;59;59));AND(A2>=E2+TIME(0;0;0);A2<=E2+TIME(8;29;0)));"3SH";"")))

[عبدالله المجرب]

لن تحتاج الى حذف التاريخ

جرب المعادلة وشاهد النتيجة

ابواحمد

[MGS]

والله عباقره زادكم الله من فضله وعلمه كل يوم الواحد بتعلم منكوا جديد والله الواحد مبسوط كتير بهذا المنتدى بارك الله فيكم

( هل يمكن شرح مبسط للمعادله )

[عبدالله المجرب]

اخي الفاضل

الفكرة في ان المعادلة السابقة كانت تشترط صغر قيمة الخلية اوكبرها عن وقت محدد مكتوب في المعادلة ولهذا حدث خلل عند كتابة التاريخ في الخلية فتم إضافة التاريخ الى الشرط

ابواحمد

[احمدزمان]

السلام عليكم

بعد الشكر للأستاذ ابو احمد

حل آخر لعله يفيد

كما عمل الأخ عيدالله مع فرق بسيط هو اضاف التاريخ الى قيمة الساعات

انا استخرجت قيمة الساعات بدون اي يوم بالدالة Time وعدلت دالتك للرموز بحيث تحسب من العمود E بدل العمود A

=TIME(HOUR(A2);MINUTE(A2);0)

المرفق

time.rar