Список с мультивыбором
Подскажите как можно сделать в одной ячейке - мультивыбор (несколько вариантов одновременно) из списка, так чтобы во второй ячейке для соответствующих этим вариантов значений из второго списка происходило сложение?
Т.е есть:
Вар1-10.
Вар2-20.
Вар3-40.
В ячейке я должен выбрать Вар1,Вар3 и в другой получить 50
Про мультивыбор гугл сразу выдаёт пример макроса, но как его доработать не знаю
Ответы (2 шт):
Автор решения: Tilek Samiev
→ Ссылка
Вот код макроса мультивыбора. Только он суммирует в ту же ячейку, а не в отдельную.
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("C2:C5")) Is Nothing And Target.Cells.Count = 1 Then
Application.EnableEvents = False
newVal = Target
Application.Undo
oldval = Target
If Len(oldval) <> 0 And oldval <> newVal Then
Target = Target + newVal
Else
Target = newVal
End If
If Len(newVal) = 0 Then Target.ClearContents
Application.EnableEvents = True
End If
End Sub
Автор решения: vikttur
→ Ссылка
Решение по объединению данных уже есть, Вы сами его нашли по ссылке.
Для суммирования впишите формулу
=СУММПРОИЗВ(ЕЧИСЛО(ПОИСК($A$2:$A$10;C2))*$B$2:$B$10)