Otomatik olarak önce UserForm ardından Excel açılsın

[Believing]

Değerli arkadaşlar,

Bir Excel çalışma kitabına karşılama sayfası koyma istiyorum. Buna göre otomatik olarak, önce UserFormun açılmasını ve 5 saniye sonra Userformun otomatik olaraka kapanarak Excel çalışma kitabının açılmasının nasıl sağlayabilirim.

Saygılarımla,

 

[Korhan Ayhan]

Merhaba,

Dosyanızın "ThisWorkbook" ya da "BuÇalışmaKitabı" bölümüne aşağıdaki kodu uygulayın.

Private Sub Workbook_Open()
    UserForm1.Show
End Sub

Userformunuzun kod bölümüne;

Private Sub UserForm_Activate()
    Application.Wait Now + TimeValue("00:00:05")
    Unload Me
End Sub

Dosyanızı kayıt edip kapatıp açın ve sonucu gözlemleyin.

 

[Believing]

Sayın Korhan bey,

Konuya gösterdiğiniz ilgi ve yardım için çok teşekkür ederim.
ALLAH sizden razı olsun.

Saygılarımla.