Подскажите, пожалуйста формулу или макрос, где можно сравнить итоговые результаты и отдельные компоненты разных сценариев между собой.
К примеру в текущей ситуации при выборе "сценария 1" значения показываются исключительно по данному сценарию:
Цена
Кол-во
Фин.рез
Сценарий 1
100
20
50
Сценарий 2
-
-
-
Сценарий 3
-
-
-
Сценарий 4
-
-
-
Сценарий 5
-
-
-
Сценарий 6
-
-
-
Сценарий 7
-
-
-
Сценарий 8
-
-
-
А хотелось бы сделать так:
Цена
Кол-во
Фин.рез
Сценарий 1
100
20
50
Сценарий 2
500
2
2
Сценарий 3
800
15
8
Сценарий 4
122
21
80
Сценарий 5
848
35
80
Сценарий 6
98
54
30
Сценарий 7
541
12
10
Сценарий 8
51
212
40
К сожалению простым "copy paste" это не исправить так как в модель заложены разные параметры и необходимо их изменять, чтобы смотреть на результаты с учетом изменяемых параметров.
Подобные сценарии создавались не через диспетчер сценариев, а через формулы "IF" (также и формулы в модели зашиты через "IF").
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("e4:j6")) Is Nothing Then
Application.ScreenUpdating = False
s = Range("n10")
Application.EnableEvents = False
For I = 1 To 5
Application.EnableEvents = False
Range("n10") = I
Application.Calculate
Range("E28:E30").Offset(, I - 1).Value = Range("E28:E30").Offset(-5, I - 1).Value
Next I
Application.EnableEvents = True
Range("n10") = s
Application.ScreenUpdating = True
End If
End Sub