DEKONT NUMARASI

[feser]

Üstatlar;

excel'de hazırladığım bir dekonta her veri girildiğinde otomatik bir dekont no verilmesi için ne yapmam lazın yardımlarınızı bekliyorum

 

[VisualBasic]

Sub Auto_Open()
  [F10] = Replace([F10], "-", "")
  If IsNumeric([F10]) = False Then
    MsgBox "Dekont No Alanına Sadece Rakamsal Veriler Yazılabilir."
    Exit Sub
  End If
  Sheets(1).[F10] = Sheets(1).[F10] + 1
End Sub