How to create Drop Down List with Multiple Selections or Values in Excel



In this video, You will learn How to create Drop Down List with Multiple Selections in Excel

VBA Code:
Private Sub Worksheet_Change ( ByVal Target As Range ) Dim xRng As Range Dim xValue1 As String Dim xValue2 As String If Target.Count > 1 Then Exit Sub On Error Resume Next Set xRng = Cells.SpecialCells ( xlCellTypeAllValidation ) If xRng Is Nothing Then Exit Sub Application.EnableEvents = False If Not Application.Intersect ( Target, xRng ) Is Nothing Then xValue2 = Target.Value Application.Undo xValue1 = Target.Value Target.Value = xValue2 If xValue1 <> "" Then If xValue2 <> "" Then If xValue1 = xValue2 Or _ InStr ( 1, xValue1, ", " & xValue2 ) Or _ InStr ( 1, xValue1, xValue2 & "," ) Then Target.Value = xValue1 Else Target.Value = xValue1 & ", " & xValue2 End If End If End If End If Application.EnableEvents = True End Sub

No comments

Powered by Blogger.