1

検出された最も古い日付に応じて、いくつかの事前定義された値のいずれかを割り当てることにより、グラフの x 軸の固定最小値を自動化できる VBA コードを探しています。

利用可能なデータの開始日がしばしば異なる大量のデータを扱っています。

X 軸で最も早い年の値を検出し、事前に決められた開始日を適用することは可能ですか?

たとえば、2002 年 5 月 4 日のデータが利用可能な場合、コードは x 軸範囲の最小値を 2002 年 4 月 5 日として読み取り、「2002」を検出して、x 軸の最小値を「37258」に設定します。 Excel の日付番号システムの 2002 年 1 月 1 日に対応します。

2008 年半ばのデータが利用可能な場合、x 軸の最小値は 2008 年 1 月 1 日と一致するように「39449」に設定されます。

4

1 に答える 1

3
ActiveChart.Axes(xlValue).MinimumScale = dateserial(year(ActiveChart.Axes(xlValue).MinimumScale),1,1)

これはチャートを見て、そこから年を取り、その年の 1/1 を開始点に設定します。

于 2012-08-02T16:15:43.597 に答える