Selecting multiple items in drop down list across multiple columns not working. How do I correct the VBA code?

Question

I want to ensure all the columns indicated that have a drop down list have the ability to select multiple items.

Private Sub Worksheet_Change(ByVal Target As