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

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
مالك ماريه محمود ابو الدهب-- لا تميز خلال هذه الفترة YasserKhalil مع أكاديمية الصقر اخفي أكوادك وعيش حياتك EvilClippy VBA Project Unviewable Protection اكسيل اسئله واجابات


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



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





تسريع عمل كود يستخدم فيه الداله المعرفه MATCHAlsqr

اريد تسريع عمل هذا الكود او استبداله بكود اخر ان وجد:- يعمل هذا الكود على استخراج اخر سعر بيع للصنف المكتوب فى ComboBox2 ..



23-06-2019 05:01 مساء
عبدالرحمن صبحى
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-10-2018
رقم العضوية : 8466
المشاركات : 99
الجنس : ذكر
تاريخ الميلاد : 21-4-1996
الدعوات : 3
يتابعهم : 4
يتابعونه : 0
قوة السمعة : 128
الاعجاب : 37
 offline 

اريد تسريع عمل هذا الكود او استبداله بكود اخر ان وجد:-
يعمل هذا الكود على استخراج اخر سعر بيع للصنف المكتوب فى ComboBox2 للعميل المكتوب  فى ComboBox1   .
.
شرح النطاقات الموجوده فى الكود المكتوب:-
"("Sheets(2).Range("f1:n700000")   حجم الجدول 
"("Sheets(2).Range("f1:f700000")    عمود الاسم
"("Sheets(2).Range("l1:l700000")   عمود الاسم الصنف


On Error Resume Next
If Me.ComboBox2.Value = "" And Me.ComboBox1.Value = "" Then: Exit Sub
If Me.ComboBox2.Value = "" Or Me.ComboBox1.Value = "" Then: Exit Sub
ler = MATCHAlsqr(Sheets(2).Range("f1:n700000"), Me.ComboBox1.Value, 1, Me.ComboBox2, 7, WorksheetFunction.CountIfs(Sheets(2).Range("f1:f700000"), Me.ComboBox1.Value, Sheets(2).Range("l1:l700000"), Me.ComboBox2.Value))
d = Application.WorksheetFunction.Index(Sheets(2).Range("l1:n700000"), ler, 3)
TextBox21.Value = d
 






24-06-2019 12:39 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7371
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 414
قوة السمعة : 21255
الاعجاب : 1588
 Online 
look/images/icons/i1.gif تسريع عمل كود يستخدم فيه الداله المعرفه MATCHAlsqr
الرجاء وضع الكود بين أقواس الكود وإرفاق ملف ليسهل على الأخوة الأعضاء معرفة المشكلة بشكل أدق







الكلمات الدلالية
MATCHAlsqr ، المعرفه ، الداله ، يستخدم ، تسريع ،


 







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



الساعة الآن 07:41 مساء

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