A1 hücresi kaç kere kullanıldı!

[yasinnn17]

Arkadaşlar A1 hücresinin kaç kere kullanıldığı B1e yazdırma imkanımız varmı?

Yani A1 e tarih verisi giricem günde 10 kere B1e 10 yazması mümkün mü acaba?

 

[Orion1]

Sayfanın kod modülüne.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A1]) Is Nothing Then Exit Sub
Range("B1").Value = Range("B1").Value + 1
End Sub

 

[yasinnn17]

Sayfanın kod modülüne.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A1]) Is Nothing Then Exit Sub
Range("B1").Value = Range("B1").Value + 1
End Sub

hocam eline sağlık fakat makro kullanmayı bilmiyorum yinede sağol

 

[Orion1]

Formülle olmaz dediğiniz işlem.

 

[yasinnn17]

Formülle olmaz dediğiniz işlem.

peki teşekkürler. o halde macro kullanmayı öğreneceğiz

 

[Orion1]

Linkini verdiğim dosyayı inceleyiniz.

DOSYAYI INDIR
.

 

[yasinnn17]

Linkini verdiğim dosyayı inceleyiniz.

DOSYAYI INDIR
.

Hocal Allah razı olsun çok teşekkürler

 

[Orion1]

Rica ederim.
İyi çalışmalar.