Excel VBA質問箱 IV

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

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


75623 / 76732 ←次へ | 前へ→

【5544】続・項目軸の表示形式について
質問  ntomo  - 03/5/19(月) 14:42 -

引用なし
パスワード
   こんにちは
グラフの項目軸で表示形式の設定ができるかと思いますが・・・。
マクロだとどうしてもゆーざ定義の設定ができません。
yyyy/mm/dd h:mm:ss
のデータを
yy/mm/dd h:mm

で表示させたいのです・・・。
マクロの記録のコードそのままでうごかしても
オブジェクトはこのプロパティまたはメソッドをサポートしてません。
となってしまいます。(yyyy/m/d h:mm にすると動きます)
現状ではEXCEL2000だとできて97だとできないことがわかっています。

そこで、他に設定する方法があればどなたか教えてください。
(無理かもですね。。。)


以下は自分でちょこっと手をいれた実際につかっているコードです。

Sub X軸第2軸設定処理()
  Dim xrng
  Set xrng = Sheets("データシート").Range("B29", Sheets("データシート").Range("IV29").End(xlToLeft))
  ActiveChart.PlotArea.Select
  ActiveChart.SeriesCollection(1).XValues = xrng
  ActiveChart.Axes(xlCategory).Select
  ActiveChart.PlotArea.Select
  With ActiveChart
    .HasAxis(xlCategory, xlPrimary) = True
    .HasAxis(xlCategory, xlSecondary) = True
    .HasAxis(xlValue, xlPrimary) = True
    .HasAxis(xlValue, xlSecondary) = True
  End With
  ActiveChart.Axes(xlCategory, xlPrimary).CategoryType = xlAutomatic
  ActiveChart.Axes(xlCategory, xlSecondary).CategoryType = xlCategoryScale
  ActiveChart.Axes(xlCategory, xlSecondary).Select
'  Selection.TickLabels.NumberFormatLocal = "yy/m/d h:mm"
  Selection.TickLabels.Orientation = -75
  ActiveChart.SeriesCollection(2).Select
  ActiveChart.Axes(xlCategory, xlSecondary).Select
  Selection.TickLabels.AutoScaleFont = True
  With Selection.TickLabels.Font
    .Name = "MS Pゴシック"
    .FontStyle = "標準"
    .Size = 7
    .Strikethrough = False
    .Superscript = False
    .Subscript = False
    .OutlineFont = False
    .Shadow = False
    .Underline = xlUnderlineStyleNone
    .ColorIndex = xlAutomatic
    .Background = xlAutomatic
  End With
  Selection.TickLabels.Orientation = -79
  ActiveChart.ChartArea.Select
  ActiveChart.Axes(xlCategory, xlSecondary).Select
  ActiveChart.ChartArea.Select
  ActiveChart.PlotArea.Select
End Sub

1 hits

【5499】項目軸の表示形式について ntomo 03/5/16(金) 14:09 質問
【5500】Re:項目軸の表示形式について ぴかる 03/5/16(金) 14:37 発言
【5505】項目軸の表示形式について ntomo 03/5/16(金) 16:10 発言
【5511】Re:項目軸の表示形式について ぴかる 03/5/16(金) 17:42 発言
【5518】Office2000では動作可能のようです こう 03/5/17(土) 13:41 発言
【5543】Re:Office2000では動作可能のようです ntomo 03/5/19(月) 11:21 お礼
【5544】続・項目軸の表示形式について ntomo 03/5/19(月) 14:42 質問
【5545】Re:続・項目軸の表示形式について ひで 03/5/19(月) 16:18 回答
【5546】Re:続・項目軸の表示形式について ntomo 03/5/19(月) 16:36 お礼
【5547】Re:続・項目軸の表示形式について ひで 03/5/19(月) 16:44 お礼

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