前回の内容では、データを打ち込んだだけで、繰越残高が計算されていないので、その追加をします。
そのままシートに算式を入れる方法もありますが、今回はVBAで計算結果を返す形で残高を表示します。
次のようにVBAコードを変更・追加をします。
Worksheets(“Sheet2”).の記述が幾つも重なるので、一度Sheet2をアクティブ
にすることで、Cells()の前にシート名を記載することを不要にします。
そしてCells(a,5)つまりE列の値は、E列の一つ前の値に、C列の値を足して、D列を引くという計算結果
を転記します。
次に転記のコマンドボタンを押したときに、日付と金額をクリアにする設定をします。
テキストファイルの日付と残高に””(空白)を入力してクリアにします。
実行結果です。
今回紹介した残高の計算の方法には、致命的な欠陥があるので、次回修正します。
