Logları Tutmak

[xexcelsor100]

A1= yenilenince B1= Şimdi() olacak ve bu bilgileri Alt satıra geçirerek logları tutacak Kısacası A1 hücrem var Yeni farklı bir bilgi gelince eski bilgileri alta geçirsin
örneğin;

A1=3 B1= Şimdi() ----->yazılı olsun

devamında A1 e dışardan bilgi geliyor;

A1 =8 olursa B1= Şimdi() olacak Ama Hücrenin eski bilgileri altta geçecek yani
A2= 3 (bir önceki bilgi) ve B1=(bir önceki saat)
bu şekilde A250 ve B250 hücresine log tutmak istiyorum.

örneği çoğaltayım

1-) A1=3 ,B1= Şimdi() (saat 17;52;52 )
2-) A1=8 ,B1= Şimdi() (saat 18;01;47) ve loglar A2=3 ve B2=17;52;52
3-) A1=5 ,B1= Şimdi() (saat 18;12;45 ) ve loglar A3=8 ve B3=18;01;47
4-) A1=1 ,B1= Şimdi() (saat 19;12;45 ) ve loglar A4=5 ve B4 =18;12;45

 

[Ömer BARAN]

Merhaba.

Umarım yanlış anlamadım.
Alt taraftan uygulama istediğiniz sayfanın adına fareyle sağ tıklayıp KOD GÖRÜNTÜLEyi seçin,
açılan VBA ekranında sağ taraftaki boş alana aşağıdaki kod'u yapıştırın.
.

[B]Private Sub Worksheet_Change(ByVal Target As Range)[/B]
If Intersect(Target, [[B][COLOR="Red"]A1[/COLOR][/B]]) Is Nothing Then Exit Sub
If Target.Address(0, 0) = "A1" Then
    Range("A1:B1").Insert Shift:=xlDown
    [A2] = Target: [B2] = Now
End If
If Cells(Rows.Count, "A").End(xlUp).Row = 251 Then Rows("251:251").Delete Shift:=xlUp
[A1].Activate
[B]End Sub[/B]

 

[xexcelsor100]

Şöyle bir sıkıntı oldu

1-)A1 değişirse log tutacak değişmediyse log tutmayacak.
2-)A1 dışardan besleniyor. A1 e Elle bilgi girmiyorum (verdiğiniz kod A1 elle girince çalıştı ama dışardan A1 refresh olunca çalışmadı.

 

[Ömer BARAN]

Sorularınızı örnek belge üzerinden sorarak daha hızlı sonuca ulaşabilirsiniz.

Örnek belge özellikleri ve örnek belge yükleme yöntemine ilişkin açıklama cevaplarımın altındaki İMZA bölümünde var.
.

 

[xexcelsor100]

karışık bir sey yok aslında

karışık bir sey yok aslında. A1 hücresine dışardan sürekli bilgi geliyor. Bunu başka hücrede tutmak istiyorum.

 

[xexcelsor100]

Bu örneği yapamazmıyız?;

A1 de bilgi var; A1 yeni bilgi girilince(farklı bir bilgi) önceki bilgiyi yan hücreye atsın. sonra ki bilgi de diğer yan hücreye atsın ve bu şekilde devam etsin