منع ادخال قيم في الخلايا بعد مرور وقت محدد

[اسامة ابو عمر]

السلام عليكم

في الملف المرفق ادناه

لدي جدول حضور يومي

يتم ادخال الحضور والغياب بشكل دائم كل يوم خميس

اريد عند انتهاء يوم الخميس ان لايستيطع احد ادخال او تعديل القيم التى ادخلت قبل هذا التاريخ

يعني مثلا عندي احد واثنين وثلاثاء واربعاء وخميس بعد انتهاء يوم الخميس لا يستطيع احد التعديل او الادخال وهكذا في كل اسبوع 

مادة الحاسب الآلي القاضي.rar

[اسامة ابو عمر]

up

[اسامة ابو عمر]

up

[اسامة ابو عمر]

up

[اسامة ابو عمر]

up

[محمد لؤي]

السلام عليكم

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

(كلمة السر) salim أحرف صغيرة - الملف 2010  - ضع الكود في ورقة العمل

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
ActiveSheet.Protect Password:="salim"
With ActiveSheet
        .Unprotect Password:="salim"
        .Cells.Locked = False
        For Each cell In ActiveSheet.UsedRange
                If cell.Value = "" Then
                        cell.Locked = False
                        Else
                        cell.Locked = True
                End If
         Next cell
 End With
 Application.EnableEvents = True
 ActiveSheet.Protect Password:="salim"
End Sub
 

[اسامة ابو عمر]

5 ساعات مضت, محمد لؤي said:

السلام عليكم

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

(كلمة السر) salim أحرف صغيرة - الملف 2010  - ضع الكود في ورقة العمل

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
ActiveSheet.Protect Password:="salim"
With ActiveSheet
        .Unprotect Password:="salim"
        .Cells.Locked = False
        For Each cell In ActiveSheet.UsedRange
                If cell.Value = "" Then
                        cell.Locked = False
                        Else
                        cell.Locked = True
                End If
         Next cell
 End With
 Application.EnableEvents = True
 ActiveSheet.Protect Password:="salim"
End Sub
 

شكرا لك اخوي على الاهتمام

لكن هذا الكود يقوم باغلاق الخلية

انا اريد اغلاق الخليه بعد كل خميس من كل اسبوع

[عبدالسلام ابوالعوافي]

لعله يفيد

مادة الحاسب الآلي القاضي.rar

[عادل حنفي]

السلام عليكم

احسنت اخي عبد السلام فكرة ملفك  قريبة جدا من ملفي

مع العلم تم التجربة السريعة

مادة الحاسب الآلي القاضي2.rar

[اسامة ابو عمر]

2 ساعات مضت, عبدالسلام ابوالعوافي said:

لعله يفيد

مادة الحاسب الآلي القاضي.rar

شكرا لك اخي على المساعدة

لكن اول ما افتح الملف تظهر لي هذه المشكلة 

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

يعني مثلا الخميس القادم بتاريخ 9-6 

الساعة الثالثة مساءا يقوم باقفال الخلايا بتاريخ 9 و 8و7و6و5و4و3و2و1 من شهر 6 

والخميس التالي 16 من شهر 6 يقوم باقفال ايام 15 و14 و13و12و11و10 من شهر 6 الساعة الثالثة مساءا

وهكذا

50 دقائق مضت, عادل حنفي said:

السلام عليكم

احسنت اخي عبد السلام فكرة ملفك  قريبة جدا من ملفي

مع العلم تم التجربة السريعة

مادة الحاسب الآلي القاضي2.rar

شكرا لك اخوي على المساعدة 

لكن تظهر لي رسالة عند فتح الملف 

كما لا استطيع ادخال اي شيء في الخلايا بالرغم من وضعي الباس ويرد وهو aa

[عبدالسلام ابوالعوافي]

12 دقائق مضت, اسامة ابو عمر said:

لكن اول ما افتح الملف تظهر لي هذه المشكلة 

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

 

اخي اسامة .. الملف يشتغل تمام معي 

فكرة العمل انه يقوم بتامين الخلايا ( الخميس الماضي وماقبله ) عند فتح الملف وايضا يقوم بتلوين الخلايا بلون مختلف كما في الصورة

اضغط علي Debug وخد سكرين شوت للكود لاعرف المشكلة .. وايضا اخبرني عن اصدار الاوفيس

[عادل حنفي]

اخي الرسائل التي تاتيك اكيد المشكلة منلاعندك سواء بالنسبة لملف او بالنسبةلالملفراخي عبد السلام فقد حملته وليس به مشكلة

اما بخصوص انك لا تستطيع الكتابه وهذا لسببين الاول ان الكود يعمل لمجرد تحدد اي خلية فينشط الحماية مرة اخري

اماىالثاني فهل لاحطت ان التاريخ الموجود بالشيت هو لشهر مايو 

راجع الملف المهمةان يحقق مطلبك لالاقفال الخلايا يكونى مضبوط ثم سيكون ضبط اي شيئ اخر بسيط

تحياتي

[اسامة ابو عمر]

3 ساعات مضت, عبدالسلام ابوالعوافي said:

اخي اسامة .. الملف يشتغل تمام معي 

فكرة العمل انه يقوم بتامين الخلايا ( الخميس الماضي وماقبله ) عند فتح الملف وايضا يقوم بتلوين الخلايا بلون مختلف كما في الصورة

اضغط علي Debug وخد سكرين شوت للكود لاعرف المشكلة .. وايضا اخبرني عن اصدار الاوفيس

نسخة الاوفيس الحالية 2013

شكرا ليك 

3 ساعات مضت, عادل حنفي said:

اخي الرسائل التي تاتيك اكيد المشكلة منلاعندك سواء بالنسبة لملف او بالنسبةلالملفراخي عبد السلام فقد حملته وليس به مشكلة

اما بخصوص انك لا تستطيع الكتابه وهذا لسببين الاول ان الكود يعمل لمجرد تحدد اي خلية فينشط الحماية مرة اخري

اماىالثاني فهل لاحطت ان التاريخ الموجود بالشيت هو لشهر مايو 

راجع الملف المهمةان يحقق مطلبك لالاقفال الخلايا يكونى مضبوط ثم سيكون ضبط اي شيئ اخر بسيط

تحياتي

شكرا ليك اخوي على المساعدة

هو تقريبا نفس اللي انا عايزو بس ازاي ممكن اغير الشهر ؟؟

[عبدالسلام ابوالعوافي]

لو تجرب الملف علي جهاز اخر .. اعتقد المشكلة في نسخة الاوفيس عندك .. لان الكود صحيح ويشتغل معي تمام علي نسخة 2013

[اسامة ابو عمر]

22 ساعات مضت, عبدالسلام ابوالعوافي said:

لو تجرب الملف علي جهاز اخر .. اعتقد المشكلة في نسخة الاوفيس عندك .. لان الكود صحيح ويشتغل معي تمام علي نسخة 2013

جربت الملف على جهاز تاني وشغال تمام

بس حجرب واشوف بعد يوم الخميس عشان نتاكد ان الشغل تمام

شكرا ليك وجزاك الله كل خير

[عبدالسلام ابوالعوافي]

غير تاريخ الجهاز وجرب 

[اسامة ابو عمر]

في Wednesday, June 08, 2016 at 02:03, عبدالسلام ابوالعوافي said:

غير تاريخ الجهاز وجرب

شكرا ليك ياباشا الملف شغال 100%

بس عندي مشكلة

لما قمت بتطبيق الكود على الملفات الاصلية مزبطش

مع اني قمت بنسخ الكود ولصقة وحفظ الملف بصيغة مايكرو

[عبدالسلام ابوالعوافي]

لا اعلم المشكلة بالضبط .. لكن حاول تعديل النطاق داخل الكود بما يناسب ملفك . وايضا تاكد من تنسيق الخلايا في الملف علي انها تاريخ .. 

[اسامة ابو عمر]

16 ساعات مضت, عبدالسلام ابوالعوافي said:

لا اعلم المشكلة بالضبط .. لكن حاول تعديل النطاق داخل الكود بما يناسب ملفك . وايضا تاكد من تنسيق الخلايا في الملف علي انها تاريخ ..

النطاقات مثل ما هي وما تغيرت

ده الملف اللي قمت بتطبيق الكود عليه

مادة الحاسب الآلي القاضي.rar

[عبدالسلام ابوالعوافي]

مادة الحاسب الآلي القاضي.rar

[اسامة ابو عمر]

15 ساعات مضت, عبدالسلام ابوالعوافي said:

مادة الحاسب الآلي القاضي.rar

الف شكر اخوي وجزاك الله كل خير

بس ايه المشكلة كانت ؟؟

لاني عايز اطبق الكود على جميع الملفات وشهريا على كل شهر

[عبدالسلام ابوالعوافي]

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

[اسامة ابو عمر]

في 6/15/2016 at 12:36, عبدالسلام ابوالعوافي said:

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

شكرا ليك

هجرب واشوف