| たゆーさん、うにんさん、コメントありがとうございます。
「行訂正」に変更したら、一発解決しました。そうか、置換だと先頭行へ行くのか。
ああ～～、もっと早くお尋ねすべきだった。
本当は項目計算式で済ませたいのですが、新減価償却制度が複雑で、私の腕では一括で書くしかなくなりました。
その一部を、下記に添付しました。ご参考までに。
（まだ完成版ではありません。その他の手続きのデバックはこれからです。）
絞り込み 条件名="１９／４以降取得"
繰り返し ( .not #終端行)
&償却額＝#INT([期首簿価]*[償却率]*[月]/12)
&改訂取得価額＝[改訂取得価額]
&改訂取得価額＝#COND([償却保証額]＞＆償却額 .and &改訂取得価額=0,
[期首簿価],
1,&改訂取得価額)
&償却額＝#cond(&改訂取得価額>0,#INT(&改訂取得価額*[改訂償却率]),
1,&償却額)
&期末簿価＝[期首簿価]－&償却額
&償却額＝#COND(&期末簿価<0,[期首簿価]-1,
1,&償却額)
行訂正 [償却限度額]＝&償却額
行訂正 [改訂取得価額]＝&改訂取得価額
ジャンプ 行番号 = 次行
繰り返し終了
このように、償却額を、いろいろの条件で再計算する必要があります。これを長い項目計算式で書くことが出来ませんでした。
今後ともよろしく
|
