toplam süre

[egemen46]

arkadaşlar bana exelde kaldığım toplam süreyi verecek bir kodlama arıyorum yardımcı olabilecek var mı ?

 

[Ömer]

Merhaba,

Module kopyalayın ve dosyanızı kapatıp açın. G1 hücresinde ilerleyen zamanı görebilirsiniz.

Sub Auto_Open()
    Application.OnTime Now + TimeValue("00:00:01"), "Zaman"
End Sub
 
Sub Zaman()
    DoEvents
    With Sheets("Sayfa1")
        .Range("G1") = Format(.Range("G1") + CDate("00:00:01"), "hh:mm:ss")
    End With
    Auto_Open
End Sub
 
Sub Auto_Close()
    Sheets("Sayfa1").[G1] = 0
End Sub

.

 

[egemen46]

teşekkürler yardımınız için...

 

[baronbey]

ben anlayamadım? module derken yani nereye? kusura bakmayın daha yeniyim

 

[Ömer]

Merhaba,

Linki inceleyiniz.

Modül Ekleme (Resimli Anlatım)

.