|
▼Jaka さん:
>▼琴葉 さん:
>>コンボボックスの内容を、現金から当座預金などほかの物でオートフィルターを行い
>>再度集計すると、集計行が1行増えてしまいます。
>>
>>Columns("F").SpecialCells(xlCellTypeVisible)を
>>("F65536").End(xlUp)としてもだめでした。
>>一度入力して削除した行でも保存するまではその位置が最終行になってしまうようで
>>どのように回避したらよろしいでしょうか 何度も申し訳ありません。
>
>>15 現金 700
> を下のようにするんじゃないんですか?
>
>>15 現金 0 700 300
>>16 1300 1000 300
>
>1行挿入するのもなんだと思い、1番下に合計値を書き込みました。
>
>+1して1行あけてみるとか、これだとどうなりますか?
>Range("I1").Offset(.Rows.Count+1).Value = GK - HK
>
>実際、どうやって使うのかが、良く解っていません。
Jakaさんお世話になります。^^
説明不足で申し訳ありません。
教えていただいた記述で上記のようになります。
このあとにほかの科目(当座預金など)でオートフィルターをかけて再度集計すると
15 当座預金 700
が
15 当座預金 0 700 300
16 0 0 300
17 1300 1000 300
になってしまいます
さらにもう一回ほかの科目で行うと
15 手形 0 700 300
16 0 0 300
17 0 0 300
18 1300 1000 300
となってしまいます。今どこがいけないのか探しています^^
|
|