Excel VBA質問箱 IV

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

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


4166 / 13646 ツリー ←次へ | 前へ→

【58092】VBAから作成したグラフの軸ラベルが、ブックを再読み込みするとおかしくなる L-way 08/10/2(木) 9:39 質問[未読]
【58097】Re:VBAから作成したグラフの軸ラベルが、ブ... kanabun 08/10/2(木) 13:45 発言[未読]
【58098】Re:VBAから作成したグラフの軸ラベルが、ブ... kanabun 08/10/2(木) 14:22 発言[未読]
【58099】Re:VBAから作成したグラフの軸ラベルが、ブ... L-way 08/10/2(木) 14:25 お礼[未読]

【58092】VBAから作成したグラフの軸ラベルが、ブ...
質問  L-way  - 08/10/2(木) 9:39 -

引用なし
パスワード
   VBAマクロから新規ブックを作成し、その作成した新規ブックのシート上に、
埋め込みグラフを作成しています。

マクロ実行直後には、下記例1(OK時)のように、こちらの期待通りに描写されているのですが、
その新規ブックを保存し、再度開くとグラフの軸ラベルの位置がおかしくなってしまいます(下記例2)

なぜこのようなことが起こるのでしょうか?
解決法をご教授いただければ幸いです。

言葉だけではイメージしづらいと思いますので、キャプチャした画像をアップしました。
こちらをご参照いただければ幸いです。

[OK時]
ht tp://www3.uploader.jp/dl/akaiup/akaiup_uljp00117.jpg.html

[NG時]
ht tp://www3.uploader.jp/user/akaiup/images/akaiup_uljp00118.jpg


すみませんが、よろしくお願いいたします。

【58097】Re:VBAから作成したグラフの軸ラベルが、...
発言  kanabun  - 08/10/2(木) 13:45 -

引用なし
パスワード
   ▼L-way さん:

こんにちは。
Excel2007 ですね?

どうも、縦軸とX軸の交点が 勝手に [1]に変わってしまっているための
ようです。

とりあえず、手動で、
X軸を選択して、「軸の書式設定」「軸のオプション」タブで
 縦軸との交点 を [0.001] に設定してみてください。

【58098】Re:VBAから作成したグラフの軸ラベルが、...
発言  kanabun  - 08/10/2(木) 14:22 -

引用なし
パスワード
   ▼L-way さん:

X軸の設定で Y軸との交点をいま
>   .Crosses = xlAxisCrossesMinimum
で設定しておられると思いますが、
これを
   ↓のように、2Stepで設定したら、どうでしょう?

    With .Chart.Axes(Type:=xlCategory)
      .HasTitle = True
      .AxisTitle.Text = "周波数"
      .ScaleType = xlScaleLogarithmic
      .LogBase = 10
      .MinimumScale = 0.001
      .MaximumScale = 100.1
      '.Crosses = xlAxisCrossesMinimum
      .CrossesAt = .MinimumScale
      .Crosses = xlAxisCrossesCustom 'CrossesAt プロパティの値で交差します。
      '↑このプロパティは、項目軸と数値軸の両方に設定できます。
    End With

【58099】Re:VBAから作成したグラフの軸ラベルが、...
お礼  L-way  - 08/10/2(木) 14:25 -

引用なし
パスワード
   ▼kanabun さん:
返信ありがとうございます。

>      '.Crosses = xlAxisCrossesMinimum
>      .CrossesAt = .MinimumScale
>      .Crosses = xlAxisCrossesCustom 'CrossesAt プロパティの値で交差します。

以上のように修正したところ、期待する動作になりました。

私の過去の投稿ログまで参照していただき、本当にすみませんでした。

皆様に頂いた助言を忘れずに、今後も精進していきたいと思います。

ありがとうございました。

4166 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free