السلام عليكم
الاخ الحبيب / أبو محمد أشرف
بارك الله فيك
واعتذر لك عن عدم الرد ... ولكني ظننت انك تحتاج للشرح فقط
ان كان اخي الحبيب المقصود هو الضغط علي نفس الخلية دبل كليك ليتم زيادة العمود C والعمود H والعمود F يتم زيادتهم واحد
اليك الكود التالي والملف المرفق لعمل ذلك
وان كان غير ذلك ... فارجو مزيد من التوضيح
دائما تحت امرك .... ابو محمد ... فطلباتك آوامر
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 4 And Target.Row <= 100 Then
If Target.Cells.Count = 1 Then
Cells(Target.Row, 3) = Cells(Target.Row, 3) + 1
Cells(Target.Row, 6) = Cells(Target.Row, 6) + 1
Cells(Target.Row, 8) = Cells(Target.Row, 8) + 1
Cancel = True
End If
End If
End Sub
جزاك الله خيرا
استمارة الاستبيان 2013-SAMA2.rar