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

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


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

الاخوه الافاضل

تحيه طيبه وبعد

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

بمعنى انه مثلا فى 1/12013 عند فتح ملف الاكسل يتطلب باسوورد

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

ولكن هل يمكن عمل هذا

دون الاعتماد على خلايا الاكسل

بمعنى انه هل يمكن كتابه التاريخ فى الكود وكذلك كلمه المرور

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

الاخ ابو حنين

شكرا على الرد

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

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

دون الحاجه الى كود

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

الاخ ابو حنين

شكرا على الرد

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

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

دون الحاجه الى كود

لا اعتقد

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

مرحبا

كما ذكر اخي عبد الله لا اعرف طريقة تقوم بهذا العمل

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

و الحل الامثل هو حماية الملف بكلمة مرور + حماية محرر الـ VBA بكلمة مرور معقدة و بهذا تظمن نوعا ما الحماية

على الاقل لغير المحترفين

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

الخ ابوحنين

كلام جميل ومتزن

ولكن هل لو تم تغير حفظ الملف ليصبح امتداده ليس به ماكرو

هل سيبقى الزمن محدد

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

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

الملف دون تطلب الرقم السرى

فهل هناك كود او ماشابه ذلك يوقف الملف اذا تم حفظه بدون ماكرو

او هناك كود يحول المعادلات على الاقل الى ارقام وقيم فى حاله حفظ الملف بدون ماكرو

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

السلام عليكم

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

ان كان كذلك فالملف يفتح دون المطالبة بكلمة المرور

بكل صراحة لم افهم ما الذي تريد الوصول اليه

ان كنت تريد الحماية الكاملة ، فهناك كود يحمي الملف بحيث لا يفتح إلا في الحاسوب الذي تحدده حيث هذا الكود له علاقة بالرقم التسلسلي للقرص المحلي في الحاسوب مثلا القرص C

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

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

الاخ ابوحنين

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

انا اقصد ان فايل الاكسيل اذا تم حفظه على انه ملف اكسل ماكرو (يعنى بذلك نرى علامه الماكرو مرسومه على ملف الاكسل من الخارج)

هل هناك شيئ يمنع حفظه كملف اكسل عداى بدون ماكرو

او لو تم حفظ الملف بدون ماكرو يتم تحويل المعادلات الى قيم

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

  • 5 months later...
  • 11 months later...
  • 2 months later...

السلام عليكم

الساده الافاضل

موضوع مهم جدا للجميع

ولكن عند تغير التاريخ كما هو موضح

 

If Date > "01-01-2015" Then

 

ما زال الملف يطلب كلمه السر

لماذا ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

ارجو الرد للافاده

كلمة المرور1.rar

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

استعمل هذا التغيير

Private Sub Workbook_Open()
Dim M, pasword
pasword = "1234"

If Date > #1/1/2015# Then

M = MsgBox("ان كانت لديك كلمة المرور فاضغظ على نعم", vbCritical + vbYesNo, "تأكيد")
If M = vbNo Then
Application.Quit
Else
If M = vbYes Then
If pasword = InputBox("ادخل كلمة المرور هنا", "كلمة المرور") Then
   ورقة1.Select
   Exit Sub
GoTo 1
Else
MsgBox "ليس لديك الحق لفتح البرنامج", vbCritical, "خطأ"
Application.Quit
End If: End If: End If: End If
1 End Sub


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

اخى العزبز

الملف تم ضبطه.... سلمت بداك

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

http://www.gulfup.com/?Ub5zsa

وعند فتح الملف .... تظهر

ان كانت لديك كلمة المرور فاضغظ على نعم

عند الضغط على no

يظهر لى هل انت تريد حفظ الملف ... ويوجد ثلاث اختيارات

save     don't save     cancel

عند اختيار cancel ....يتم الدخول الى الملف ...

فما الحل  

حرصا على التعلم

ارجو توضيح الفرق بين

 

If Date > #1/1/2015# Then

If Date > "01-01-2015" Then

 

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

تم تعديل بواسطه ۩◊۩ أبو حنين ۩◊۩
رابط هذا التعليق
شارك

اخى العزبز

الملف تم ضبطه.... سلمت بداك

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

http://www.gulfup.com/?Ub5zsa

وعند فتح الملف .... تظهر

ان كانت لديك كلمة المرور فاضغظ على نعم

عند الضغط على no

يظهر لى هل انت تريد حفظ الملف ... ويوجد ثلاث اختيارات

save     don't save     cancel

عند اختيار cancel ....يتم الدخول الى الملف ...

فما الحل  

حرصا على التعلم

ارجو توضيح الفرق بين

 

If Date > #1/1/2015# Then

If Date > "01-01-2015" Then

 

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

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

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

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



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

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

Important Information