Hücredeki değer her saniye bir artsın

[vivaayew_ts]

Herkese iyi çalışmalar arkadaşlar.
Sorum çok açık excell de simülasyon çalışması yapmaya çalışmaktayım bunun için ilk olarak her saniye değerini 1 arttırdığım bir hücreye ihtiyacım var.
Belki diyeceksiniz simülasyon programları var orda yap ama excelin koşullu eylemler konusunda kolaylıkları mevcut kullandığım programlarda bu çok zor

Çalışmam ilerledikçe sorularım artacaktır inşallah sizlerin sayesinde bitirebileceğim.

Yardımlarınız için teşekkür ederim.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Option Explicit
 
Sub AUTO_OPEN()
    Sheets("Sayfa1").Select
    DoEvents
    Range("A1") = Range("A1") + 1
    Application.OnTime Now + TimeValue("00:00:01"), "AUTO_OPEN"
End Sub

 

[vivaayew_ts]

Sn Korhan Ayhan
acaba bunu userforma taşımamız mümkünmü textbox1 değerimiz sürekli 1 artabilirmi

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

 

[vivaayew_ts]

Çok teşekkür ediyorum Sn Korhan Ayhan
ilerledikçe yeni sorularla karşınıza geleceğim inşallah onlara da çözüm bulabileceğiz.
İyi çalışmalar.