Excel'de veri doğrulama açılır listesinde varsayılan değer nasıl ayarlanır?

Veri doğrulama açılır listesinde bir varsayılan değer ayarlamak, başkalarının çalışma sayfasındaki açılır liste hücrelerini kolayca ve hızlıca tanımlamasına yardımcı olur. Bu makale, veri doğrulama açılır listesinde VBA yöntemiyle bir varsayılan değer ayarlama konusunda ayrıntılı bilgi sunmaktadır.

VBA kodu ile veri doğrulama açılır listesinde varsayılan değer ayarlama

VBA kodu ile veri doğrulama açılır listesinde varsayılan değer ayarlama

Aşağıdaki ekran görüntüsünde olduğu gibi, B2:C7 aralığındaki tüm hücrelerin açılır listesi olduğunu ve bu açılır listelerde (örneğin - Listeden seçiniz -) bir varsayılan değer ayarlamak istediğinizi varsayalım. Aşağıdaki VBA kodunu deneyebilirsiniz.

1. Varsayılan değer ayarlamak istediğiniz açılır listeler içeren sayfa sekmesine sağ tıklayın ve ardından menüden Görünüm Kodu'nu seçin.

2. Microsoft Visual Basic for Applications penceresinde, aşağıdaki VBA kodunu kopyalayıp Kod penceresine yapıştırın.

VBA kodu: Veri doğrulama açılır listesinde varsayılan değer ayarlama

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 Sub

Not: VBA kodundaki varsayılan değeri ihtiyacınız olanla değiştirebilirsiniz.

6. Kodu çalıştırmak için F5 tuşuna basın. Aşağıdaki ekran görüntüsünde gösterildiği gibi, varsayılan değerlerin tüm açılır liste hücrelerine eklendiğini görebilirsiniz.

Notlar:

Kutools AI ile Excel Sihirini Keşfedin

• Akıllı Yürütme: Hücre işlemleri gerçekleştirin, verileri analiz edin ve grafikler oluşturun—tümü basit komutlarla sürülür.
• Özel Formüller: İş akışlarınızı hızlandırmak için özel formüller oluşturun.
• VBA Kodlama: VBA kodunu kolayca yazın ve uygulayın.
• Formül Yorumlama: Karmaşık formülleri kolayca anlayın.
• Metin Çevirisi: Elektronik tablolarınız içindeki dil engellerini aşın.

Yapay zeka destekli araçlarla Excel yeteneklerinizi geliştirin. Şimdi İndirin ve daha önce hiç olmadığı gibi bir verimlilik deneyimi yaşayın!

İlgili makaleler:

• Excel açılır listesinde yazarken otomatik tamamlama nasıl yapılır?
• Excel'de açılır liste takvimi nasıl oluşturulur?
• Excel'de aranabilir bir açılır liste nasıl oluşturulur?
• Excel'de çoklu seçim veya değer içeren bir açılır liste nasıl oluşturulur?
• Excel açılır listesinden değer seçildiğinde diğer hücreleri otomatik doldurma nasıl yapılır?