Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

4115 / 76734

←次へ　｜　前へ→


	【78246】Excel2013グラフの操作

North - 16/6/7(火) 16:27 -


	引用なし

	パスワード

Excel2013です。
積み上げ縦棒グラフ（データテーブル有）のプロットエリアの位置を操作したいと考えています。

以下のようにした場合
Dim sSg As Single
sSg = ActiveSheet.ChartObjects(1).Chart.PlotArea.Left
ActiveSheet.ChartObjects(1).Chart.PlotArea.Left = sSg - 5
意図した結果にならず、グラフ全体のレイアウトも崩れてしまいます。

また、いったんデータテーブルなしとしても
　ActiveSheet.ChartObjects(1).Chart.SetElement (msoElementDataTableNone)
　sSg = ActiveSheet.ChartObjects(1).Chart.PlotArea.Left
　ActiveSheet.ChartObjects(1).Chart.PlotArea.Left = sSg - 5
　ActiveSheet.ChartObjects(1).Chart.SetElement (msoElementDataTableShow)
同様に意図した結果にならず、グラフのレイアウトも崩れてしまいます。

レイアウトを崩さずに、プロットエリアの位置を正しく変更するための、ご助言いただきたくお願いします。

5 hits

▼

【78246】Excel2013グラフの操作 North 16/6/7(火) 16:27