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

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

قام بنشر

‏الخميس‏، 27‏/7‏/1431هـ الموافق ‏8‏/7‏/2010م

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

في المرفق ملف به 2 كود

كود يعمل تلقائيا مع صفحة اكسل -

Private Sub Worksheet_Change(ByVal Target As Range)

و كود آخر يعمل بواسطة زر للترحيل

المطلوب

اثناء عملية الترحيل و المسح ان يتم تعطيل عمل الكود الخاص بـ Worksheet_Change

آمل التكرم بالإفادة عن الطريقة

ودمتم بخير دائما

طلب_تعطيل_كود_اثناءعمل_كودآخر.rar

قام بنشر

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

اشكرك كل الشكر و التقدير استاذنا و مشرفنا الفاضل/ عادل حنفي

وجعل الله اعمالك العظيمة التي تقوم بها فيميزان حسناتك

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

و اتمنى ان كان لدى اي احد من الإخوان فكرة اخرى بحيث تضاف الى نفس الكود ان يتكرم بها علينا

قام بنشر

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

بعد إذن أخي عادل .....

اخي العزيز الكود الذي يعمل تلقائيا يسمى بالحدث "Event"

وفي برنامجك يسمى "Worksheet_Change Event" وبالتالي فأنت تحتاج الى

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

لذا في كود زر الترحيل ضع هذا الكود في بداية الكود المسجل

وهو كود تعطيل الاحداث

Application.EnableEvents = False
وفي نهاية الكود ضع كود تنشيط الاحداث في نهاية البرنامج
Application.EnableEvents = True

قام بنشر

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

ياسلام ياسلام

الف الف مليون شكر و تقدير لك اخي عماد

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

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

الله لا يحرمنا من ابداعاتكم الدائمة

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