Не обновляется формула - VBA
Формулировка задачи:
Последний вопрос на сегодня...
Есть пользовательская функция, но при изменении значений (переменных для данной функции) ответ не изменяется. Нужно жать F2 в ячейке ответа, энтер, и только потом формула пересчитывается.
Люди подскажите как решить эту проблему, если это возможно?
Спасибо!
Решение задачи: «Не обновляется формула»
textual
Листинг программы
If WorksheetFunction.CountIf(Range("AKTIV_RANGE"), KONTS) = 1 Then Bsaldo = Ssaldo + Result Else If WorksheetFunction.CountIf(Range("PASSIVE_RANGE"), KONTS) = 1 Then Bsaldo = Ssaldo - Result Else ************ A chto esli ti padaesh' v etu yamu? ************************ End If End If Tozhe otnositsya k For r = 1 To Kredits.Rows.Count If KNosaukums(r) = Nosaukums Then If Kredits(r) = KONTS Then If Kbrokeris(r) = Brokeris Then If ValutKods(r) = Valuta Then Result = Result - summa(r) Else ???????? End If Else ???????? End If Else ???????? End If Else ??????? End If Next r