「excel」の編集履歴（バックアップ）一覧に戻る

excel - (2007/11/17 (土) 09:50:24) のソース

'現在のアクティブセルの位置を調べる。
   y = ActiveCell.Row                            
   x = ActiveCell.Column                         

'Cells(y, x)でセルの位置を指定する。代入可能。
  Cells(y, x).Interior.ColorIndex = 6	色の変更
  Cells(y, x).Interior.Pattern = xlUp	パターンの変更
  Cells(y, x).Interior.PatternColorIndex = xlAutomatic	パターン色の変更
  この値は、マクロを記録してVBAで見るのが簡単。

http://www.geocities.co.jp/HeartLand-Kaede/9186/loan013.html#b
元利均等計算
Excelに用意されている以下の財務ワークシート関数を使用して算出しています。
　返済額・融資金額に関してはボーナス併用をサポートしていますが、ボーナス分は無条件に６ヶ月間隔、初回ボーナス返済までの月数６ヶ月として計算されます。

　①返済額 ＝ PMT（金利, 期間, 融資金額）
　　小数点以下は切り捨てます。

　②融資金額 ＝ PV（返済額、金利、返済期間）
　　小数点以下は切り捨てます。

　③返済期間 ＝ NPER（融資金額、毎月返済額、金利）
　　小数点第３位以下は切り捨てます。

　④金利 ＝ RATE（融資金額、毎月返済額、返済期間）
　　小数点第６位以下は切り捨てます。

なお、③、④は毎月返済額をもとに計算しますので、ボーナス分の金額を入力しても無視します。
ボーナス分の金額で算出したい場合は、概算としてボーナス分融資金額は毎月分融資金額の概ね半分、ボーナス分返済金額は概ねボーナス分返済額の概ね６倍の金額として算出してみてください。