تحياتى
مرفق كود خاص باستدعاء الفورم عن طريق دبل كليك فى النطاق من _A2 : A20000
و المطلوب تكرار استخدام نفس الفورم فى نطاق اعمده اخرى و لتكن_F2:F20000
و J2:J20000
و الكود المستخدم هو
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A2 : A20000")) Is Nothing Then
Cancel = True
KH_T_SEARSH.Show
End If
End Sub
و شكرا