basit bir stok kontrol sayfası yapma

[omerdurul]

stok giriş ve çıkış tablosun da giren ya da çıkan miktarı yazdığımda yan tarafa tarihi eğer bugün ile getirtiyorum fakat her yeni girişte tüm tarihler değişiyor. önceki tarihlerin nasıl sabit kalmasını sağlarım.

 

[Emir Hüseyin Çoban]

Günün tarihini formülle yazmayın.
Bugünün tarihini klavyeden
Ctrl shift ; tuşları ile hızlıca girebilirsiniz.

.

 

[sensizsoldum]

Merhabalar,
Alternatif olarak aşağıdaki kodu kullanabilirsiniz.
B sütuna veri girildiğinde A sütunda o güne ait tarihi yazar. Veri silindiğinde tarihte silinir.

Private Sub Worksheet_Change(ByVal Target As Range)
'C sütuna veri girildiğinde A sütunda tarih yazar
On Error GoTo Son
If Intersect(Target, [b:b]) Is Nothing Then Exit Sub
If Target.Row < 3 Then Exit Sub
If Target <> "" Then Target.Offset(0, -1) = Date
If WorksheetFunction.CountA(Target) = 0 Then Target.Offset(0, -1).Clear
Son:
End Sub