/ / Excel VBA Denetimleri Koleksiyonu

Excel VBA Denetimleri Koleksiyonu

Kullanıcı Formları oluştururken Excel VBA, kullanabilirsiniz Denetimleri toplar Kontroller arasında kolayca geçiş yapmak ve her kontrolün bir özelliğini belirli bir değere ayarlamak.

Oluşturulacak olan Userform aşağıdaki gibi görünür:

Excel VBA'da Toplama Denetimleri

Bu Kullanıcı Formunu oluşturmak için aşağıdaki adımları uygulayın:

1. Visual Basic Düzenleyicisi'ni açın. Proje Gezgini görünmüyorsa, Görüntüle, Proje Gezgini'ni tıklatın.

2. Ekle, Kullanıcı formu'nu tıklayın. Araç Kutusu otomatik olarak görünmezse, Görünüm, Araç Kutusu'nu tıklatın. Ekranınız aşağıdaki gibi ayarlanmalıdır.

Excel VBA'da Kullanıcı Formu Ekranı Kurulumu

3. Etiketi, metin kutularını (ilk önce üstte, ikincisinin altında ikinci, vb.) Ve komut düğmesini ekleyin. Bu tamamlandıktan sonra sonuç, daha önce gösterilen Kullanıcı Formunun resmi ile tutarlı olmalıdır. Örneğin, Toolbox'tan TextBox'a tıklayarak bir metin kutusu kontrolü oluşturun. Ardından, Userform'a bir metin kutusu sürükleyebilirsiniz.

4. Kullanıcı formu, etiket ve komut düğmesinin altyazısını değiştirmek için Görünüm, Özellikler Penceresi'ne tıklayın ve her bir kontrol üzerine tıklayın.

5. Kullanıcı formunu göstermek için çalışma sayfanıza bir komut düğmesi yerleştirin ve aşağıdaki kod satırını ekleyin:

Private Sub CommandButton1_Click()

UserForm1.Show vbModeless

End Sub

Açıklama: vbModeless ekleyerek, Userform kullanabilir ve çalışma sayfanızda aynı anda çalışabilirsiniz.

Şimdi, Userform'un ilk bölümünü oluşturduk. Zaten düzgün görünüyor olsa da, Userform'daki komut düğmesine tıkladığımızda henüz bir şey olmayacak.

6. Visual Basic Düzenleyicisi'ni açın.

7. Proje Gezgini'nde, UserForm1'e çift tıklayın.

8. Komut düğmesine çift tıklayın.

9. Aşağıdaki kod satırlarını ekleyin:

Private Sub CommandButton1_Click()

Dim i As Integer

For i = 1 To 10
    Controls("TextBox" & i).Value = Cells(i + 1, 1).Value
Next i

End Sub

Açıklama: Sadece birkaç satırlık kodla, metin kutularını telefon numaralarını sayfadan doldurabiliriz. Öğeleri birleştirmek (birleştirmek) için & operatörünü kullandık. Bu kod satırları, metin kutusu denetimleri (TextBox1, TextBox2, TextBox3, vb.) Adlarını değiştirmediğimiz için çalışır. Denetimlerin adlarını değiştirmek için Görünüm, Özellikler Penceresi'ni tıklatın ve her bir denetimi tıklatın.

Sayfadaki komut düğmesine tıkladığınızda sonuç:

Denetimleri Toplama Sonucu

Ayrıca oku: