質問: 列挿入時の指定文字入力と転記をマクロでやりたい 毎月、アンケート集計結果がエクセルで送られてきます。 中身は、商品名ごとにシートが分かれており、1行目はタイトル行となっています。(月によってデータ個数は変わります。) 年度毎の累計を別ブックで1枚のシートで作成したいと思っております。 その際マクロで、a列に月、b列に商品名と挿入し、かつ自動で、月と商品名が入力されるようにはできないでしょうか? a b c d 1 時間 名前 ~ ~ 2 ○時 ○○ 3 ○時 ○○ ↓ a b c d 1 月 商品名 時間 名前 ~ ~ 2 ○月 ○○ ○時 3 ○月 ○○ ○時 また、タイトル行を除いた、複数の特定の列の最終行(入力されているセル)を取得し(上記とは別)別ブックの最終行(入力されているセルの次の空白セル)に転記できますか?
回答: >>その際マクロで、a列に月、b列に商品名と挿入し、かつ自動で、月と商品名が入力されるようにはできないでしょうか? q1:月と商品名は、手入力ですか? どこかのセルに記録されていますか? q2:1つのbook は すべての年度内の商品びアンケートが記録されていますか? ひとつの商品が別なbook で年月が違っていたりしていませんか? q3、集計の方法は1行にそれぞれの商品(月ごと)を集計するようなイメージですか ex. 入力を下記イメージと考えて book1(2009年分データ) ・sheet1(商品a(2009年1月)) ・sheet2(商品b(2009年1月)) ・sheet3(商品c(2009年1月)) ・sheet4(商品a(2009年2月)) ・sheet5(商品b(2009年2月)) ・sheet6(商品c(2009年2月)) ↓ ・sheet7(商品a(2009年11月)) ・sheet8(商品b(2009年11月)) ・sheet9(商品c(2009年11月)) ・sheet10(商品a(2009年12月)) ・sheet11(商品b(2009年12月)) ・sheet12(商品c(2009年12月)) ======================================================================== 上記のようなシート構成で タイトルの行のセル(h1:年月、i1:商品名)が 記入されているとして。 一行がそれぞれのシート1枚の商品の月ごとの集計行として考えます。 別シートにデータを集計する関数で集計を行う。 ■dsum関数で条件に合うものを合計 http://kokoro.kir.jp/excel/dsum.html ■ countif関数で条件に合うセルを数えよう! http://kokoro.kir.jp/excel/countif.html ■ sumproduct関数 http://www11.plala.or.jp/koma_excel/contents3/mame3029/mame302903.html で集計はできます。 ============================================================================== ★ できるだけ詳しくデーターの中身と集計方法がわからないとvbaで作るのはむりです。 vba で作るには上記の質問に答えてください。 集計方法もどの項目を数えるあるいは合計するなど・・・・ 月と商品名の列を挿入するのは簡単です。