エクセル初心者です。
エクセル365を使用しています。
下記のような一覧があり、日にちでフィルターをかけています。
フィルターでまとめた表の、28行目で1行空白の行を挿入してその空白行に合計金額を出したいです。
<元々の表>
A列 (B列~D列まで客先情報など) E列 D列 ・・・・J列
1/1 1/10 \10,000 1
1/10 1/15 \20,000 2
1/12 1/20 \111,000 3
1/22 1/25 \222,000 4
・(以下28行目まで続く)
・
・
1/25 1/31 \10,000 28
1/28 1/31 \20,000 29
1/29 1/31 \150,000 30
<変更後の表>
A列 (B列~D列まで客先情報など) E列 D列 ・・・・J列
1/1 1/10 \10,000 1
1/10 1/15 \20,000 2
1/12 1/20 \111,000 3
1/22 1/25 \222,000 4
・(以下28行目まで続く)
・
・
1/25 1/31 \10,000 28
(空白行) \1,000,000(上記の1~28行目までの合計)
1/28(29行目から更に続く) 1/31 \20,000 29
1/29 1/31 \150,000 30
・
・
・
E列でその月の1日~31日でフィルターをかけています。
J列はSUBTOTAL(3,A2,A2)の数式を入れて行数を出しています。
J列28行目に空白の行を挿入し、D列の28行目までの合計をその空白行に入れたいです。
29行目からは続きをさらに表示させたいです。
いくつか探して似たような過去質問から試しましたが中々うまくできず・・・
こういったことができる方法を教えてください。
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
こんばんは
>1行空白の行を挿入してその空白行に合計金額を出したいです。
実際にどうしたいのかよくわかりませんけれど、普通に行挿入してSUBTOTALの関数式を入力すれば算出可能なはずです。
当然ながら、異なるフィルターをかけたからといって、その小計行が移動してくれるようなことはありません。
もしも、『フィルターの内容にかかわらず常に29行目で必ず「小計」を算出したい』ということなら、別シート(別セル範囲でも可)に固定形式で抽出するようにしておけば可能でしょう。
>エクセル365を使用しています
とのことなので、FILTER関数が使えるはずと思いますので、どこかのセルにフィルター内容を入力するようにしておいて、1~28行目迄はFILTER関数でスピル、29行目に(固定で)小計の式を入力、30行目からFILTER関数で29行目以降をスピルするようにしておけば可能でしょう。
回答ありがとうございます。
月ごとの集計表で、ページが4ページ前後あり、それぞれのページごとの合計を表示させたいのですが・・・。
1ページ目の合計を2ページ目の一番上の行に表示→この2ページ目の一番上の行が28行目になります。
毎月なので手間を省きたく、マクロでできれば・・・と思ったのですが・・・。
別シートのご提案ありがとうございます。
ただ、同じデータから似ているようで少し違う一覧が5つほどあり、それぞれに表示・印刷用と別シートがある・・・というのがなんとも・・・。
J列の28行目のところで1行挿入される、というだけのマクロだけでも教えてもらえると助かります。
よろしくお願いします。
No.2
- 回答日時:
No1です。
>ページが4ページ前後あり、それぞれのページごとの合計を表示させたいのですが・・・。
固定形式の表にしたいのなら、固定形式(形式のみ)を先に作成しておいて、それを使い回せばよいというのがNo1の意味です。
(表示される内容は、可変です)
>毎月なので手間を省きたく~
回答の意味が通じていないのでしょうか?
事前に一度だけ作成しておけば、あとは、表示する月を指定するだけで自動で表示される仕組みですけれど・・?
>それぞれに表示・印刷用と別シートがある・・・というのがなんとも・・・。
シートを一つにしたければ、1シート内で処理すれば良いだけの話だと思います。
(No1の回答で「別シート」を例にしましたが、同一シートでも同じことは可能です)
>J列の28行目のところで1行挿入される、というだけのマクロだけでも教えてもらえると助かります。
「フィルター操作」や「マクロの実行」は手間とは感じていないようですね。
マクロで「行挿入」などを行うと、その後始末をどうするつもりなのかも不明ですけれど・・・
マクロがよくわからないのなら使用することはあまりお勧めはしませんけれど、どうやら拘っているようなので・・
以下、簡単な一例です。
Set c = Columns("J").Find(28, LookIn:=xlValues, LookAt:=xlWhole)
If Not c Is Nothing Then c.Offset(1).EntireRow.Insert
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) [オートフィルター]機能について 3 2023/02/04 14:32
- Excel(エクセル) 列を自動で追加したい 3 2022/07/11 12:58
- Excel(エクセル) アウトラインの小計のやり方 1 2023/03/20 11:51
- Visual Basic(VBA) 最終列の右へSUM関数を作成するため下記コードを実行しましたが、最終列「10月28日」が上書きされて 3 2022/12/05 20:32
- Excel(エクセル) エクセルで最初に値が入っているセルを見つける方法はありますか? 2 2023/07/18 14:58
- その他(データベース) Accessのクエリで1フィールドの抽出条件設定をNullでなく全角半角含む空白のみの文字列でない文 1 2023/04/24 15:20
- Excel(エクセル) SUBTOTAL SUMIF?? 2 2023/03/16 11:25
- Visual Basic(VBA) エクセルVBAで『A列』に新規で数値を入力し『B列』から右方向の空白セルにその値を貼り付ける方法 4 2022/11/05 08:37
- Visual Basic(VBA) Excel VBA マクロ ある列の最終行迄を参照し、別の列の空白セルに値を入力したいです 2 2023/03/05 02:44
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで二つの数字の小さい...
-
エクセルで最初のスペースまで...
-
PowerPointで表の1つの列だけ...
-
2つのエクセルのデータを同じよ...
-
EXCELで 一桁の数値を二桁に
-
「B列が日曜の場合」C列に/...
-
エクセルで文字が混じった数字...
-
エクセルの項目軸を左寄せにしたい
-
Excelで半角の文字を含むセルを...
-
エクセル(勝手に太字になる)
-
VBAで文字列を数値に変換したい
-
エクセル 文字数 多い順 並...
-
エクセルの列を範囲選択しての...
-
50人を数回、グループ分けする...
-
エクセルで、列の空欄に隣の列...
-
オートフィルターをかけ、#N/A...
-
Excel、市から登録している住所...
-
【VBA】特定列に文字が入ってい...
-
エクセルのセル内の文字の一部...
-
エクセルの並び変えで、空白セ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PowerPointで表の1つの列だけ...
-
エクセルで二つの数字の小さい...
-
エクセル 同じ値を探して隣の...
-
2つのエクセルのデータを同じよ...
-
エクセルで最初のスペースまで...
-
エクセル 文字数 多い順 並...
-
エクセルの項目軸を左寄せにしたい
-
エクセル(勝手に太字になる)
-
EXCELで 一桁の数値を二桁に
-
Excel、市から登録している住所...
-
VBAで文字列を数値に変換したい
-
「B列が日曜の場合」C列に/...
-
Excelで半角の文字を含むセルを...
-
EXCEl VBA
-
エクセルの並び変えで、空白セ...
-
VBAで、サブフォルダにある複数...
-
エクセルで文字が混じった数字...
-
エクセルの表から正の数、負の...
-
エクセルの列を範囲選択しての...
-
エクセル 時間帯の重複の有無
おすすめ情報