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

مطلوب كود يقوم بمسح بيانات مدخله ومعادلات بعد تاريخ محدد ؟


إذهب إلى أفضل إجابة Solved by حمادة باشا,

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

الأخ العزيز/ محمود الاسيوطى

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

1- المرفق بالكود ( بديل المعادلة ) ولابد من تمكين الماكرو لرؤية المحتوي

2- في التاريخ المحدد لايعمل الكود بعد ذلك حتي لو أرجعت تاريخ الجهاز للوراء

3- الأوراق محمية بكلمة سر يمكن تغييرها من داخل الكود

4- الملف تطلب تعديلات عديدة وتكويد طويل لأن مرفق اليومية يختلف في اماكن المعادلات عن مرفق Data

5- تحديث الخلايا يتم ببطيء ولامفر من ذلك لايمكن إختصار الكود عن ذلك .

6- عليك أن تقوم بتجارب الإدخال وتغيير التواريخ وخلافه لإختبار الملف بعدها يجب عليك حماية المصنف والكود

7- ختاما - مجرد رأي شخصي يحتمل الخطأ قبل أن يكون صائبا - أتحفظ علي حماية الملفات والأكواد حيث أعتبرها غير كاملة

   وتمثل عبئا علي المطور والملف معا وتضييع لوقت يمكن توجيهه لتطوير عمل البرامج بشكل أفضل .

تقبل تحياتي

يومية الجديد.rar

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

السلام عليكم

استاذنا // حماده باشا

بسم الله ماشاء الله عليك الله يبارك فيك

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

استاذى تم تجربه المرفق بدقه تامه هو يؤدى مهامه جيدا ولكن كما اشرت ببطء شديد لم اتصور ان يكون لهذه الدرجه

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

 

المرفق بالمشاركه 7# ممتاز ويؤدى الغرض بدقه وسريع فقط اريد بعض التعديلات عليه ( الملف اقتراحك العبقرى ) مبهر

الملف الاول ( الكود بديل المعادله ) رائع معجب به لدرجه رهيبه زادك الله من علمه وبارك فيك ونفع بك

1- ان يتوقف عمل الزر بلا عوده بعد التاريخ المحدد حتى اذا تأخر تاريخ الكمبيوتر

2- ان يزيد عدد شيتات RES الى 6

 

الملف الثانى ويتم التنفيذ على المرفق بالمشاركه 1# رأس الموضوع بالمعادلات فقط

1- ان يتم مسح البيانات من شيت DATA بعد التاريخ المحدد

2- ان يتم مسح جميع المعادلات بعد التاريخ المحدد

3- ان يزيد عدد شيتات RES الى 6

 

 

تقبل احر تحياتى على تعبك ومجهودك معى

جعل الله جميع اعمالك فى ميزان حسناتك

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

السلام عليكم

 

لقد حاولت قدر المستطاع تنفيذ ما اريد وهذا ما توصلت اليه

ارجو تعديل الخطأ فى الملفين

 

الاول يعمل بالكود

والثاتى يعمل بالمعادلات

 

انتظر

DATA11.rar

DATA22.rar

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

الأخ الكريم/ mhassan7222

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

أهلا وسهلا بك في منتدانا العامر - لو تمكنت من تغيير أسم الظهور للعربية لكان أفضل للتواصل

يمكنك تحميل الملف المرقم 4 في المشاركة التالية - بإذن الله - أو الملف في الموضوع التالي

http://www.officena.net/ib/index.php?showtopic=52437#entry327842

تقبل تحياتي

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

الأخ الكريم/ابو اياد ( الاسيوطى )

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

المرفقات - مرقمة تيعا لرقم المشاركة - بعد التعديلات المطلوبة

تقبل تحياتي

 

 

DATA-4.rar

DATA-7.rar

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

السلام عليكم

استاذى // حماده باشا

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

ولكن هناك بعض الملاحظات البسيطه ( طبعا هتعدى على الغير محترفين

 

1-تم التحايل على صيغه الملف ( نعم المستخدم لا يكون قادر على تغيره من داخل الملف save as ) ولكن تم تغييره بكل سهوله من اعاده تسميه الملف بدون فتحه

السؤال هنا هل يمكن تثبيت صيغه واحده بداخل الكود يعمل عليها الملف واذا تغيرت لن يفتح او لن يعمل الملف ؟؟؟؟؟؟؟ إلا بعودته مره اخرى للصيغه الاصليه التى وضعناها داخل الكود ولتكن مثلا xlsb. or xls

 

2- تم حمايه شيت DATA ثم حمايه اسم الشيتات من التعديل ثم تم تجربه الكود بتاخير تاريخ الملف الى 15/2/2014 نعم تم تعطيل الزر ولكن بخطأ يظهر طبعا انا لا اعلمه اعتقد انه حدث لأنى قمت بحمايه الشيتات السؤال هنا هل يمكن التغلب على هذا الخطأ مع الاحتفاظ بالحمايه ؟

 

3- هناك خطأ فى مربع العامل رقم 10 وهو من AA26:AA20 لم يتم تجميع الساعات او الحصول على الناتج تم اعطائها اللون الاحمر فى كل الشيتات

 

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

 

بارك الله فيك ولك

 

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

 

وهو يعمل بكفاءه بنسبه 99.99% وان شاء الله يكون مليون % بعد لمساتك الاخيره

 

انتظرك

11DATA-7.rar

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

الأخ الكريم/ ۩◊۩ أبو حنين ۩◊۩

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

الملف يعمل بدون أخطاء - إفتح الكود وغير التاريخ إلي اليوم

تقبل تحياتي

واللهى باشا ومتشكر جدا على المجهود الرائع

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

الأخ الكريم/ابو اياد ( الاسيوطى )

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

 

3- هناك خطأ فى مربع العامل رقم 10 وهو من AA26:AA20 لم يتم تجميع الساعات او الحصول على الناتج تم اعطائها اللون الاحمر فى كل الشيتات

 

1- لايوجد خطأ في الملف الأصلي ( المشاركة 31 ) ويقوم بحساب جميع خلايا المعادلات قم بتحميله مرة ثانية وجرب

2- المرفق التالي تم إضافة كود للتأكد من إمتداد الملف فإن  كان xlsb يعمل - ويمكنك تغيير الإمتداد الذي ترغبه من داخل الكود .

تقبل تحياتي

 

DATA-7.rar

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

الأخ الكريم/ابو اياد ( الاسيوطى )

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

 

3- هناك خطأ فى مربع العامل رقم 10 وهو من AA26:AA20 لم يتم تجميع الساعات او الحصول على الناتج تم اعطائها اللون الاحمر فى كل الشيتات

استاذى الحبيب // حماده باشا

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

وكل شىء تمام الكود مكتوب بحرفيه ومشيت معه خطوه خطوه والحمد لله تمام ارجو مراجعه المرفق

اه ملفك بالمشاركه 31# ايضا به نفس الخطأ

 

اخى تعبتك معى والمرفق اخر تعديل توصلت إليه فأرجو مراجعته وتعديل ما به ان وجد ( مع انى مراجعه بس مش عارف ليييييييييييييه النقطه رقم 3 بتحصل )

انتظرك

اليوميات2.rar

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

الأخ الكريم/ابو اياد ( الاسيوطى )

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

نعم أنت محق - الخطأ في خانة واحدة أثرت علي المجموع - أعتذر رأيت مجموع الأيام سليم ولم ألحظ خانة المجموع فارغة

تم التعديل في جميع الأوراق - تقبل تحياتي

 

اليوميات2.rar

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

السلام عليكم

استاذى // حماده باشا 

بارك الله فيك ان حضرتك قد تداركت السهو والحمد لله اتممت تعديله الملف الان يعمل 100% بشكل سليم

ولكن تبقى لنا الاتى

 

1- عند الانتقال الى شيت اود ان يذهب بى الى الخليه A1

 

2- تم حمايه شيت DATA ثم حمايه اسم الشيتات من التعديل ثم تم تجربه الكود بتاخير تاريخ الملف الى 15/2/2014 نعم تم تعطيل الزر ولكن بخطأ يظهر طبعا انا لا اعلمه اعتقد انه حدث لأنى قمت بحمايه الشيتات السؤال هنا هل يمكن التغلب على هذا الخطأ مع الاحتفاظ بالحمايه ؟

 

اعتذر لك على كثره طلباتى وتعديلاتى وان شاء الله تكون الاخيره

تقبل تحياتى

 

ارجو التنفيذ على المرفق بالمشاركه 38# اخر مشاركه لك

بالنسبه للطلب رقم ( 2 ) اذا كان سيأثر على اداء او عمل الملف فنحن فى غنى عنه

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

  • أفضل إجابة

الأخ الفاضل/ ابو اياد ( الاسيوطى )

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

1- تم إضافة تفعيل الخلية A1 عند الإنتقال بين الصفحات

2- رسالة الخطأ تظهر لأن الكود يقوم بالكتابة والتعديل علي الخلايا بشكل دائم فيجب أن تكون الورقة غير محمية

    أو يتم فك الحماية حين التعديل تم إرجاعها مرة ثانية بعد التعديل - وهذا يتطلب كود إضافي وعبء علي سرعة وأداء الملف

تقبل تحياتي

اليوميات2.rar

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

استاذى الكبير // حماده باشا

 

ردى متأخر جدا بسبب ظروف ومشاكل كثيره فى العمل ما كانت لدى فرصه حتى للرد

 

بارك الله فيك كفيت ووفيت مليون فى الـ 100% 

 

اداء رائع واكواد رائعه وجديده على الاقل بالنسبه لى !!!!!!!!

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

  • 1 year later...

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

أخي العزيز السائل والمجيب أشكركم لأهمية الكود وطريقة الإجابة الممتازة وقد كررت المحاولة كثيراً حتي إكتشفت الخطأ الذي يحدث معي وهو اني أستخدم برنامج أوفيس 2003 عربي وفي الكود مكتوب sheet1 فقمت بإستبدالها بكلمة (ورقة1) فذهلت من النتيجة حيث وجدتها تعمل بإمتياز فكلي سرور شكراً لكم جميعاً

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

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