Sayfa1 excel açılırken 10 saniye gözüksün.

[Orion1]

Merhabalar.
Sayfa1 excel açılırken 10 saniye gözüksün.Sonra sayfa2 seçilsin.
Teşekkür ederim.
İyi çalışmalar.

 

[Levent Menteşoğlu]

Application.wait metodu ile

[vb:1:cecfffc75f]Sub Autpen()
Sheets("sayfa1").Select
Application.Wait Now + TimeValue("00:00:10")
Sheets("sayfa2").Select
End Sub
[/vb:1:cecfffc75f]

Application.ontime metodu ile

[vb:1:cecfffc75f]Sub Autpen()
Sheets("sayfa1").Select
zaman = Now + TimeValue("00:00:10")
Application.OnTime zaman, "sayfasec"
End Sub

Sub sayfasec()
Sheets("sayfa2").Select
End Sub[/vb:1:cecfffc75f]

 

[Orion1]

Merhabalar.
Teşekkür ederim.
iyi çalışmalar.
:hey: