計算式を足していくこんにちはゲストさん。計算式を足していくExcel2003を使用しています。マクロで、伝票を追加して行き、追加する度に合計のセルにある計算式を前の伝票の計算式と合算させたいのですが、うまく行きません。※合計の計算式は18行毎に入ります。伝票の枚数は決まっていませんので、何枚追加しても合算出来る様にと考えています。Formulaを使ってセルの計算式を取得し、2枚目の計算式と合算は出来るのですが、3枚目4枚目となっていく時の記述がイマイチうまく出来ません。※「cnt」は伝票の枚数です。sumの部分は、伝票の追加の時点で計算式が入ります。伝票をコピー&貼り付けした時点で、合算している計算式を入れてしまった方が良いのかなとは思いましたが、思うように行っていません。23:00:41通報するQNo.6668796makkie33困ってます質問者が選んだベストアンサー1枚目の合計式を=SUBTOTAL(9,A4:A17)2枚目の合計式を=SUBTOTAL(9,A4:A35)3枚目の合計式を=SUBTOTAL(9,A4:A53)とします。&")"といった具合になります。回答ありがとうございます。SUBTOTAL関数の存在をすっかり忘れていました。keithinさんの回答で、光明が見えて来たので、ベストアンサーさんにさせて頂きます。回答(3)ANo.3imogasi仕組みの記述が不完全ではないか。>1枚目シートを増やしていっているのか?。質問の望みの計数はどのシートの、何処のセルに入れるのか、質問に書いてあるか?==1シートが伝票1枚に対応し、その伝票のシートの何処かのセルを足したいのではないか。その足すセルは一定の場所のセルにあるのではないのか。←2枚目の合計と1枚目の合算は集計シートのようなもので、各伝票シートとは独立したシートではないのか。一般論としても、エクセルの質問は、いつもブックシート列・行セルが何処のことを言っているのか明確にして、質問されたい。==普通は各シートを読んで足していくような方式を考えるのではとおもう。Worksheetsのやり方は知っていて、本件やっているのか。質問の不備があり申し訳ありません。>シートを増やしているのか?いいえ、シートではありません。1つのシートに「伝票追加」をすることで行を増やして(移動して)いっています。お察しの通り、列は一定です。>集計シートのようなもので・・・いいえ、集計シートではありません。伝票のテンプレートを別シートからコピーしていますが、当該シートは入力専用伝票です。ユーザー側からの依頼で、入力伝票を個々に印刷にも使いたいと言う事で、1シートに複数枚の伝票と言う形をとっています。上述した様に、ユーザーからの要望もあったのと、1日に扱う伝票の量が大量な為、1枚の伝票=1シートと言う形は取れませんでした。他に不備あればご指摘下さい。回答ありがとうございます。動作させた所、2枚目の伝票の合計に1枚目の合計も足されている計算式が追加されますが、3枚目、4枚目と追加してもこの記述だと、あくまでも前の伝票の合計が足されて行くだけで私の考えている3枚目の伝票に「3枚目の合計+2枚目の合計+1枚目の合計」4枚目の伝票に「4枚目の合計+3枚目の合計+2枚目の合計+1枚目の合計」にはなりません。#2さんの回答でなんとなく光明が見えて来たので、申し訳ありませんが今回は、#2さんをベストアンサーさんにさせて頂きます。どちらの処理がより高速であるのかを調べるため、以下の2つのVBAを試作致しました。エクセル2010を使っている者です。EXCEL2000でVBA作成中です。以下のコードで計算式を入れています。matyuといいます。こんばんはB列に上からいくつか数字が入力されているとします。Excelマクロの記述をもっとわかりやすくしたいのですが、どなたかご教示お願いします。Reserved.掲載情報の著作権は提供元企業等に帰属します。