- 締切済み
Excel2003グラフの自動調整
Excel2003のグラフについて質問です。2003からだったと思うのですが、凡例を非表示にしたり、右端表示を下端に変更したりするとプロットエリアが自動調整で大きくなります。ただし、凡例の変更前に、プロットエリアを移動やサイズ変更するとその機能が失われてしまいます。 失われてしまった機能を復元するにはどうしたら良いでしょうか? 似た質問があったのですが、2007での回答でしたので新規質問させていただきます。 よろしくお願いいたします。
- みんなの回答 (2)
- 専門家の回答
みんなの回答
- xls88
- ベストアンサー率56% (669/1189)
マクロでグラフを書き換えすればどうでしょうか。 大幅な書式設定変更をしていなければやれると思います。 Sub test1() Dim chobj As ChartObject Dim chtyp As Variant Dim cl As Double, ct As Double, cw As Double, ch As Double Dim fml() As Variant Dim n As Integer Dim i As Integer Set chobj = ActiveSheet.ChartObjects(1) With chobj cl = .Left ct = .Top cw = .Width ch = .Height chtyp = .Chart.ChartType n = .Chart.SeriesCollection.Count End With ReDim Preserve fml(n) For i = 1 To n fml(i) = chobj.Chart.SeriesCollection(i).Formula Next i chobj.Delete Set chobj = Nothing With ActiveSheet.ChartObjects.Add(cl, ct, cw, ch).Chart .ChartType = chtyp For i = 1 To n With .SeriesCollection.NewSeries .Formula = fml(i) End With Next i End With End Sub
- xls88
- ベストアンサー率56% (669/1189)
グラフの種類を変更すればリセットできないか試してみればどうでしょうか。 元のグラフが折れ線とすると、 例えば 折れ線→折れ線 とか 折れ線→棒→折れ線 のように、一度違う種類にしてから元の種類に戻す
お礼
Excel2007では、この方法でリセットできました。Excel2003では残念ながらできません。教えていただいた方法と何か手順が違っているのでしょうか?Excel2003でリセット方法がないから2007で改善された。という事だったり・・・
お礼
回答ありがとうございました。VBコードまで丁寧に書いていただきありがとうございます。試してみます。