Ｐａｇｅ 156 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼グラフウィザードをマクロでやることは可能？ いぬだわん 02/10/1(火) 18:17 ┗Re:グラフウィザードをマクロでやることは可能？ ichinose 02/10/1(火) 22:06 ┗Re:グラフウィザードをマクロでやることは... いぬだわん 02/10/2(水) 14:03 ─────────────────────────────────────── ■題名 ： グラフウィザードをマクロでやることは可能？ ■名前 ： いぬだわん ■日付 ： 02/10/1(火) 18:17 -------------------------------------------------------------------------
| こんばんんは。 Excelの機能で「グラフ作成」がありますよね。 そのDialogを表示させながらグラフをつくることを マクロ内で組むことはは可能なんでしょうか？ Book1.xlsのSheet1に A列に日付、B列に適当な数値が入っているとして（データ数は適当）、 既にBook1.xlsは開いているものとして、 Sub Graph() Worksheets("Sheet1").Activate Charts.Add 'グラフウィザード Application.Dialogs(xlDialogChartType).Show '種類の選択 Application.Dialogs(xlDialogChartSorceData).Show 'グラフのソース 'グラフオプション Application.Dialogs(xlDialogChartLocation).Show 'グラフの場所 End Sub となると思うのですが、 'グラフオプション にて、「タイトル」とか「凡例」とかは設定できないのでしょうか （Excelグラフウィザード「3/4グラフオプション」の表示のように）。 設定して、グラフのソースがあったとしても「凡例」しか出てこないようです。 ご教授おねがいします。 |
| ▼いぬだわん さん： こんばんは。 グラフウィザードって、標準ツールバーにありましたよね。 Excel2000では、19番目にありましたので、 CommandBars("Standard").Controls(19).Execute という方法ではいけませんか？ |
| ▼ichinose さん： こんにちは。 いつもありがとうございます。 CommandBars("Standerd").Controls(19).Execute の一行、で目が点になりまして（驚）。 やってみたらできました。 そこで、また質問なんですが、 グラフを作りたいソースがSheet1にあるとして、 そのデータがA列には日付、B-C列に気温が入っているとします。 ex) A B C 7/1 30 26 7/2 29 25 7/3 28 24 7/4 29 28 7/5 26 27 CommandBars("Standerd").Controls(19).Execute を使って 「グラフウィザード 1/4 グラフの種類」で ChartType=xlLine（折れ線） 「グラフウィザード 2/4 グラフの元データ」で SetSourceData Source:=Sheets("mV").Range("A1").CurrentRegion,PlotBy:=xlColumns 「グラフウィザード 4/4 グラフの作成場所」で 新しいシートにOputionButton=True （シート名は特に指定しない） と、指定することはできますか？ Charts.Add を入れると、ちょっとはいくのですが・・・ ご教授お願いいたします。 |