• 締切済み

エクセルVBA ピボット作成

SUB テスト1()Sheet1("A2~F3600")のデータを新規ブックのSheet1にピボットテーブル表示させるVBA構文をご教示ください。初心者です宜しくお願いします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.1

エクセルの「開発ーマクロの記録」で、マクロの記録モードにして、そのピボットの操作をして、出来上がったコードを見ればよい、のではないか。出てきたコードの行がどういう意味や機能指定なのかは、WEBで 「ピボットテーブル VBA XXX(=コードそのもの)」でGoogleでも照会したらわかるだろう。 それさえもせずに、読者に回答全体を、丸投げとは、やるべきことをやってない。

nebikitorikai
質問者

お礼

なるほど、有難うございました。

関連するQ&A

  • エクセルVBAでピボットテーブルを新規ブックに

    既存のエクセル(A2~F3600)データをピボットテーブルで新規ブックに張り付け?発生?させるVBA構文をご教示ください。初心者です宜しくお願いします。

  • Excel2003 ピボットテーブルについて教えて下さい

    Excel2003 ピボットテーブルについて教えて下さい Excel2003でピボットテーブルを作っています。 まず「ブックA」の「シートA-1」にあるデータをもとにして、 新規シート「シートA-2」にピボットテーブルを作りました。 その後、「ブックB」の「シートB-1」にあるデータでピボットテーブルを作ろうとしたのですが、 「シートA-1」「シートB-1」はフィールド項目も表示したい表の形もまったく一緒なので、 「ブックA」のピボットテーブルを流用しようと考えました。 なので「ブックA」のピボット「シートA-2」を、「ブックB」内にコピーして、 その後「ブックB」に新しくできたピボットテーブルの参照範囲を「シートB-1」のデータにしました。 ピボットテーブルは無事にできたのですが、 フィールド名の右の▼をクリックすると出てくるリストに、 「シートA-1」のものと、「シートB-1」のものが混じって表示されてしまいます。 「ブックB」のピボットテーブルには、「シートB-1」のものだけを表示したいのですが…。 フィールドのリストで要らないものを削除する方法、 または、そもそもピボットテーブルのコピー自体でもっと良い方法があったら教えて下さい。 よろしくお願いします。

  • ピボットグラフのソースについて

    お世話になります ピボットテーブルをソースに作成したピボットグラフなのですが これのデータソース(データの範囲)をVBAで変更することはできないのでしょうか? 例えばAテーブルと名付けたピボットテーブルからグラフを作成すると グラフのデータ範囲は[ブック名]シート名!Aテーブルとなりますが このAテーブルの部分をBテーブルにVBAで変更したいです 操作上では変更もできずVBAでもそれらしい情報が見つかりませんでした。 よろしくお願いします

  • Excel VBA ピボットテーブル作成

    <元データ>Sheet1 A列 B列 C列 D列 E列 F列 商品名 種類 担当者 売上日 備考 本数 りんご 国産 新人 2010/4/1 売れ筋 5 なし 外国産 ベテラン 2010/4/5 通常 6 いちご 国産 新人 2010/3/23 通常 2 元データをもとにピボットテーブルを作成。添付図をご確認ください。 ピボットテーブルの下記条件を別シートにコピーしたいと考えています。※ピボットテーブルのシートはSheet2です。 C列の担当者で新人を選択、F列の本数で3本以上を抽出して Sheet3に貼り付けるマクロを考えています。 また、元データの行や列の増減に対応できるようにしたいです。 元データからピボットテーブルを作成して、希望条件のみを抽出して 別シートにコピーするマクロのサンプルをお教え頂けますでしょうか。

  • エクセルVBAでピボットテーブルを作成しています。

    エクセルVBAでピボットテーブルを作成しています。 作成まではできましたが、以下2つのVBAの組み方が分からないのでおしえてください。 【質問1】 ピボットテーブルの作成先を指定できるか? 例えば、予め準備したシートに作成することは可能でしょうか? VBAのどこを触ったら良いか分かりません。 【質問2】 作成されたピボットテーブルの列を、見出しの準備された別シートへ、それぞれ流し込むことはできるか? 例えば ピボットテーブルが以下のように作成されたとして、 A列  B列 購入額 総計 A社  1000 B社  2500 C社  800 予め用意した別シート(A~D列の見出しは固定)のB、C列にピボットのA、B列(最終行まで)をそれぞれ流し込みたいのです。 A列(コード) B列(購入額)  C列(総量)  D列(JANコード) 001      A社        1000      JAN1 002      B社        2500       JAN2 003      C社        800      JAN3 流し込んだ列を元にA、D列にはVLOOKをかける予定です。 何か良い案があれば是非、ご教授ください。

  • VBAでつくるピボットテーブル

    VBAでピボットテーブルを新規ブックにつくることができますか? つくれるのであれば方法を教えてください。

  • ピボットテーブルビューで開かない

    アクセス2007です。 フォームで作ったピボットテーブルが、ピボットテーブルビューで開かないのです。 Private Sub コマンド_Click() DoCmd.OpenForm "Fピボットテーブル", acViewPivotTable End Sub としてるのですが、データシートビューで開かれます。 でも、ナビゲーションウインドウのフォームのカテゴリで、 直接 "Fピボットテーブル"をダブルクリックして開くと、 ちゃんとピボットテーブルビューで開きます。 デザインビューで確認すると、既定のビューは、ピボットテーブルになっています。 どうしてでしょうか?ご回答よろしくお願いします。

  • excel vba

    テーブル情報に基づきシートをコピーするVBAマクロを記述したい。 ExcelのBook111のSheet1に次のような データが入っています。 (1、2)セルにn=3という数字が入っているものとします。 その数値に合わせて、この場合は3なので Sub Sample01() Workbooks("Book3.xls").Worksheets("booksheet3").Copy After:=Workbooks("Book111.xls").Sheet(1) End Sub のようなつまり、booksheet3なるシートをBook111(固定なBOOK)にコピーしようとしています。 このようなことをVBAで書くにはどうすればいいのでしょうか。 ただしBook名とシート名はあくまでデータの値にもとづいたデータをもってくることになります。 要するに間接参照したデータに基づき処理するのをどのように記述するかという質問です。 A列 B列 1 回数 n=3 2     3     4 Book1.xls book1sheet ←n=1 5 Book2.xls book2sheet ←n=2 6 Book3.xls book3sheet ←n=3 7 Book4.xls book4sheet 8 Book5.xls book5sheet 9 Book6.xls book6sheet ←n=6 10 Abc,xls Defsheet ←n=7

  • エクセル2007 ピボットの元データはどこ?

    こんにちは。 ピボットテーブルでデータをまとめました。 何種類かの元データのインプットされているシートがいくつかあり、 元データに応じてピボットテーブルもいくつかのシートに表示させてあります。 各ピボットテーブルの元データはどこから取ったものか、どうやったらわかるでしょうか。 目で見て項目と金額を全部チェックすればわかるのではありますが、もっと早くて 確実な方法はないでしょうか? 宜しくお願いします。

  • エクセルVBA ピボットテーブル更新するとエラー

    エクセル2002 ボタンをクリックするとピボットテーブルが更新できるようにしました Private Sub CommandButton1_Click() ActiveSheet.PivotTables("ピボットテーブル1").PivotCache.Refresh End Sub ボタンを押して実行したあと、全角入力を受け付けなくなります 症状(全角時) 文字入力、BS、Del、テンキー等が効かなくなります。 Fキー、タブは生きています。 半角入力は問題ありません。 エクセルを再起動すると回復します。 症状を無くすにはどうすればよいでしょうか? できればピボットテーブルはVBAのボタンで更新したいです。