more than one multiple select pick-list on one worksheet

[brandme]

How do I get more than one multiple pick-lists to work on the same worksheet?
Not looking for help with related/dependant pick-lists.

I copied some basic vba code for creating a multiple select pick-list and it worked just fine.
But I want to have more than one multiple select pick-list on one worksheet.
example:
column B has a multiple select pick-list of one, two three

column D has a multiple select pick-list of dog, cat, cow

column G has a multiple select pick-list of red, yellow, green

the three pick-lists are not related/dependent on each other.

I thought there would be a way in the code to say, for this column do this, for this column do this...but did not see anything I thought would work

thanks

 

[My Aswer Is This]

You said:

one multiple pick-lists​

Do you mean a data validation list?

I have never heard the term:

multiple pick-lists

Show me the code you have.
​

 

[brandme]

VBA code for to more than one multiple selection drop-down list on same worksheet?

I am having trouble trying to have more than one multiple selection drop-down lists on the same worksheet.

The VBA code I have works for ONE multiple selection drop-down list. But I didn't see a way to alter or add code so that I can have more than one multiple selection drop down lists on the same worksheet?

One worksheet I am working on would have at least 5 separate multiple selection drop-down lists on the same worksheet.



Private Sub Worksheet_Change(ByVal Target As Range)


Dim Oldvalue As String
Dim Newvalue As String


On Error GoTo Exitsub
If Target.Column = 12 Then
If Target.SpecialCells(xlCellTypeAllValidation) Is Nothing Then
GoTo Exitsub
Else: If Target.Value = "" Then GoTo Exitsub Else
Application.EnableEvents = False
Newvalue = Target.Value
Application.Undo
Oldvalue = Target.Value
If Oldvalue = "" Then
Target.Value = Newvalue
Else
Target.Value = Oldvalue & ", " & Newvalue
End If
End If
End If
Application.EnableEvents = True
Exitsub:
Application.EnableEvents = True
End Sub

 

[Fluff]

Cross posted https://www.excelforum.com/excel-pr...lection-drop-down-list-on-same-worksheet.html

Cross-Posting
While we do not prohibit Cross-Posting on this site, we do ask that you please mention you are doing so and provide links in each of the threads pointing to the other thread (see rule 13 here along with the explanation: Forum Rules).
This way, other members can see what has already been done in regards to a question, and do not waste time working on a question that may already be answered.