24-12-24, 11:56 PM
(24-12-24, 11:01 AM)Taha Okla كتب : أكثر من طريقة وأكثر من كود ..
كود :
Private Sub MSFlexGrid1_Click()
If MSFlexGrid1.Rows <= 1 Then Exit Sub ' بحسب عدد الاسطر
If MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, MSFlexGrid1.Col) <> "" Then Form2.Show ' بحسب وجود بيانات عل الخلية التي تضغط عليها
End Sub
يمكنك فعلها بحسب رقم العمود، أو رقم السجل. أو نوع البيانات التي فيه..
كل حدث وله كود يناسبه ..
بارك الله فيك أستاذ طه فقد عدلت على الكود الذي استخدمه ومشى تمام 100 ٪
إذا طُعِنتَ من الخلفِ فاعلمْ أنك في المقدمةِ

