Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


51269 / 76732 ←次へ | 前へ→

【30334】Re:最終行の計算、条件付の行のみの計算
質問  琴葉  - 05/10/25(火) 16:15 -

引用なし
パスワード
   ▼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

となってしまいます。今どこがいけないのか探しています^^

1 hits

【30282】最終行の計算、条件付の行のみの計算 琴葉 05/10/24(月) 14:10 質問
【30312】Re:最終行の計算、条件付の行のみの計算 Jaka 05/10/25(火) 9:06 回答
【30322】Re:最終行の計算、条件付の行のみの計算 琴葉 05/10/25(火) 14:06 質問
【30330】Re:最終行の計算、条件付の行のみの計算 Jaka 05/10/25(火) 15:39 発言
【30334】Re:最終行の計算、条件付の行のみの計算 琴葉 05/10/25(火) 16:15 質問
【30340】Re:最終行の計算、条件付の行のみの計算 Jaka 05/10/25(火) 16:46 発言
【30371】Re:最終行の計算、条件付の行のみの計算 琴葉 05/10/26(水) 9:17 お礼

51269 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free