الترحيل الرحيل حسب نوع الفاتورة

[نور وحيد]

ارجوا من السادة الافاضل المساعد فى عمل الترحيل كما هو موضح داخل الملف الملحق

وللجميع التحية والسلام

جديد.rar

[نور وحيد]

رفع

[نور وحيد]

رفع

 

[نور وحيد]

رفع

[طارق محمود]

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

جديد.rar

[نور وحيد]

الاستاذ /طارق محمود 

اشكر لك مساعدتى فى تنفيذ المطلوب 

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

جديد0.rar

[طارق محمود]

السلام عليكم

أخي الكريم
1- جربت أنا الكود لايوجد مشاكل إذا بيانات الفاتورة موجودة وخاصة عمود "كود الصنف"
تحدث أخطاء بالترحيل إذا كانت بيانات الفاتورة غير مكتملة

2- تم تعديل الترحيل ليبدا من رقم الفاتورة حتى خانة الرصيد كما تريد

تفضل المرفق

جديد2.rar

[نور وحيد]

الاستاذ الفاضل / طارق محمود 

بعدالتحية العطرة جارى تنزيل الملف والاطلاع عليه

[نور وحيد]

الاساذالفاضل / طارق محمود

اشكر لسيادتك مساعدتى واعتذر عن تاخرى فى الرد لسبب خارج عن الارادة

اما بعد

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

Run-time error1004

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

Range("M6:P" & LR).ClearContents كما لوحظ اختفاء الكلمات التالية من صفحة الفاتورة وهى الكود - العدد بما تحتة من مصنع -م1-م2 بالاضافة الى السعر اسف مرة اخرى على الازعاج والاطالة متمنا من الله ان يكون ذلك فى ميزان حسناتك يوم القيامة

[نور وحيد]

استاذنا الجليل 

بعد التحية

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