VBA Code to Create a Data Validation Drop-down List in Excel

by

VBA Code:

Sub CreateDropDownList()
    Dim rng As Range
    Dim validationRange As Range
    Dim validationFormula As String
    
    ' Set the range where the drop-down list will be created
    Set rng = Range("A1:A10") ' Change the range as desired
    
    ' Set the range of values for the drop-down list
    Set validationRange = Worksheets("Data Sheet").Range("B1:B5") ' Change the sheet name and range as desired
    
    ' Set the validation formula for the drop-down list
    validationFormula = "=" & validationRange.Address
    
    ' Apply the data validation to the range
    With rng.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Formula1:=validationFormula
        .IgnoreBlank = True
        .InCellDropdown = True
        .ShowInput = True
        .ShowError = True
    End With
End Sub

Check All VBA Codes

Join Our Telegram Group techguruplus telegram group Join Our WhatsApp Group techguruplus whatsapp group
Nazim Khan - Author Image

Nazim Khan (Author) 📞 +91 9536250020
[MBA in Finance]

Nazim Khan is an expert in Microsoft Excel. He teaches people how to use it better. He has been doing this for more than ten years. He is running this website (TechGuruPlus.com) and a YouTube channel called "Business Excel" since 2016. He shares useful tips from his own experiences to help others improve their Excel skills and careers.

Leave a Comment