عبدالله المجرب قام بنشر يناير 15, 2011 مشاركة قام بنشر يناير 15, 2011 في المرفق تم الغاء خاصية اللصق ولكن المطلوب الان هو الغاء خاصية النسخ ايضاً مزيد من الشرح داخل المرفق النسخ واللصق.rar رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 15, 2011 مشاركة قام بنشر يناير 15, 2011 السلام عليكم و رحمة الله وبركاته هذه الأكواد منقولة من احد عباقرة هذا المنتدى لا اذكر من هو Private Sub Workbook_Open() Call ToggleCutCopyAndPaste(False) End Sub ولألغاء الكود عند اغلاق الملف Private Sub Workbook_BeforeClose(Cancel As Boolean) Call ToggleCutCopyAndPaste(True) End Sub مع الشكر له وجزاه الله كل خير رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر يناير 16, 2011 الكاتب مشاركة قام بنشر يناير 16, 2011 جزاك الله خير استاذ احمد ولكن هناك رسالة خطاء عند وضع الكود في محرر الفجول ارجو ان تتطلع عليها صورة الخطاء.rar رابط هذا التعليق شارك More sharing options...
بن علية حاجي قام بنشر يناير 16, 2011 مشاركة قام بنشر يناير 16, 2011 السلام عليكم ورحمة الله أخي الكريم، عند تصفحي للنت وجدت الأكواد التي أدرجتها في ملف إكسيل بالمرفقات وهي تلغي خواص القص والنسخ واللصق من الملف عند فتحه ثم تستعيدها بعد غلق الملف المعني... إن شاء الله يكون هذا المطلوب... أخوك بن علية Disable cut_copy_paste.rar رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر يناير 16, 2011 الكاتب مشاركة قام بنشر يناير 16, 2011 شكراً استاذ بن عليه رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 16, 2011 مشاركة قام بنشر يناير 16, 2011 جزاك الله خير استاذ احمد ولكن هناك رسالة خطاء عند وضع الكود في محرر الفجول ارجو ان تتطلع عليها السلام عليكم آسف جدا اخي الكريم و في الحقيقة لم اجرب هذه من قبل أخي بن علية جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر يناير 16, 2011 مشاركة قام بنشر يناير 16, 2011 السلام عليكم بارك الله فيكم اخي ولد المجرب يمكنك استخدام الكود التالي للتعطيل Application.CommandBars("CELL").Controls("Cu&t").Enabled = False Application.CommandBars("CELL").Controls("&Copy").Enabled = False Application.OnKey "^c", "" Application.OnKey "^v", "" Application.OnKey "^x", "" وللتفعيل Application.CommandBars("CELL").Controls("Cu&t").Enabled = True Application.CommandBars("CELL").Controls("&Copy").Enabled = True Application.OnKey "^c" Application.OnKey "^v" Application.OnKey "^x" رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر يناير 16, 2011 الكاتب مشاركة قام بنشر يناير 16, 2011 الاساتذة الافاضل بن علية واحمد زمان والحسامي اشكركم جزيل الشكر على تفاعلكم ومساهماتكم رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر يناير 16, 2011 مشاركة قام بنشر يناير 16, 2011 السلام عليكم الشكر واصل للجميع اخي ابن عليه كود ممتاز خاصة و انه يشمل عدم تمكين النسخ و اللصق و القص من الكليك يمين و ال Edit و ايضا من الكيبورد اي ان الكود مكتمل من كافة الجوانب فلك الشكر علي ذلك اخي احمد يعقوب تحية لك و اعتقد انه ينقص كودك الماكرو الذي يستدعيه الكود خالص تحياتي رابط هذا التعليق شارك More sharing options...
رعد العزاني قام بنشر سبتمبر 22, 2012 مشاركة قام بنشر سبتمبر 22, 2012 السلام عليكم ورحمة الله أخي الكريم، عند تصفحي للنت وجدت الأكواد التي أدرجتها في ملف إكسيل بالمرفقات وهي تلغي خواص القص والنسخ واللصق من الملف عند فتحه ثم تستعيدها بعد غلق الملف المعني... إن شاء الله يكون هذا المطلوب... أخوك بن علية اخي الكريم بن عيلة السلام عليكم ورحمه الله وبركاته بعد الاطلاع على كود منع النسخ واللصق وتجريبة اتضح بان هناك ثغرة يستطيع الشخص استغلالها وهي عن طريق القوائم بحيث يستطيع عمل نسخ ولصق عن طريق الأوامر الموجودة بالقائمة حسب ما جربتة انا تحياتي لمعاليكم رابط هذا التعليق شارك More sharing options...
أحمد فؤاد قام بنشر سبتمبر 22, 2012 مشاركة قام بنشر سبتمبر 22, 2012 السلام عليكم ورحمة الله وبركاته عمل رائع أخي بن علية بارك الله فيك ولا أستطيع أن أنسى أستاذي الحسامي الله يباركلك أخوك : أحمد فؤاد رابط هذا التعليق شارك More sharing options...
اسلام سيد قام بنشر ديسمبر 4, 2013 مشاركة قام بنشر ديسمبر 4, 2013 جزاكم الله خير ولكن ماذا نفعل لإيقاف النسخ واللصق فى قائمة home رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان