| 
    
     |  | 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)
 同様に意図した結果にならず、グラフのレイアウトも崩れてしまいます。
 
 レイアウトを崩さずに、プロットエリアの位置を正しく変更するための、ご助言いただきたくお願いします。
 
 |  |