"kapanırken","açılırken" olaylarının kodsal ifadesi

[takoo]

mrb hocalar. "kapanırken","açılırken" olaylarının kodsal olarak nasıl ifade edilir?mesela filan nesne ,filan görünüm "kapanırken" bir olayı tetiklemek istiyorum da?..

 

[Recep İpek]

Bunun gibi mi?

Açılırken herhangi bir olayı tetiklemek için;

Sub Autpen
Msgbox "Günaydın"
End Sub

Kapanırken herhangi bir olayı tetiklemek için ise;

Sub Auto_Close
Msgbox "Yine Bekleriz"
End Sub

kodlarını kullanabilirsiniz.

 

[takoo]

meraba.ama burada nesnenin isminide belirtmek istiyorum.aslında benim istediğim , baskı önizleme kapanırken.işte bu ifadeyi nasıl yazarız?rica etsem...

 

[Seyit Tiken]

Ne yapmak istediğinizi tahmin ediyorum. Yapmak istediğiniz ile söyledikleriniz farklı. Bir UserForm oluşturarak kodu butuna atayıp deneyin.

Private Sub CommandButton1_Click()
Unload UserForm1
Application.Dialogs(xlDialogPrintPreview).Show
UserForm1.Show 0
End Sub