MsgBox

[serkankeser]

Herkese iyi günler.
Kodlar çalıştıktan sonra açılan msgbox'ın butonana tıklamadan 5 saniye sonra kapanan msgbox kodları konusunda yardım almak itiyorum arkadaşlar.
İlgilenen arkadaşlara teşekkürler.
Sub Mesaj ()
.......
.......kodlar çalışacak
MsgBox "işlem tamam" '5 saniye sonra kendiliğinden kapanacak

Exit Sub

 

[Orion1]

Aşağıdaki kodu deneyiniz..

Sub Deneme()
Msg = CreateObject("WScript.Shell").Popup("5 Saniye sonra kapanacaktır", 5, "UYARI")

End Sub

 

[hsayar]

olmuyor hocam ben denedim

 

[Orion1]

Ekli dosyayı inceleyiniz.

 

[hsayar]

ben içimden 10 kadar saydım kapanmamıştı ... demek 20 ye kadar saymak lazımmış

 

[serkankeser]

Sayın Orion2 cevabınıza henüz bakabildim. Çok teşekkür ederim.
Herkese iyi çalışmalar.