Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1235 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【75519】散布図で対数表示できません まめ 14/5/2(金) 12:08 質問[未読]
【75521】Re:散布図で対数表示できません マナ 14/5/3(土) 15:55 発言[未読]
【75523】Re:散布図で対数表示できません まめ 14/5/8(木) 16:44 お礼[未読]
【75522】Re:散布図で対数表示できません γ 14/5/3(土) 20:54 発言[未読]
【75524】Re:散布図で対数表示できません まめ 14/5/8(木) 16:51 お礼[未読]
【75519】散布図で対数表示できません
質問  まめ  - 14/5/2(金) 12:08 -
引用なし
パスワード
   お世話になります。

VBAを用いてグラフを作成しています（エクセル2007）。
X軸を対数表示させようとすると、以下のようなエラーが表示されてしまいます。

実行時エラー'-2147467259 (80004005)':
'ScaleType'メソッドは失敗しました:'Axis'オブジェクト

調べたところ、2007以降のバグではないかと記載されていたサイトがありましたが
では、どのようにしたら対数表示できるようになるでしょうか。

-------------------
参考までに、問題部分のコードを記載いたします。

With Sheets("1").ChartObjects(1).Chart.Axes(xlCategory)
　　.MinimumScale = Sheets("data").Range("B1").Value
　　.MaximumScale = Sheets("data").Range("C1").Value
　　.MajorUnit = 10
　　.CrossesAt = Sheets("data").Range("B1").Value
　　.ScaleType = xlLogarithmic '対数表示
　　.TickLabels.NumberFormatLocal = "[<0]"""";G/標準"
End With

以上、何卒よろしくお願いいたします。
【75521】Re:散布図で対数表示できません
発言  マナ  - 14/5/3(土) 15:55 -
引用なし
パスワード
   B1が0以下ということはないですか
【75522】Re:散布図で対数表示できません
発言  γ  - 14/5/3(土) 20:54 -
引用なし
パスワード
   私のは2010環境なので、意味がないかもしれませんが。

.ScaleType = xlLogarithmic
は正常動作しました。

また、A1:A5をデータ範囲として、両対数目盛にする動作を
マクロ記録したら下記のようになりました。
Sub Macro1()
　　ActiveSheet.Shapes.AddChart.Select
　　ActiveChart.ChartType = xlXYScatterLines
　　ActiveChart.SetSourceData Source:=Range("Sheet1!$A$1:$B$5")
　　ActiveChart.SetElement (msoElementPrimaryCategoryAxisLogScale)
　　ActiveChart.SetElement (msoElementPrimaryValueAxisLogScale)
End Sub
【75523】Re:散布図で対数表示できません
お礼  まめ  - 14/5/8(木) 16:44 -
引用なし
パスワード
   ▼マナ さん：

お返事が遅くなり、大変申し訳ありません。
他の部分に不調が生じ、問題部分の確認ができないでおりましたが
やっと復旧したためお返事させていただきます。

B1の値は10なので、その点の問題は無いようです。
【75524】Re:散布図で対数表示できません
お礼  まめ  - 14/5/8(木) 16:51 -
引用なし
パスワード
   ▼γ さん：

お礼が大変遅くなり申し訳ありません。
色々弄っているうちに、他のところで致命的な問題が生じてしまって
復旧作業に明け暮れていた次第です。
ご回答誠にありがとうございます。

withステートメントから一旦抜けて、γ様のアドバイス通り
ActiveChart.SetElement (msoElementPrimaryCategoryAxisLogScale)
と記載しましたところ、正常に対数表示させることができました！

どうやっても表示できなかったので、本当に助かりました。
ありがとうございました！
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1235 / 13645 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free