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ı
- 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 -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenen Module(1) yazısına çift tıklayın.
- Ü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.
GIPHY App Key not set. Please check settings