Çalışma Kitabı açıkken belirtilen verilerle birleşik giriş kutusu nasıl doldurulur?
Normalde, birleşik giriş kutusu özelliklerinin ListFillRange alanına hücre referanslarını girerek birleşik giriş kutusunu (ActiveX Denetimi) belirli bir hücre verisi aralığıyla doldurabilirsiniz. Bir birleşik giriş kutusunu, özelliklerini manuel olarak belirtmeden doğrudan belirtilen verilerle doldurmak istiyorsanız, bu makaledeki yöntem size yardımcı olabilir.
Bir birleşik giriş kutusunu belirtilen verilerle VBA kodu ile doldurun
Bir birleşik giriş kutusunu belirtilen verilerle VBA kodu ile doldurun
Bu yöntem, bir birleşik giriş kutusunu belirtilen verilerle doğrudan açık çalışma kitabında doldurmanıza yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın.
1. Tuşuna basın. Ara Toplam + F11 anahtarları aynı anda açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. içinde Uygulamalar için Microsoft Visual Basic pencere, çift tıklayın Bu Çalışma Kitabı sol bölmede Bu Çalışma Kitabı kod editörü. Ve sonra VBA kodunu içine kopyalayın. Ekran görüntüsüne bakın:
VBA kodu: çalışma kitabı açıkken belirtilen verilerle birleşik giriş kutusu doldurun
Private Sub Workbook_Open()
'Updated by Extendoffice 2018/1/30
With Sheet1.ComboBox1
.Clear
.AddItem "Select a Fruit"
.AddItem "Apple"
.AddItem "Banana"
.AddItem "Peach"
.AddItem "Pineapple"
.AddItem "Watermelon"
.Text = .List(0)
End With
End Sub
notlar:
3. Çalışma kitabını farklı kaydedin Excel Makro Etkin Çalışma Kitabı biçimlendirin ve kapatın.
4. Çalışma kitabını yeniden açın, açılan kutunun aşağıdaki ekran görüntüsü gibi belirtilen verilerle doldurulduğunu göreceksiniz:
İlgili yazılar:
- Combo Box değerini Excel'deki etkin hücreye nasıl kopyalarım?
- Excel'de açılan kutu çıktısında tarih biçimini nasıl görüntüleyebilirim?
- Excel'de birleşik giriş kutusuna yazmayı nasıl önleyebilir veya devre dışı bırakabilirim?
- Combo Box, Excel'deki Adlandırılmış Aralık verileriyle nasıl doldurulur?
En İyi Ofis Üretkenlik Araçları
Excel Becerilerinizi Güçlendirin Kutools for Excelve Verimliliği Daha Önce Hiç Olmadığı Şekilde Deneyimleyin. Kutools for Excel Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab Sekmeli arabirimi Office'e getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
