اخي الفاضل
يوجد اكواد في ورقة العمل عددها 3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Private Sub ShowListBoxForm(TargetCell As Range)
Private Sub HideListBoxForm()
ويوجد في الفورم 4 اكواد
Private Sub UserForm_Initialize()
Private Sub ListBox1_Click()
Private Sub UserForm_Deactivate()
Private Sub UserForm_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
ارجو تحديد الكود المطلوب شرحة او النقاط الغامضة بالاكواد