اخي الفاضل
أفتح محرر الاكواد ستجد الكود التالي في ورقة العمل SHEET1
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 29 Then Exit Sub
If Target.Row <> 3 Then Exit Sub
aa
End Sub
أمسح السطرين الثاني والثالث ليصبح الكود
Private Sub Worksheet_Change(ByVal Target As Range)
aa
End Sub