أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
أحمد يوسف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil كود للطباعة علي طابعتين في نفس الوقت اكسيل اسئله واجابات


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


أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





تعديل كود طرح بيانات مكررة

السلام عليكم احتاج مساعدة في تعديل كود حيث يقوم الكود بدمج البيانات المكررة وجمعها لكن عملية الطرح تعطي ناتج ..



30-01-2020 09:29 مساء
المبتدأ
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 28-01-2018
رقم العضوية : 4055
المشاركات : 249
الجنس : ذكر
تاريخ الميلاد : 17-8-1981
قوة السمعة : 193
الاعجاب : 11
 offline 
السلام عليكم  
احتاج  مساعدة  في تعديل  كود   حيث  يقوم  الكود بدمج البيانات المكررة وجمعها  لكن  عملية الطرح  تعطي ناتج خطا   
يقوم  بعملية الجمع  من A:E  اما  ناتج  الطرح  يظهر  في  العمود F=D-E  وهذا  الكود 
Sub mcrCombineAndScrubDups()
For Each a In Range("A2", Cells(Rows.Count, "A").End(xlUp))
For r = 1 To Cells(Rows.Count, "A").End(xlUp).Row - a.Row
If a = a.Offset(r, 0) And a.Offset(0, 1) = a.Offset(r, 1) And a.Offset(0, 2) = a.Offset(r, 2) Then
a.Offset(0, 3) = a.Offset(0, 3) + a.Offset(r, 3)
a.Offset(0, 4) = a.Offset(0, 4) + a.Offset(r, 4)
a.Offset(0, 5) = a.Offset(0, 4) - a.Offset(r, 3)
a.Offset(r, 0).EntireRow.Delete
r = r - 1
End If
Next r
Next a
End Sub
 
 
  MERGE DATA ‫‬.xls   تحميل xls مرات التحميل :(1)
الحجم :(38.4) KB







المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
تعبئة الكومبوبكس ببيانات فريدة (غير مكررة) Fill ComboBox With Unique Items YasserKhalil
16 1029 YasserKhalil
مساعدة في تعديل كود ترحيل بيانات غير مكررة من ورقة1 الى ورقة2 المبتدأ
5 554 المبتدأ
تعبئة كومبو بوكس ببيانات غير مكررة من اكثر من شيت عبدالرحمن صبحى
8 616 sobhi67
تعديل في كود حدف البيانات لمكررة المبتدأ
2 381 المبتدأ

الكلمات الدلالية
تعديل ، بيانات ، مكررة ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 08:05 صباحا

أعلن هنا
أعلن هنا
أعلن هنا