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

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


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





تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة

السلام عليكم عندى مشكلة أود أن اجد حلا لها أريد تعبئة الكمبوبوكس الموجود فى صفحة العمل ببيانات من صفحات مختلفة بناء على ..



24-07-2020 01:53 مساء
Haneen Amr
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 08-01-2018
رقم العضوية : 3478
المشاركات : 25
الجنس : أنثى
تاريخ الميلاد : 12-9-1976
يتابعهم : 6
يتابعونه : 0
قوة السمعة : 36
 offline 

السلام عليكم
عندى مشكلة أود أن اجد حلا لها
أريد تعبئة الكمبوبوكس الموجود فى صفحة العمل ببيانات من صفحات مختلفة بناء على قيمة خلية محددة
مثال :
إذا كانت قيمة الخلية  f1  = 1        فان نطاق البيانات للكمبوبوكس من ورقة العمل ( Employ_1)
أما إذا كانت قيمة الخلية  f1  = 2    فان نطاق البيانات للكمبوبوكس من ورقة العمل ( Employ_2)
أما إذا كانت قيمة الخلية  f1  = 3    فان نطاق البيانات للكمبوبوكس من ورقة العمل ( Employ_3)
ولكم جزيل الشكر
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
 
 
 
  تعبئة الكمبوبوكس بالبيانات.xlsm   تحميل xlsm مرات التحميل :(1)
الحجم :(23.472) KB


24-07-2020 02:04 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة
وعليكم السلام أخي الكريم
هل جربت الجمل الشرطية؟
حاول البحث في المنتدى وستجد دروس لهذا الأمر ..

24-07-2020 05:49 مساء
مشاهدة مشاركة منفردة [2]
Haneen Amr
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 08-01-2018
رقم العضوية : 3478
المشاركات : 25
الجنس : أنثى
تاريخ الميلاد : 12-9-1976
يتابعهم : 6
يتابعونه : 0
قوة السمعة : 36
 offline 
look/images/icons/i1.gif تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة
أخى الكريم
حاولت كثيرا ولكن فشلت فى الوصول للحل

24-07-2020 07:11 مساء
مشاهدة مشاركة منفردة [3]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة
في حدث ورقة العمل ، اعمل كليك يمين على تبويب ورقة العمل ثم اختر View Code والصق الكود التالي
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ws As Worksheet, lr As Long
    If Target.Cells.CountLarge > 1 Then Exit Sub
    If Target.Address = "$F$1" Then
        If Target.Value = 1 Then
            Set ws = ThisWorkbook.Worksheets("Employ_1")
        ElseIf Target.Value = 2 Then
            Set ws = ThisWorkbook.Worksheets("Employ_2")
        ElseIf Target.Value = 3 Then
            Set ws = ThisWorkbook.Worksheets("Employ_3")
        End If
        lr = ws.Cells(Rows.Count, 3).End(xlUp).Row
        Me.ComboBox1.List = ws.Range("C6:C" & lr).Value
    End If
End Sub

24-07-2020 11:59 مساء
مشاهدة مشاركة منفردة [4]
Haneen Amr
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 08-01-2018
رقم العضوية : 3478
المشاركات : 25
الجنس : أنثى
تاريخ الميلاد : 12-9-1976
يتابعهم : 6
يتابعونه : 0
قوة السمعة : 36
 offline 
look/images/icons/i1.gif تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة
جزاكم الله خيرا أستاذ ياسر
وسلمت يداك
الكود كده تمام

25-07-2020 12:07 صباحا
مشاهدة مشاركة منفردة [5]
محمد الدسوقى
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 827
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 79
يتابعهم : 9
يتابعونه : 766
قوة السمعة : 8651
عدد الإجابات: 8
 offline 
look/images/icons/i1.gif تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة
بارك الله فيك يا أبو البراء
دائما أنت لها
جربت الكود ووجدته من وجهة نظرى المتواضعة جدا بالنسبة لكم
أنه يوضع فى حدث  ComboBox1_MouseDown أفضل لأن فى حدث  Worksheet_Change  يحتاج بعد كتابة الرقم 1 أو 2 أو 3 مفتاح الادخال Enter
 

25-07-2020 05:35 صباحا
مشاهدة مشاركة منفردة [6]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif تهبئة الكمبوبوكس بالبيانات اعتمادا على قيمة خلية محددة
بارك الله فيك أخي الحبيب محمد ومشكور على المعلومة الرائعة وعلى إثراء الموضوع
لكن لو لاحظت أن المستخدم لابد أن يقوم بتغيير القيمة في الخلية ليغير مصدر الكومبوبوكس فالحدث لن يؤثر في شيء لأنه لزاماً عليه سيقوم بتغيير الرقم في الخلية ولابد بعد التغيير من الضغط على زر Enter ..




الكلمات الدلالية
تهبئة ، الكمبوبوكس ، بالبيانات ، اعتمادا ، قيمة ، خلية ، محددة ،


 










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

الساعة الآن 02:59 صباحا