エクセルの学校：全文検索：Hyper Estraier：ピボットテーブル

Results of 1 - 1 of about 2422 for ピボットテーブル (0.004 sec.)

[[20090603191143]]: #score: 4769; @digest: 0b6004c41a152e76dd7bc2dd8e1ecff0; @id: 43766; @mdate: 2009-06-04T10:57:59Z; @size: 1489; @type: text/plain; #keywords: 品使 (11091), 況"" (7748), 終() (6506), ウマ (5064), refreshtable (4927), 終列 (4781), 用状 (4259), 列13 (3712), activechart (3616), 合自 (3556), xlrows (3548), setsourcedata (3479), 列& (3460), 消耗 (3196), 耗品 (3043), plotby (2674), タロ (2643), ピボ (2242), ロウ (2182), トグ (1989), 列)) (1968), フ1 (1891), ・グ (1678), トテ (1666), pivottables (1536), 最終 (1376), ラフ (1231), chartobjects (1155), グラ (1106), ボッ (1041), ーブ (963), source (938); 『ピボットテーブルとグラフの更新』（タロウマン）
ピボットテーブルの範囲は自動で出来るようになったのですが、グラフの更新が上手く出来ません。下記のマクロのグラフのピボットテーブルの範囲が変わった場合自動で範囲を変えたいので教えて下さい。最終列の列名は抜き出せたのですが、 ActiveChart.SetSourceData Source:="Sheets(""H21消耗品使用状況"").Range(""B4:" & 最終列 & "13"")", PlotBy:=xlRows ではおかしいので教えて下さい。 Sub 最終() 最終列 = Left(Range("IV5").End(xlToLeft).Offset(0, -1).Address(0, 0), 1) Range("B5").Select ActiveSheet.PivotTables("ピボットテーブル1").RefreshTable ActiveSheet.ChartObjects("グラフ 1").Activate ActiveChart.ChartArea.Select ActiveChart.SetSourceData Source:=Sheets("H21消耗品使用状況").Range("B4:L13"), PlotBy:=xlRows End Sub ---- ピボットグラフを作成しておけば ピボットテーブルが更新されたら勝手にグラフも更新されますが・・・グラフをピボットグラフに変更するのは駄目なんですかね・・・? ちなみに（こんなので良いのかは分かりませんが） B4セルから、最終列13行目の範囲は Range("B4", Cells(13, 最終列)) の様に書けると思います。 (HANA) ---- 済みません、よく見ていませんでした。「最終列」には列のアルファベットが入っているのですね。でしたら Range("B4:" & 最終列 & "13") で良いと思います。最終列がAA列以降に成ることは無いのですかね・・・? (HANA) ---- ありがとうございました。ちょっと勘違いしてました。 " を追加しすぎだっだ（タロウマン） ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200906/20090603191143.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ