مشكلتى انه استخدمت AUTO COUNTER ( Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" And Target.Value <> "" Then
Target.Offset(1, 2).Value = Target.Offset(1, 2).Value + 1
Target.Select
End If
End Sub ) فى تنفيذ عد فواتير وذلك على خليه يكتب فيها اسم الفاتورة ثم قمت بعمل ماكرو يمسح الفاتورة وكذلك الأسم ولكن حدث خطأ(Sub clear()
'
' clear Macro
' MGS
'
'
Range("A4").Select
ActiveWindow.SmallScroll Down:=0
Range("A4:A37").Select
ActiveWindow.SmallScroll Down:=-39
Selection.ClearContents
Range("C4:C37").Select
Selection.ClearContents
Range("b1").Select
Selection.ClearContents
ActiveWindow.SmallScroll Down:=-27
End Sub ) ما السبب افيدونى