طلب مساعدة في كيفية تثبيت دالة ( التاريخ )

[عماني عماني]

الأفاضل / الاعضاء المحترمين 

السلام عليكم جميعا بمختلف أسمائكم الكرام 

 

عندي مشكلة في كتابة التاريخ 

عملت =IF(A4>1;TODAY();"")

 

أمس كان تاريخ 15 / 8/ 2023 وكان جيد

 

اليوم تفاجأت وانا أسجل بتاريخ 16 / 8 / 2023 أن تسجيل أمس تحول إلى تاريح اليوم 16 / 8 / 2023

 

مرفق لكم الصور 

 

تكرما أفيدونا أفادكم الله 

[محي الدين ابو البشر]

عليكم السلام

ضع هذا الكود في حدث الصفحة (Sheets Code)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("C:C")) Is Nothing Then
        With Target: .Value = .Value: End With
    End If
End Sub

 

[عماني عماني]

تكرما باللغة العربية اشرح لي أني مبتدأ في الاكسل 

 

أكتب لي المعادلة أو الدالة 

يتغيير التاريخ كل يوم 

معي مشكلة في التقيم 

[محي الدين ابو البشر]

عزيزي

أضغط بالزر اليميني للماوس على اسم الوقة التي تعمل علها ثم اضغط بالزر اليساري للماوس على (View Code) 

يفتح نافذة جديدة قم بلصق الكود فيها ببساطة

 

 

أغلق النافذة الجديدة ث اذهب إلى ورقة العمل التي تعمل عليها وفي العمود C  اكتب ()Today واضغط أنتر

سوف يتم الأمر

[عماني عماني]

اليوم كتب لي التاريخ كل الجدول 17 / 8 / 2023 

وانا كاتب الجدول يوم 15 / 8 / 2023

بحاول اعمال شكرا لك 

 

[محي الدين ابو البشر]

المفروض أن تبدأ من جديد

 

[عماني عماني]

عزيزي ما عرفت أعمله 

 

هل ممكن تعمل لي   

 

مرفقلكم 

تجديد حركة السير.xlsm

[محي الدين ابو البشر]

1-تجديد حركة السير.xlsm

[عماني عماني]

أحسنت عزيزي 

عزيزي محي الدين   المحترم 

بعده نفس المشكلة

سجل اليوم 4/ 9 / 2023

غدا أراه متغير إلى 5 / 9 / 2023

كنت استخدم هذه المعادلة سنه الماضية ولكن الحين لم تفلح

=IF(A4<>"";IF(E4="";NOW();E4);"")

أخبرني وعلمني جزاك الله خيرا 

مرفق لكم جدول الاكسل 

تجديد 2024.xlsm

[احمد عبدالحليم]

اخى الفاضل  بناءا على ما فهمته من املف المرفق

فى الاعمدة الخاصة بالتاريخ ما فائدة ان تكتب المعادلة  NOW() او المعادلة  TODAY() 
استخدام هذه المعادلات دائما سيتكتب تاريخ اليوم متجاهلا التاريخ السابق اليوم سوف تظهر النتيجة 4-9-2023

وعند فتح الملف ان شاء الله غدا سوف ياخذ تاريخ اليوم والتاريخ فى الملف كله سوف يكون 5-9-2023 والحل من وجهة نظرى اكتب التاريخ يدويا لا داعى لاستخدام كلا المعادلتين 

[عماني عماني]

لكن بالسابق كنت بمجرد أدخل رقم السيارة 

يكتب لي مباشرة اسم السيارة وتاريخ التسجيل وكذلك الوقت 

 

بس أحد الموظفين عمل شيء ومسح البرمجة ومنها لم استطع أرجاعها 

وفي اليوم الثاني نواصل التسجيل بدون ما يتعدل التاريخ 

 

هل يوجد معادلات أخرى  بنفس المضمون بحثي 

[أ / محمد صالح]

أخي الكريم @عماني عماني

كنت قد شرجت قبل ذلك هذا الأمر في منتدانا الكبير أوفيسنا 

وأبسط الحلول بالمعادلات وليس بالكود

* أن تمسح بيانات العمود A والعمود J

* وتضبط خيارات الإكسل إلى تفعيل خاصية الحساب التكراري iterative calculation

File - options - formula

* تستعمل هذه المعادلة في C4

ويتم نسخها إلى  D4 & E4 وكذلك إلى L4 & M4 & N4 مع تغيير A4 إلى J4

=IF($A4="","",IF(C4<>"",C4,NOW()))

* تغيير تنسيق الخلية في اليوم إلى dddd وفي الوقت إلى hh:mm:ss

بالتوفيق

[محمد يوسف ابو يوسف]

السلام عليكم ورحمة الله وبركاتة 

بعد اذن اساتذتي واحبابي في الله

اخي عماني عماني

تفضل ما طلبت بالكود 

طلبك الاولاني

تجديد حركة السير.xlsm

تفضل طلبك الاخير بلاكود ايصاُ

تفضل

تجديد 2024.xlsm

تم تعديل سبتمبر 5, 2023 بواسطه محمد يوسف ابو يوسف

[عماني عماني]

أحسنتم جميعا 

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

عندي سؤال اخر  تكرما

في خانة الموظف المعني بالتسجيل خلية ( O4)

محتاج لما

أكتب في تلك الخلية 1 وبمجرد الخروج من الخلية يكتب لي اسم مثلا سعيد ( بنفس الخلية أقصد o4 )

أكتب في تلك الخلية 2 وبمجرد الخروج من الخلية يكتب لي اسم مصعب ( بنفس الخلية أقصد o4 )

أكتب في تلك الخلية 3 وبمجرد الخروج من الخلية يكتب لي اسم سالم ( بنفس الخلية أقصد o4 )

وهكذا ..

ممكن الافادة بالمعادلة اذا ممكن

أحسنتم جميعا ,,,,, 

[محمد يوسف ابو يوسف]

اخي  عماني عماني

تفضلتجديد 2024 (1).xlsm

 

 

 

تم تعديل سبتمبر 7, 2023 بواسطه محمد يوسف ابو يوسف