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

ضبط كود الترحيل


إذهب إلى أفضل إجابة Solved by بن علية حاجي,

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

السلام عليكم

الساده الكرام

 

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

 

مه اضافه تحذير عند استخدام زر المسح

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

 

مانفست كلابشه بدون تكرار3.part2.rar

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

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

 

أخي الكريم أحمد محمد، هناك خلل عند فتح الملف... رجاء أعد إرفاقه وتأكد من عدم وجود الخطأ من جديد...

 

أخوك بن علية

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

  • أفضل إجابة

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

 

أخي الكريم أحمد محمد، لقد تم المطلوب ببعض التعديلات على أكواد الترحيل والمسح وعلى شيت "تعديل"... الظاهر أن بعض المعادلات قد حُذفت من الشيتات الأربعة (وقد تم تعديل كود المسح حسب ما وجدته في هذه الشيتات) مع إضافة "رسالة التحذير" لأكواد المسح حسب ما قدمه أخي "حمادة عمر" في موضوعك الآخر http://www.officena.net/ib/index.php?showtopic=48878 ... أرجو أن تروق لك هذه التعديلات....

 

أخوك بن علية

 

الملف المرفق : مانفست كلابشه دون تكرار3.rar

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

السلام عليكم اخى العزيز

اولا جزاك الله خير على المجهود الرائع معى

ولاكن يوجد مشكله في شيت المغادرين والعائدين

حيث يوجد استدعاء خطاء في خانه عوده خانه I  حيث انها تستقى من شيت عام من خانه p

الخطاء موجود في شيت المغادرين والعائدين

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

شاكر لك حسن تعاونك

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

اخى العزيز بن علية حاجي

لا يكفينى الا الدعاء لك فى ظهر الغيب

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

تم ضبط الامر فى شيت المغادرين والقادمين

جزاك الله خير

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

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

 

أخي الكريم أحمد محمد، تم التعديل حسب المطلوب...

 

أخوك بن علية

 

الملف المرفق : مانفست كلابشه دون تكرار3.rar

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

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

 

أخي الكريم أحمد محمد، بالنسبة للمعادلة الثانية (التي وضعتها في الملف المرفق في مشاركتي) هو شرط إضافي للدالة IF وهو شرط تحسيني لئلا تكون نتيجة المعادلة 0 في حالة ما إذا كانت الخلية من العمود P من شيت "عام" فارغة... والله أعلم

 

أخوك بن علية

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

اخى العزيز

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

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

كيف يتم ذلك

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

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

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

 

أخي الكريم أحمد، لأجل ذلك يجب تغيير خط تأطير جميع خلايا الجداول (حتى العناوين) في الشيتات الخمسة (عام - الاتوبيس - طائرة - مطروح - تعديل) إلى نفس النمط (حتى لا يحدث خلط في تنسيق خط التأطير عند الترحيل)... ونضيف السطر التالي في الكود :

Cells(nr, "I").PasteSpecial Paste:=xlPasteFormats

مباشرة بعد أو قبل السطر التالي :

Cells(nr, "I").PasteSpecial Paste:=xlPasteValues

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

 

أخوك بن علية

 

الملف المرفق مانفست كلابشه دون تكرار3.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