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

بجد الف الف شكر أ / حسين مأمون
تعبت حضرتك كتير
بس تعديل صغير
اول combobox 1 ويخص ال نصف شهرى مظبوط تمام ( لا يتم ظهور اسماء النصف شهرية ولا يتم ظهور الحالة لا )
اما combobox 2 ويخص ال شهرى يحتاج تعديل صغير ( انه لا يتم ظهور اسماء النصف شهرية ولكن يظهر الحالة لا ) محتاج تعديل اخفاء الاسماء التى حالتها لا فى النصف شهرى
ولك جزيل الشكر والتقدير
وبرجاء شرح الكود لتطبيقة على التصميم الخاص بى واكون جزيل الشكر لو تم شرح الكود
تعديل
اما combobox 2 ويخص ال شهرى يحتاج تعديل صغير ( انه لا يتم ظهور اسماء النصف شهرية ولكن يظهر الحالة لا ) محتاج تعديل اخفاء الاسماء التى حالتها لا فى ال "شهرى "

بالنسبة لتعبئة للكومبو بوكس
اقترح هذا الماكرو (اسرع بكثير اذا كانت البيانات كبيرة)

Option Explicit

Private Sub Worksheet_Activate()
Dim lr, x
With Sheets("sheet1")
Application.ScreenUpdating = False
lr = .Cells(Rows.Count, 1).End(3).Row
Dim arr1(), arr2(), m%, n%
For x = 2 To lr

If .Cells(x, 2) = "نصف شهري" Then
 ReDim Preserve arr1(m): arr1(m) = Range("a" & x): m = m + 1
Else
 ReDim Preserve arr2(n): arr2(n) = Range("a" & x): n = n + 1
End If
 Next
 Me.ComboBox1.List = Application.Transpose(arr1)
 Me.ComboBox2.List = Application.Transpose(arr2)
Erase arr1: Erase arr2

Application.ScreenUpdating = True
End With
End Sub

شكرا أ / Salim
هل يمكن المساعدة فى اضافة الكود بطريقة صحيحة
حيث اتمكن من فهم اين القيم التى يجب تغييرها لتعمل على الشيت الاساسى
وهل هذا الكود يتم ظهور الاسماء حسب التصنيف ( شهرى / نصف شهرى ) فقط ام ( شهرى / نصف شهرى ) والحالة ( "نعم & اجازه" = ظهور "لا"=اخفاء)
البيانات الاساسية فى الشيت
اسم الموظف من (A4:A63) ترتيب العمود " العمود رقم 2 "
الراتب"شهري/نصف شهري" (CK4:CK63) ترتيب العمود " العمود رقم 89"
الحالة "نعم/اجازة/لا" (CL4:CL63) ترتيب العمود " العمود رقم 90 "

صدقني لم افهم شيئاً مما شرحته!.............
حاول ادراج بعض التوقعات يدوياً لربما استطيع فهم ما تريد

تم ارسال ملف شرح على الخاص
برجاء المساعدة لاننى قبل 31/1/2020 لازم اكون مخلص الشيت من تصميم
والبيانات كلها بتاعت الشهر داخله فيه