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

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
khaled alborene Eslam Abdullah-- لا تميز خلال هذه الفترة YasserKhalil تجزئة الاسماء المركبة وفصلها عن الاسماء العادية اكسيل اسئله واجابات


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



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





تسريع كود البحث

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب



02-07-2019 12:35 مساء
محمد الخازمي
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 29-11-2017
رقم العضوية : 1995
المشاركات : 45
الجنس : ذكر
تاريخ الميلاد : 21-9-1975
يتابعهم : 0
يتابعونه : 2
قوة السمعة : 31
الاعجاب : 1
 offline 

 
 
  Book1669.rar   تحميل rar مرات التحميل :(20)
الحجم :(1405.81) KB







02-07-2019 05:40 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 6582
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 400
قوة السمعة : 18172
الاعجاب : 620
 offline 
look/images/icons/i1.gif تسريع كود البحث
أعتقد الموضوع يحتاج لمزيد من التفاصيل في الوصف





03-07-2019 10:56 صباحا
مشاهدة مشاركة منفردة [2]
محمد الخازمي
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 29-11-2017
رقم العضوية : 1995
المشاركات : 45
الجنس : ذكر
تاريخ الميلاد : 21-9-1975
يتابعهم : 0
يتابعونه : 2
قوة السمعة : 31
الاعجاب : 1
 offline 
look/images/icons/i1.gif تسريع كود البحث
المشاركة الأصلية كتبت بواسطة: YasserKhalil
أعتقد الموضوع يحتاج لمزيد من التفاصيل في الوصف


المقصود من التسريع "هو اذا اردت استدعاء الاسم الموجود في الصف رقم "65532  " يستغرق وقت طويا جدا ً لجلب بيانات هذا الاسم

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

Private Sub ComboBox3_Change()
Application.ScreenUpdating = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual

On Error Resume Next
III = 5
Do Until Sheet2.Cells(III, "c").Text = ""
    If Me.ComboBox3.Text = Sheet2.Cells(III, "c").Text Then
        Cells(III, "c").Activate
Me.TextBox1.Text = ActiveCell.Offset(0, -1).Text
Me.TextBox133.Text = ActiveCell.Offset(0, 0).Text
Me.TextBox132.Text = ActiveCell.Offset(0, 1).Text
Me.TextBox11.Text = ActiveCell.Offset(0, 2).Text
Me.ComboBox2.Text = ActiveCell.Offset(0, 3).Text
Me.TextBox3.Text = ActiveCell.Offset(0, 4).Text
Me.TextBox4.Text = ActiveCell.Offset(0, 5).Text
Me.TextBox7.Text = ActiveCell.Offset(0, 6).Text
Me.TextBox130.Text = ActiveCell.Offset(0, 7).Text
Me.TextBox131.Text = ActiveCell.Offset(0, 8).Text
Me.TextBox22.Text = ActiveCell.Offset(0, -2).Text


e.ComboBox22.Text = ActiveCell.Offset(0, -2).Text
Exit Sub
    End If
    III = III + 1
Loop
MsgBox ("الكود الذى ادخلته غير صحيح")
'Me.TextBox2.SetFocus

Me.TextBox1.Text = ""
'Me.TextBox2.Text = ""
Me.TextBox3.Text = ""
Me.TextBox4.Text = ""
'Me.TextBox5.Text = ""
'Me.TextBox6.Text = ""
Me.TextBox7.Text = ""
'Me.TextBox8.Text = ""
'Me.TextBox9.Text = ""
'Me.TextBox10.Text = ""
Me.TextBox11.Text = ""
'Me.TextBox12.Text = ""
'Me.TextBox13.Text = ""
'Me.TextBox14.Text = ""
Application.ScreenUpdating = True
Application.EnableEvents = True
Application.Calculation = xlCalculationAutomatic

End Sub





06-07-2019 10:51 صباحا
مشاهدة مشاركة منفردة [3]
محمد الخازمي
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 29-11-2017
رقم العضوية : 1995
المشاركات : 45
الجنس : ذكر
تاريخ الميلاد : 21-9-1975
يتابعهم : 0
يتابعونه : 2
قوة السمعة : 31
الاعجاب : 1
 offline 
look/images/icons/i1.gif تسريع كود البحث
للرفع






المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
تسريع الترحيل وحذف سجل من الليست بوكس ashraf_hertlion
1 32 ashraf_hertlion
تسريع عمل كود يستخدم فيه الداله المعرفه MATCHAlsqr عبدالرحمن صبحى
1 74 عبدالرحمن صبحى
كيفية توقيف جميع الأكواد ما عدا واحد لتسريع الملف سعيد العربي
0 204 سعيد العربي
كود تسريع تشغيل ازرار فورم عند ضغط عليها malik
1 535 malik
تسريع تنفيذ الاوامر في ملف يحتوي على اكثر من ١٠٠٠ قيد Salamco
4 957 YasserKhalil

الكلمات الدلالية
البحث ، تسريع ،


 







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



الساعة الآن 10:24 مساء

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