Checkbox ile Exceli Kapatıp Açma

Checkbox ile Exceli Kapatıp Açma isimli kod, Excel’i açma ve kapatma için CheckBox nesnesi ile işlev yürütülmesini sağlamaktadır.

Private Sub CheckBox1_Click()
If CheckBox1 Then
    CheckBox1.Caption = "Exceli Kapat"
    Application.Visible = 1
Else
    CheckBox1.Caption = "Exceli Aç"
    Application.Visible = 0
End If
End Sub

Checkbox ile Exceli Kapatıp Açma Uygulama Adımları

1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
2. 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.
3. Araç çubuklarından Insert -> Module yazısına tıklayın.
4. Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
5. Alt kısma eklenen Module(1) yazısına çift tıklayın.
6. Üstteki kodu yapıştırın.

Kod Açıklaması

CheckBox, Userform nesneleri üzerinde kullanılan bir nesnedir. Bu nesne ile, tikleme yapmak suyretiyle işlemler yapılmaktadır. Sonuçlar, True ya da False şeklinde dönmektedir. Benzer şekilde ihtiyaçlarınız için kolayca kullanabilirsiniz.