Kod:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address(False, False) = "K6" And Target.Value <> "" Then _
ActiveSheet.Range("K7") = Range("K7") + 1
End Sub
Not: Excel sayfasında herhangi bir veriyi sildiğim zaman hata veriyor. Bunu nasıl çözebilirim acaba yardımlarınız için şimdiden tşk. ler.