MsgBox sorunu

[kimfx]

Merhaba arkadaşlar

Ben çalıştırdığım bir makronun zamanını ölçmek istiyorum; makronun başına (basla= time) ve sonuna (Bitir=Time) dedim daha sonra (Zaman=(bitir-Basla)) dedim MsgBOx zaman diyince yaklaşık 63 saniye süren zamanı msgbox kutusu 6.0712586 gibi bir değer gösteriyor bunu saniye veya dakika cinsinden nasıl gösterebilirim. Yardımlarınız için teşekkürler

 

[Haluk]

[vb:1:b0a0b21078]Sub Test()
Dim Start As Double, Finnish As Double, i As Double
Start = Time
For i = 1 To 100000
DoEvents
i = i + 1
Next
Finnish = Time
MsgBox Format(Finnish - Start, "hh:mm:ss")
End Sub
[/vb:1:b0a0b21078]

 

[kimfx]

Çok Teşekkür ediyorum. Excel vadisinin Raider"i