By kpoll у п’ятницю, 17 березня 2023 р
Опубліковано в перевершувати
відповіді 0
симпатії 0
думки 1.6K
Голосів 0
Я все ще досить початківець користувач VBA і дуже самоучка. Я намагаюся написати макрос, який використовуватиме значення в одній клітинці для запуску макросу, який містить формулу в іншій клітинці. У мене є макрос, який працює, але я не можу зрозуміти, як змусити його працювати для діапазону клітинок. Будь ласка, перегляньте нижче та порадьте, як я можу змінити це, щоб воно запускалося для мого діапазону O6:O26. Зрештою я матиму 7 різних формул, які можна вибрати, і, отже, матиму більше, якщо цільові рівні варіанти в цьому розділі. Це перший біт, який я хотів би змінити, щоб я міг змусити його працювати для діапазону, а не лише для однієї комірки.
Дякую!

Підформула()
'
Макрос формули
Встановити ціль = Діапазон ("O6")
Якщо target.Value = "1" Тоді
Виклик Macro1
End If
Якщо target.Value = "2" Тоді
Виклик Macro2
End If
End Sub

_________________________________________________________________________________________
Підмакрос1()
'
' Макрос1 Макрос

Діапазон ("P6"). Виберіть
ActiveCell.FormulaR1C1 = _
"=(1.08)/(0.06+(0.08*(RC[-2])))"
'
End Sub

_____________________________________________________________________________________________
Підмакрос2()
'
' Макрос2 Макрос
'
Діапазон ("P6"). Виберіть
ActiveCell.FormulaR1C1 = _
"=(1.06)/(0.08+(0.08*(RC[-2])))"
'
End Sub
Переглянути повне повідомлення