Bekletme makrosundaki sanıye degerını hucreden aldırmak

[kneehot]

Arkadaslar merhaba. Aşağıda kullandığım bır makro var bundakı bekletme suresındekı 01 yazan sanıyeyı hucreden aldırmak ıstıyorum. belkı lazım olur dıye yazmak ıstedım sanıyeyı alacağı sayfanın adı LİSTE hucre ıse O1 yardımcı olursanız cok sevınırım. tum yardımlara tesekkurler.

Application.Wait (Now + TimeValue("0:00:01"))

 

[Emir Hüseyin Çoban]

. . .

Sub kod()
    MsgBox "1"
    saniye = Range("A1") / 100000
    Application.Wait (Now + saniye)
    MsgBox "2"
End Sub

. . .

 

[kneehot]

Çok teşekkürler