На этом шаге мы рассмотрим алгоритм создания платежного календаря.
Чтобы в после переноса платежей из файла СистемаБюджетов в файл ДенежныеПотокиБюджет не было необходимости задумываться о том, какие операции нужно выполнять для получения результатов, запишите подпрограмму СозданиеПлатежногоКалендаря (рисунок 1) в файле СистемаБюджетов.
Рис.1. Подпрограмма подготовки отчетов по прогнозируемым денежным потокам
Задача этой подпрограммы заключается в последовательном запуске на выполнение процедур файла ДенежныеПотокиБюджет для получения отчетов, а в частности:
В начале подпрограммы запускается таймер, и по окончанию появляется пользовательское диалоговое окно с указанием времени выполнения программы. Эти строки кода VBA создаются копированием из подпрограммы ПолныйРасчетДенежныхПотоков (рисунок 2) первой и двух последних строк с последующим редактированием последней строки.
Рис.2. Подпрограмма ПолныйРасчетДенежныхПотоков полного расчета модели денежных потоков
Обратите внимание: в строке функции MsgBox указано числовое значение второго аргумента (buttons), равное 48. В этом случае пользовательское диалоговое окно появляется с предупреждающим значком.
Для записи подпрограммы СозданиеПлатежногоКалендаря выполните следующие действия, изначально находясь в файле СистемаБюджетов:
Рис.3. Таблица ежедневных оборотов и остатков денежных средств
Остаток денежных средств по состоянию на 1 августа (конец планируемого периода) в созданной таблице меньше остатка по БДДС на 8 копеек. Это расхождение получено в результате округлений при проведении вычислений;
Рис.4. Параметры недостающих денежных средств и начисленным процентам при условии привлечения кредитной линии
Эта же подпрограмма произведет расчеты для создания диаграммы возможного привлечения и погашения кредитных ресурсов на листе Диаграмма2 (рисунок 5);
Рис.5. График возможного привлечения внешних денежных ресурсов, их возврата и суммарной задолженности
=МЕСЯЦ([СистемаБюджетов.xls]Пульт!$F$2)
После этого нажмите кнопку Заполнение платежного календаря, которой назначена подпрограмма ЗаполнениеПлатежногоКалендаря. На рисунке 6 показан фрагмент сформированного планового платежного календаря за июль 2003 года.
Рис.6. Сформированный платежный календарь на июль 2003 года
Рис.7. График планируемого движения денежных потоков за июль 2003 года
На следующем шаге мы рассмотрим анализ полученных результатов.