Вот когда-то делал для знакомых - поиграться!
Просьба если будут косяки не судить строго - это был мой второй макрос!
А потом переделывать необходимости не было!

Пролестни ниже там ведь на каждый месяц считается из фактического количества дней, хотя может я чего-то не понял.
Именно поэтому нужно выкладывать файл с проблемой и почётче описывать задачу!

А пароль к модулю дашь, а то события задолбали отключить хочу!
В целом создаётся впечатление что перемудрено, всё как то сложно!

KL (XL) DeggasadА пароль к модулю дашь, а то события задолбали отключить хочу!
В целом создаётся впечатление что перемудрено, всё как то сложно!

Для того чтобы отключить события, не надо залезать в модули - просто запусти из окна Immediate след. инструкцию




KL
[MVP - Microsoft Excel]

Спаслил с потрохами...
:)

Появилось время - посмотрел!
Конечно пару рублей не хватает:
Твы же сумму процентов ("Відсотки внеску") считаешь факт/365 ,
А сумма аннуитетного платежа ("Сума внеску") у тебя всё равно считается по формуле ПЛТ
А потом ты находишь уплату основного долга ("Капітал внеску") как разницу ("Сума внеску") - ("Відсотки внеску"). Конечно эта сумма не сходится с суммой кредита.

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

Хелпя

Это было в целом моя проблема. Я думал что просто поставив рассчет процентов другим методом все будет считатьь нормально, н окак оказалося это не вышло. По рассчету Deggasad, вашег окалькулятора, я увидел что аннуитет у вас считается суммированием тела кредита и процентов, что как мне известно не есть методом аннуитета.



Так тебе известно или нет что такое аннуитет и как он считается? Если да, то расскажи. Ты же сам говоришь, что ты работник банка?

На мой обывательских взгляд, неоднократно потдверждённый экспериментально, хотя тут особых подтверждений вроде и не нужно, расчёт представленный в прилагаемом мной файле находит как раз аннуитет (специально упрощённый пример сделал для однозначности понимания предлагаемого решения). А там уж как ты будешь проценты считать это твоё дело: хочешь 1/12, хочешь факт/365.

ХелпяВсем доброе утро!!!!

вообщем вроде у меня получилося, т.е. с АБС банка сходится и эт шлавное :)....

Вот по какой формуле я считал аннуитет :)....

Сумма кредита*((СТЕПЕНЬ(1+Месячная комиссия % *факт.к-во дней пользов.кред;Срок кредита)*Месячная комиссия % *факт.к-во дней пользов.кред)/(СТЕПЕНЬ(1+$Месячная комиссия % *факт.к-во дней пользов.кред;Срок кредита)-1))+комисии

Вот такая дурная формула. А Месячная комиссия % я нашел таким вот образом: Номинальную ставку процентов поделил, не на 12, а на 365....

Может кому-то и пригодиться.....

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

http://sql.ru/forum/actualthread.aspx?tid=441374&pg=1&hl=%f5%e5%eb%ef%ff?

а именно предпоследняя сцилка

А фактическое кол-во дней пользования кредитом ведь в каждом месяце разное ???
и в засисимости от этого меняется остаток кредита и соответственно %

Добавлю пожалуй!
Перестаньте мучаться и попробуйте мой пример, а то ведь перестану вас скоро уговаривать, неблагодарное это дело - вы попросили помощи и упорно не хотите её принимать!

А нафига вид менять? Поменяёте принцип расчёта.
Скажите у Вас он считает по той формуле которую вы выложили?

ХелпяСтарый вариант выложенного файла да...новый еще не выкладывал...
проблемс в том, что когда добавил скрипт (что бы в листе приложения скрывались не нужные строки):

If Target = Range("G11") Then
Sheets("2").Rows("21:260").Hidden = False
Sheets("2").Rows(21 + Range("G11").Value & ":" & 260).Hidden = True
End If

выдает ошибочку Run Time error 13: Type mistache. А когда убирай этот скрипт то все в порядке.... как избежать этого и в чем вообще фигня?

Вот уже меня это интересует, а формула раз прошла, значит все

Куда она формула прошла то? Я никак не пойму? Если она неправильно считает? Что у Вас за банк такой?
Выложите для примера расчёт погашения кредита 100 000 со ставкой 20% на 12 с использованием вашей формулы, чтобы было видно уплаченные каждый месяц проценты и сумму основного долга?

ХелпяЯ сразу звЫняюсь за то что морочу голову, но.... мне ексель выдает ошибочку Run Time error 13: Type mistache.

Когда в скрипте ВБА есть такие строчки

Private Sub Worksheet_Change(ByVal Target As Range)

.......... еще текст скрипта

If Target = Range("G11") Then
Sheets("2").Rows("21:260").Hidden = False
Sheets("2").Rows(21 + Range("G11").Value & ":" & 260).Hidden = True
End If
End Sub

Вообщем может эт я переработался, н оя не пойму что вы от меня хтите....может завтра с свежей головой пойму

1) Вопрос остаётся в силе - насчёт формулы
2) Есть ли у Вас лист с наименованием "2" или вам нужен лист с индексом 2, тогда пишите
Sheets(2) - без кавычек
3) Возможно из-за того что у вас лист защищён, нужно при защите разрешить форматирование строк или снимать защиту перед скрытием строк и опять защищать позже!

ХелпяХорошо пасибо......а вот каким скриптом прпопистаь, то что вы мне сказалаи по поводу п.3, ка это сделать?



А на вопрос ответишь?