Excel'de veri doğrulama açılır listesinde varsayılan bir değer nasıl ayarlanır?
Veri doğrulama açılır listesinde varsayılan bir değer belirlemek, başkalarının aşağı açılır liste hücrelerini bir çalışma sayfasında bir bakışta kolayca tanımlamasına yardımcı olur. Bu makale, ayrıntılı olarak veri doğrulama açılır listesinde varsayılan bir değer ayarlamak için bir VBA yöntemi sağlar.
VBA kodu ile veri doğrulama açılır listesinde varsayılan bir değer ayarlayın
VBA kodu ile veri doğrulama açılır listesinde varsayılan bir değer ayarlayın
Aşağıdaki ekran görüntüsü gibi, B2: C7 aralığındaki tüm hücrelerin açılır liste içerdiğini ve varsayılan bir değer ayarlamak istediğinizi varsayalım (diyor - Listeden seç -) bu açılır listeden değerleri seçmeden önce. Aşağıdaki VBA kodunu deneyebilirsiniz.
1. Varsayılan bir değer belirlemeniz gereken açılır listelerin bulunduğu sayfa sekmesine sağ tıklayın ve ardından Kodu Görüntüle Menüden.
2. içinde Uygulamalar için Microsoft Visual Basic penceresinde, aşağıdaki VBA kodunu Kod penceresine kopyalayıp yapıştırın.
VBA kodu: veri doğrulama açılır listesinde varsayılan bir değer ayarlayın
Sub DropDownListToDefault()
Dim xCell As Range
Dim xRg As Range
Dim xAcCell As Range
Dim xScreen As Boolean
On Error Resume Next
Set xAcCell = Application.ActiveCell
Set xRg = ActiveSheet.UsedRange.SpecialCells(xlCellTypeAllValidation)
If xRg Is Nothing Then
MsgBox "No data validation drop-down lists in current worksheet", vbInformation, "Kutools for Excel"
Exit Sub
End If
xScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
If xCell.Validation.Type = 3 Then
If xCell.Value = "" Then xCell.Value = "'- Choose from the list -"
End If
Next
xAcCell.Select
Application.ScreenUpdating = xScreen
End Subnot: VBA kodundaki varsayılan değeri ihtiyaç duyduğunuz değerle değiştirebilirsiniz.
6. Tuşuna basın. F5 kodu çalıştırmak için anahtar. Varsayılan değerlerin, aşağıda gösterilen ekran görüntüsü gibi tüm açılır liste hücrelerine eklendiğini görebilirsiniz.
notlar:
İlgili yazılar:
- Excel açılır listesine yazarken otomatik tamamlama nasıl yapılır?
- Excel'de bir açılır liste takvimi nasıl oluşturulur?
- Excel'de aranabilir bir açılır liste nasıl oluşturulur?
- Excel'de birden çok seçim veya değer içeren açılır liste nasıl oluşturulur?
- Excel açılır listesindeki değerleri seçerken diğer hücreleri otomatik olarak nasıl doldurabilirim?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği 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, Office'e Sekmeli Arayüz 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!
