VBA'da bir Seçenek tuşu Bir kullanıcının birkaç seçenek arasından seçim yapmasını sağlamak için. Bir Seçenek düğmesi genellikle Kullanıcı Formlarında kullanılır, ancak Çalışma Sayfasında da kullanılabilir. Bu öğreticide, bir Seçenek düğmesinin nasıl oluşturulacağını, VBA'da bir kullanıcı seçiminin nasıl alınacağını ve kodda nasıl kullanılacağını öğreneceksiniz.
Bir Onay Kutusunun nasıl oluşturulacağını öğrenmek istiyorsanız, buraya tıklayın: VBA Onay Kutusu
Bir Seçenek Düğmesi Oluşturun
Çalışma Sayfasına bir Seçenek düğmesi eklemek için şuraya gitmeniz gerekir: Geliştirici sekmesi, Tıklayın Sokmak ve ActiveX Denetimleri altında seçin Seçenek tuşu:
Resim 1. Çalışma Sayfasına bir Seçenek düğmesi ekleyin
Eklediğiniz Seçenek düğmesini seçtiğinizde, üzerine tıklayabilirsiniz. Özellikler altında Geliştirici sekmesi:
Resim 2. Seçenek düğmesi Özelliklerini değiştirin
Burada Seçenek düğmesinin farklı özelliklerini ayarlayabilirsiniz. Başlangıç için, niteliği değiştirdik İsim ile optOptionButton1. Artık VBA kodunda bu isimle Option butonunu kullanabiliriz.
Ayrıca, Seçenek düğmesinin yanında görünen metni şu şekilde değiştirdik: Erkek. Bunu yapmak için özniteliği ayarlamanız gerekir. Altyazı.
Bir kullanıcının cinsiyet seçmesine izin vermek istediğimizden, tüm süreci başka bir Seçenek düğmesi için tekrarlayacağız. İkincisinin adı var optOptionButton2, başlık açıkken Dişi. Mevcut olanı kopyalayıp özellikleri değiştirerek yeni bir Seçenek düğmesi de oluşturabilirsiniz. Şimdi Çalışma Sayfamızda iki seçenek düğmesi var:
Resim 3. İkinci Seçenek düğmesini ekleyin
VBA'da Seçilmiş Bir Seçenek Düğmesi Alın
Bir Seçenek düğmesinin amacı, bir kullanıcı kararı almaktır. Örnekte nasıl yazılacağını göstereceğiz Erkek C3 hücresinde Seçenek düğmesi 1 seçilirse veya Dişi ikincisi seçilirse. Her Seçenek düğmesi, seçildiğinde tetiklenen bir olaya sahiptir - Tıklamak.
Bu nedenle ilk Option butonu için event içerisine aşağıdaki kodu koymamız gerekmektedir. Tıklamak nesnenin optOptionButon1:
| 123456789 | Özel Alt optOptionButton1_Click()Sheet1.optOptionButton1.Value = True iseSheet1.Range("C3") = "Erkek"BitirAlt Bitiş |
Benzer şekilde, bu kodu olaya koyacağız Tıklamak nesnenin optOptionButton2:
| 123456789 | Özel Alt optOptionButton2_Click()Sheet1.optOptionButton2.Value = True iseSheet1.Range("C3") = "Dişi"BitirAlt Bitiş |
Seçenek düğmesinin değeri,Değer nesnenin niteliği optOptionButton1 veya optOptionButton2. Seçenek düğmesinin değeri, seçilirse doğru, seçilmezse yanlış olabilir.
Resim 3. İlk Seçenek düğmesi seçiliyse Erkek Döndür
Resim 3'te gördüğünüz gibi ilk Option butonuna tıkladık. Bu nedenle, değeri Sheet1.optOptionButton1.Value doğrudur, bu nedenle C3'teki sonuç Erkek.
Resim 4. İkinci Seçenek düğmesi seçiliyse Kadını Geri Döndür
Önceki örneğe benzer şekilde, C3'ün değeri şu şekilde değiştirilir: Dişi, ikinci Seçenek düğmesini seçtiğimiz gibi. Bu durumda, prosedür optOptionButton2_Click() tetiklenir.
Kullanıcı formunda bir Seçenek düğmesi kullanın
Bahsettiğimiz gibi, Seçenek düğmesi en çok Kullanıcı formlarında kullanılır. Bunu nasıl yapabileceğinizi açıklamak için önce bir Kullanıcı Formu ekleyeceğiz. VBA düzenleyicide, Modül adına sağ tıklayın, üzerine tıklayın. Sokmak ve Seç Kullanıcı Formu:
Resim 5. Bir Kullanıcı Formu Ekle
Ekleme denetimlerini görüntülemek için, araç kutusu. Bunu yapmak için, üzerine tıklayınaraç kutusu araç çubuğundaki simge. Bundan sonra, mevcut tüm kontrollerle pencereleri alacaksınız. üzerine tıklayabilirsinizSeçenek tuşu bunu Userform'da oluşturmak için:
Resim 6. Kullanıcı formuna bir Seçenek düğmesi ekleyin
Özellikler penceresinde, Option düğmesinin adını optOptionButton1 ve başlığını olarak değiştiriyoruz. Erkek. Benzer şekilde, Kadın için başka bir Seçenek düğmesi oluşturduk. Kullanıcı formunu çalıştırdığımızda iki Seçenek düğmesi elde ederiz:
Resim 7. Userfo'daki İki Seçenek düğmesirm
Seçili bir Seçenek düğmesi almak istiyorsanız, makalenin önceki bölümlerinde açıklanan Çalışma Sayfası ile aynı mantığı kullanmanız gerekir.
