Выделяем по дням, в которые было промо, было в верхней строке, я удалила. Нужно чтобы посчиталось среднее в дни промо

Пример расчета во вложении. Желтым выделяются ячейки вручную

Добрый день!
Помогите, пожалуйста, решить задачу:
Есть таблица, некоторые ячейки залиты желтым (выделила их желтым цветом, заливку в примеру не получилось сделать)

ЯБЛОКИ	54	65	89	57	34	35
ГРУШИ	56	75	57	57	57	68
СЛИВЫ	35	57	68	68	78	43

Нужно перенести в другую таблицу на другой вкладке по значениям, усредняя ячейки выделенные желтым

Яблоки	Срзнач(54;89;57)
Груши	Срзнач(57;68)
Сливы	Срзнач(57;78;43)

Как сделать чтобы считалось среднее по желтым ячейкам, + был впр по значениям?

Это так не работает

Всем привет! Использую этот год для множественного выбора выпадающего списка

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

Как удалить некоторые из выбранных значений?

Зачем мы +1 добавляем?

Содержится ли промежуток B2 в ячейках промежутка F2-G2
Сколько дат совпадает?

surkenny
Cпасибо большое за идею, очень логичное рассуждение)

БМВ, это скопировано из эксель;)
непонятно как построить график с изменением в процентах без создания дом столбца и расчёта вручную этих процентов

deleted

Коллеги, добрый день!
Подскажите, пожалуйста, как рассчитать прогноз в данном случае