Финансы

Семья - это основа государства. А раз в государстве есть финансовое планирование, то и семья в теории должна что-то планировать.

При расчёте доходов/расходов неплохо бы иметь процентное соотношение областей расхода. Так даже если у вас средняя зарплата меньше чем у соседней страны, в процентах всё может быть так же. Например при 100% дохода расход скажем формируется

  • Питание 25%
  • Транспорт и Авто 21%
  • Квартира 10%
  • На чёрный день 10%
  • Связь 5%
  • Вечный ремонт 5%

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

Excel sheet

Я сначала подумывал о сложных расчётах типа Microsoft Money , но в итоге не стал изобретать велосипед - сделал всё в Excel файле. Сделаем один Sheet - один месяц. Создатим ячейки типа:

Когда  Что  Где  Сколько 
 12 декабря
Питание  Selver  -42 

В начале каждого месяца будем вписывать сколько денег имеется вообще и каждый день будем добавлять расходы/доходы. В графу "Что" соответсвенно стоит вносить нечто общее - по аналогии с государством это было бы министерство (Здравоохранения, Образования и тп.). Теперь осталось сделать две таблицы - одна для планируемых расходов/доходов, другая для "министерств".

Планируемые расходы/доходы сделать достаточно легко - надо получать сумму из действительных расходов, т.е. сальдо - сколько реально есть денег и из них вычитать планируемые коммунальные расходы, планируемые расходы на питание, большие покупки и тп. В итоге получаем планируемый результат на конец месяца. Умно было бы что-бы всякий раз планируемый результат на конец месяца был больше действительного результата в начале месяца (семья становится богаче).

Таблица для "министерств"  нужна скорей для отчётности и наглядности - сколько куда было потрачено - достаточно выделить такую таблицу и нажать F11,чтобы увидеть примитивный график. Нажав Alt+F11 или зайдя из Excel menu->Tools->Macro->Visual Basic Editor можно получить доступ к редактированию макросов в Visual Basic, а добавив кнопку можно привязать метод Click. Приведу пример схожей функции пробегающей ряды до ряда "Summary" и собирающей "министерства"

Sub Generate()
  i = 1
  Summary = 1
 
 
    Dim projects()
    Dim minutes()
    ReDim projects(i)
    ReDim minutes(i)
  
    'search for data
    Do While Cells(i, 2) <> "Summary"
    projects_canadd = 1
      
        'check if it is in projects array already
        For j = 1 To UBound(projects)
        If (projects(j) = Cells(i, 2)) Then
        projects_canadd = 0
        If (Cells(i, 1) <> "") Then minutes(j) = minutes(j) + Cells(i, 4)
        End If
        Next
    
      
        'insert if we can
        If ((projects_canadd = 1) And (Cells(i, 1) <> "")) Then
            ReDim Preserve projects(UBound(projects) + 1)
            ReDim Preserve minutes(UBound(minutes) + 1)
            projects(UBound(projects) - 1) = Cells(i, 2)
            minutes(UBound(minutes) - 1) = Cells(i, 4)
          
        End If
      
        i = i + 1
        Summary = i
    Loop

    For i = 1 To UBound(projects)
        Cells(Summary + i, 1) = projects(i)
        Cells(Summary + i, 2) = minutes(i)
    Next
End Sub

iPhone splashmoney

Хорошая альтернатива - мобильность обеспечена. Если есть возможность с синхронизацией то вообще супер.

RSS