UserForm Kapatma Kodu
UserForm Kapatma Kodu isimli kod örneğinde verdiğimiz kısa kodu kullanarak, bir UserForm nesnesinin kapatılmasını sağlayabilirsiniz.XD Destek İste
Private Sub CommandButton1_Click()
End
End Sub
Gerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> UserForm yazısına tıklayın.
- Solunda klasör simgesi olan Forms yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek olan UserForm(1) yazısına çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
Kodun doğru bir şekilde test edilmesi için bir UserForm ve üzerine eklenmiş bir CommandButton nesnelerine ihtiyaç vardır.
Etiketler
|YARARLI KISAYOLLAR|
|Bir sonraki sonucu bulma||Shift F4|
|Kopyala Kısayolu||Ctrl C|
|Yazdırma||Ctrl P|
|Bir Ekran Sağa Git||Alt PgDn|
|Bul Penceresini Açma||Ctrl F|
Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Close True End Sub