Сделал для себя небольшой теплотехнический расчет футеровки. Хотел чтобы коэффициент теплоотдачи ап (от наружной поверхности к окружающему воздуху) рассчитывался методом итерации. Но при изменении материала слоя или изменении толщины слоя появляется какая-то ошибка в вычислениях. Ошибка происходит не всегда, могу несколько раз поменять толщины слоев, материалы и всё работает. Можно конечно задавать коэффициент ап вручную и методом подбора за несколько проходов получить результат, но хотелось бы автоматизировать это процесс.
Нажмите для просмотра прикрепленного файла

Самостоятельно не могу разобраться с этим вопросом, не хватает знания Excel.

Нажмите для просмотра прикрепленного файла

У вас там замкнутый круг какой-то?
Ак, Ал, зависят от Тн(G17), а в свою очередь Тн(G17) зависит от R0(С23), в свою очередь R0(С23) зависит от Q22(который должен считаться) но он зависит от Р21, который равен Альфа(С26), которая равна Ак+Ал.
Круг замкнулся.

Да понятно, что замкнутый круг. Если я вручную альфа в ячейке Р21 указываю, то за несколько проходов(подстановок) подбираю его равным альфа в ячейке С26. А если ставлю Р21=С26, то по началу вроде бы всё считается, но в какой-то момент при изменении толщины или материала происходит сбой. По этапам вычислений непонятно, что происходит.

По какой-то причине в результате итерационных вычислений ячейке Р21 не присваивается конечно значение альфа из ячейки С26

При обновлении получается вот что:
Нажмите для просмотра прикрепленного файла

а зачем вручную итерировать? я обычно для этого вбиваю число приблизитетльное, потом столбец расчетов , следующий столбец ссылается на предыдущий, копирую второй столбец раз 20 , а конечную цифру уже вставляю расчет для оформления , столбцы для итерации выношу за область печати/скрываю/выношу на другой лист.

А я чтобы уйти от "ошибки" вставляю что-нибудь подобное:
=ЕСЛИ(D15>1;1;B30)
=ТИП(B30)

Функцию "подбор параметра" использовал?

Если вопрос ко мне, то нет. Я вообще профан :-)

итерации реализованы в эксель вот здесь

Кажется, это называется "подбор".

(полуручная операция)

Понятно, но не то что я хочу добиться

Экхе... не понял.

в 2003 экселе в меню сервис-параметры -вычисления можно установить (изменить) число иттераций и погрешность.
Я уже выкладывал маленький макрос с использованием функции "Подбор параметра"

Я пробовал менять и количество итераций и точность

Вроде все работает

Что это?
Нажмите для просмотра прикрепленного файла

Сумневаетесь?

Файлик то ваш. Я с ним ничего не делал, почти. )
Насколько я понял, экселька во время итераций пробует подставить ноль в знаменатель. После этого выдает на горА ошибку.
Лечил так: стер "закольцовку", написал в ячейку(P21) значение больше нуля (0,5), экселька всё посчитала, потом в эту же ячейку вбиваем формулу (=C26) и все работает.

Ну я в принципе так и делал

Проблемка.
Тогда предлагаю так

А макрос напишите сами. Ибо не даёт загрузить на форум такие файлы. )

Sub Restartik()
'
' Restartik Макрос
'
' Сочетание клавиш: Ctrl+r
'
Range("P21").Select
ActiveCell.FormulaR1C1 = "1"
Range("P21").Select
ActiveCell.FormulaR1C1 = "=R[5]C[-13]"
Range("P22").Select
End Sub

Спасибо. С этим всё получилось.

Если меняю значение температуры в печи на к конкретном листе расчета для цил. обечайки, свода, и т.д., то всё работает нормально, но если пытаюсь задать эту же температуру на листе "Данные" (ячйка связана с каждым листом) происходит сбой.

старт лучше сделать не по Ctrl+r, а по событию изменения содержимого ячейки...Почитайте, например здесь

Круто! Спасибо, не придется тыкать кнопки :-)!

Дело в том, что макрос не помогает, но мне вроде удалось победить это проблему