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

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


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



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





مشكل عدم ظهور نتائج البحث في مجموعة من الكمبوبوكس

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



29-07-2019 10:34 صباحا
foular
menu_open
عضو
معلومات الكاتب ▼
تاريخ الإنضمام : 01-06-2019
رقم العضوية : 13237
المشاركات : 3
الجنس : ذكر
تاريخ الميلاد : 18-1-1980
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 10
الاعجاب : 0
 offline 

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

 
Private Sub ComboBox1_Change()
Application.ScreenUpdating = False
On Error Resume Next
sheet1.Activate
III = 4
Do Until sheet1.Cells(III, "A").Text = ""
    If Me.ComboBox1.Text = sheet1.Cells(III, "A").Text Then
      Cells(III, "A").Activate
TextBox1.Text = ActiveCell.Offset(0, 1).Value
TextBox2.Text = ActiveCell.Offset(0, 2).Value
TextBox3.Text = ActiveCell.Offset(0, 3).Value
TextBox4.Text = ActiveCell.Offset(0, 4).Value
TextBox5.Text = ActiveCell.Offset(0, 5).Value
TextBox6.Text = ActiveCell.Offset(0, 6).Value
TextBox7.Text = ActiveCell.Offset(0, 7).Value
TextBox8.Text = ActiveCell.Offset(0, 8).Value
TextBox9.Text = ActiveCell.Offset(0, 13).Value
TextBox10.Text = ActiveCell.Offset(0, 10).Value
TextBox11.Text = ActiveCell.Offset(0, 11).Value
TextBox12.Text = ActiveCell.Offset(0, 12).Value
TextBox54.Value = ActiveCell.Offset(0, 14).Value


ComboBox2.Text = ActiveCell.Offset(0, 15).Text
ComboBox3.Text = ActiveCell.Offset(0, 20).Text
ComboBox4.Text = ActiveCell.Offset(0, 25).Text
ComboBox5.Text = ActiveCell.Offset(0, 30).Value
ComboBox6.Text = ActiveCell.Offset(0, 35).Value
ComboBox7.Text = ActiveCell.Offset(0, 40).Value
ComboBox8.Text = ActiveCell.Offset(0, 45).Value
ComboBox9.Text = ActiveCell.Offset(0, 50).Value
ComboBox10.Text = ActiveCell.Offset(0, 55).Value
ComboBox11.Text = ActiveCell.Offset(0, 60).Value
Exit Sub
End If
    III = III + 1
Loop

Call Toumana_Clear
 TextBox2.SetFocus
 Spin1.Value = ComboBox1.Text
End Sub
 
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
لذلك أرجو المساعدة في ايجاد الحل.
مشكورين مقدما
 
 
  نموذج.rar   تحميل rar مرات التحميل :(4)
الحجم :(120.391) KB








المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
حل مشكلة ظهور الكلمات معكوسة عند طباعة بيان من مواقع وزارة التربية والتعليم Yasser Elaraby
27 1348 محمج احمد سعد
مشكلة فى عدم ظهور الفورم صلاح الصغير
5 70 YasserKhalil
ظهور مشكلة لملف يعمل على بعض الأجهزة ولا يعمل على البعض الأخر a.kawkab
12 117 YasserKhalil
ظهور نفس المشاركة بقسمين مختلفين بعد نقلها ali mohamed ali
5 271 ali mohamed ali
مشكلة اللغة العربية وظهور رموز غريبة بودى مورا
8 3662 YasserKhalil

الكلمات الدلالية
مجموعة ، الكمبوبوكس ، البحث ، نتائج ، ظهور ، مشكل ،


 







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



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

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