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

[yasse.w.2010]

السلام عليكم ورحمة الله وبركاته 

الاساتذه الكرام ممكن المساعده في كود تفاعل اليوزر فروم في خلايه في الصفحه

انا جربت كود من احدي المشاركات وحاولت اعدل فيه بحيث يمكن تفاعل اكثر من يوزر فروم في ورقه واحده ولم افلح

شاكر لكم جدا

ملف 1.xlsm

[حسين مامون]

انسخ الكود والصقه مكان السابق

طبعا بعد اضافة ال فورم 2 و 3

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Application.ScreenUpdating = False
On Error Resume Next
If Target.Column = 4 Then ' = 4 And Target.Row > 9 Then
UserForm4.Show
ElseIf Target.Column = 5 Then
UserForm3.Show
ElseIf Target.Column = 6 Then
UserForm2.Show

End If
End Sub

 

[yasse.w.2010]

الف شكر اخي الكريم 

الكود يعمل