• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel VBAでのグラフ)

Excel VBAでのグラフ作成の際にミスした箇所と修正方法について教えてください

TTakの回答

  • TTak
  • ベストアンサー率52% (206/389)
回答No.1

mygskさんこんにちは グラフの名前を"グラフ 1"とすると次のコードになります。 With ActiveSheet.ChartObjects("グラフ 1").Chart.Axes(xlCategory) .MinimumScale = Cells(50, 1).Value .MaximumScale = Cells(150, 1).Value End With グラフの名前は、グラフをオブジェクトとして選択した際に、名前ボックスに表示されます。デフォルトでは、作った順番に"グラフ 1",2,3...となります。 -EXCEL2000にて動作確認済み-

mygsk
質問者

お礼

TTakさん、ありがとうございます。 とりあえず試してみます。 埋め込みグラフではなく、チャートシートでも同様に設定可能でしょうか 例えば、アクティブなチャートを指定してからです。 Charts(str_sheet_Name(i)).activate With ActiveChats(1) .chart.Axes(xlcategory).minimumScale=cells(50,1).value .chart.Axes(xlcategory).maximumScale=cells(150,1).value End with この場合、TTakさんの例で言うとstr_sheet_Name(i) = "グラフ1"になります また、目盛り間隔(例えば10個)を同時に設定するにはどのようなコードを入れれば良いのでしょうか?

関連するQ&A

  • エクセルで折れ線グラフを書くとき

    お世話になります。 エクセルで折れ線グラフを書くときに、X軸のデーターが1から30までありますが、1番目のグラフで1から15まで、2番目のグラフで16から30までのデーターを表示させるのですが、2番目のグラフのX軸目盛りを16と表示させたいのですが、1と表示されます。 16と表示させる方法はどうしたらいいでしょうか。

  • エクセルのグラフの目盛りについて

    エクセルのグラフで二軸上の折れ線グラフを用いてグラフを描いたところ、プロットのデータに対応した値しかx軸の目盛りに表記されません。プロットにかかわらず、x軸の目盛りを取りたいのですが、どうやったらよいのでしょうか?

  • エクセルの折れ線グラフで、主目盛線上にデータ値をプロットしたい。

     エクセルの折れ線グラフを作成する場合、X軸の主目盛線上にデータ値をプロットさせる方法を知りませんか?  通常で作成すると、X軸の副目盛線上にはデータ値がプロットされますが、主目盛線上にはプロットされません。  主目盛線を表示せずに、副目盛線のみを表示させる事は出来ませんか? 下手な質問方法ですいません。判っていただけますか?

  • エクセルの折れ線グラフで目盛り線上にマーカー

    エクセルで折れ線グラフを作っています。 X軸の目盛り線を表示させるとデータとデータの間に線が入ってしまうのですが、データ上に目盛り線を表示させることはできないのでしょうか? 散布図を使ってみることも検討しましたが、散布図だと軸に文字を設定できないようです。 説明がうまくできず申し訳ないのですが、解決策はないでしょうか。 よろしくお願いします。

  • エクセル 折れ線グラフ

    継続するデータを(例えば、1月~12月) 折れ線グラフで表示する場合、 まだデータが無い月(現在は7月なので、8月)は ゼロなので、グラフの線がX軸0(ゼロ)になります。 そのグラフの線を0(X軸ゼロ)にしないで、 7月で線が途切れるように表示させるには どうすればいいのでしょうか? うまく表現できませんが、よろしく御願いいたします。

  • VBA グラフX軸の変更

    A列:X軸(日付) H列:Y軸(値) といったようなグラフを作成するにはどのようなソースで組めばよいのでしょうか? 現在は以下のようなソースまで組めます。 あとは、A列の日付をX軸に設定するだけなのですが、コーディングがわかりません。 --------------------------------------------------------------- Dim chart1 As Chart Set chart1 = Charts.Add 'H列グラフ化 chart1.SetSourceData Worksheets("Sheet1").Range(Cells(ROWINI, COLRUI), Cells(iend, COLRUI)) chart1.ChartType = xlLineStacked chart1.HasLegend = False --------------------------------------------------------------- どなたかアドバイスいただければ幸いです。

  • excel 2007 グラフ 軸反転、2軸作成問題

    excel2007でグラフを作成していますが、X軸と表示データの向きがあいません。 次のようなデータ 日付 DataA DataB 現在 10 1234 8/15 12 1020 8/16 09 1010 (1)まず、上記前データを一般的な折れ線グラフで表示します。 (2)X軸には日付が表示されますが、最新のデータは右側にしたいので  軸の書式設定で、「軸の反転する」をチェックし、反転させます。 (3)DataAないしDataBの一方をデータ系列の書式設定で、「第2軸」にします。そうすると、Y軸の目盛りが新規に作成されますが、「第2軸」にしたデータのみ折れ線グラフの表示が逆転し、X軸の日付と、実際のグラフ表示のデータの位置が一致しなくなります。 さて、解決方法は? ちなみに、excel 2003以前のバージョンでは問題は発生しません。 よろしくお願いします。

  • エクセルの折れ線グラフについて

    エクセルの折れ線グラフで目盛り上に日付を表示したいのですが、データラベルで日付を表示することができました。しかし、セルに設定した日付を表示することができません。目盛り上に現在日付ではなく入力した日付を設定することは可能でしょうか?

  • エクセルでこんなグラフ

    x y 0 0 1 90 2 100 3 90 4 100 5 90 上のようなデータで線グラフを作りたいのですが、 どうすればよいのでしょう? 「折れ線グラフ」ではx軸を0にできないし、 「散布図」ではx=1~2のところで、 yの値は100を超えたくないにもかかわらず、 超えてしまいます。どうすればよいでしょうか?

  • VBAでのグラフ作成について質問です。

    VBAでのグラフ作成について質問です。 Sheet1のA2:A10にx軸の値、Sheet1のD2:D10にy軸の値を設定した折れ線付き散布図を作成したいと思い、以下のようなマクロを組みました。 Sub Test() Dim chart1 As Chart Set chart1 = Charts.Add chart1.SetSourceData Worksheets("Sheet1").Range("A2:A10, D2:D10") chart1.ChartType = xlXYScatterLines End Sub 実行してみると、x軸に設定したセルがy軸の値になってしまい、 xの値が空欄の2つの折れ線グラフが現れてしまいます。 A2:A10をx軸の値に、D2:D10をy軸の値にしてグラフを作成するには上記のマクロをどのように変更すればよいのでしょうか?