اذهب الي المحتوي
أوفيسنا

ارجو افادتي في طريقة عمل الشيت المرفق


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

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

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

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

ارجو افادتى في هذا الموضوع

عدم النسخ واللصق.rar

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

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

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

تم تعديل بواسطه eyad.elmekawy
رابط هذا التعليق
شارك

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

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

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

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

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

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

السلام عليكم

الاخ الكريم / eyad.elmekawy

 

بارك الله فيك

الرسالة التي تظهر معك علي اوفيس 2007 تظهر لطلب تمكين الماكروهات الموجودة بالملف

وللتخلص من ذلك شاهد الرابط التالي لحفظ الملف بتنسيق 2003

وهو موضوع للأخ / ابو محمد اشرف ... به ملف فيديو يوضح طريقة الحفظ هذه

بعنوان ( حفظ ملف إكسيل 2007 أو 2010 بتنسيق 2003 )

http://www.officena.net/ib/index.php?showtopic=45933

ان شاء الله به طلبك

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

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

  • 2 weeks later...

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

كنت اعتقد انه عندما امسح هذا الكود سوف يعود الشيت لاصله ولكن للأسف لم تنجح

اريد من اساتذة المنتدى الكود الذي يعيد النسخ واللصق الى شيت الاكسيل

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

السلام عليكم

الاخ الكريم / eyad.elmekawy

 

بارك الله فيك

لكي تعيد النسخ واللصق الى شيت الاكسيل حسب الكود المستخدم

ضع الاكواد التاليه في حدث  ThisWorkbook   بدلا من الموجودة  لديك الآن وقارن بين الملفين ستجد ان التغيير تم مابين True  و False  للتشغيل والايقاف

في وجود الكود بالملف دون الحاجة لحذفه

جرب وابلغني بالنتائج ....

Option Explicit
 
Private Sub Workbook_Activate()
    Call ToggleCutCopyAndPaste(True)
End Sub
 
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Call ToggleCutCopyAndPaste(True)
End Sub
 
Private Sub Workbook_Deactivate()
    Call ToggleCutCopyAndPaste(True)
End Sub
 
Private Sub Workbook_Open()
    Call ToggleCutCopyAndPaste(True)
End Sub

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

 

1كود لاعادة عدم النسخ واللصق.rar

 

تم تعديل بواسطه حمادة عمر
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information