2017-08-11 12 views
0

私は、特定のデータを表示するテーブルを持つ "結果"シートを持っています。テーブルでグラフのx軸に月がある

私は53

まで1から週番号として列Aを持っている

ないすべての週は、結果が満たされています。何週間も結果がありません。

この表の中から列スタックチャートを生成しようとしています。

私が抽出しているうちに、詳細がグラフに重なって表示され、視覚化が不足していることがわかりました。

グラフのX軸の週番号を月に変換する方法があるかどうかをお聞きしたいと思います。

どのようにすればいいのか教えてもらえますか?ここ

が、私は私のチャートの代わりに以下の表示される数字の

Sub chartstatus() 
Dim rng, rng1, rng2 As Range 
Dim cht As Object 
Set rng1 = ActiveSheet.Range("A2:A53") 
Set rng2 = ActiveSheet.Range("G2:J53") 
Set rng = Union(rng1, rng2) 
ThisWorkbook.Sheets("Result").ChartObjects.delete 
Set sh = ActiveSheet.ChartObjects.Add(Left:=750, _ 
    Width:=1100, _ 
    Top:=80, _ 
    Height:=350) 

sh.Select 

Set cht = ActiveChart 
With cht 
.SetSourceData Source:=rng 
.ChartType = xlColumnStacked 
cht.Axes(xlSecondary).TickLabels.NumberFormat = "0.0%" 
cht.SeriesCollection(1).delete 
End With 
cht.SeriesCollection(1).Format.Fill.ForeColor.RGB = RGB(255, 0, 0) 
cht.SeriesCollection(2).Format.Fill.ForeColor.RGB = RGB(0, 255, 0) 
cht.HasTitle = True 
cht.ChartTitle.Text = "Result 2017(Percentage)" 
End Sub 

This is how my table looks like with the data, and with column A having the Weeknumber with the above code, I am generating an Graph like below.

のために使っていたコードですが、私は、対応する月の名前を持っていると思います。誰も私がこれを達成するのを助けることができますか?

+0

@誰でもこれを助けることができますか? – Jenny

答えて

1

ヘルパー列を使用します。あなたのための週番号の列を使用するのではなく、その後

=DATE(B1,1,-2)-WEEKDAY(DATE(B1,1,3))+A1*7 

:私の例では

私は、次の式を使用していた列Cの列Bの列Aと年の週番号を持っていますあなたの計算された列を使用してください。次に、「MMMM」これは、あなたがあなたの週番号がColumn Aにある場合

1

探しているものをあなたに与えるヘルパー列としてColumn Bを使用し、以下の式を入力しますのカスタム形式でグラフの軸をフォーマット

あなたは、グラフの軸のため、この範囲を使用することができ
=TEXT(42729+(A1*7),"mmm-yy") 

enter image description here

。お役に立てれば。

+0

私は同じようにしました。今、あなたが見ることができたら。私は4時間1月3日時間febを持っています..これらは再び私のグラフに表示されます..方法は、グラフは、漢と翌月の累積結果を個別に得ることができますか? – Jenny

+0

@Jenny月間を基準に 'sumif'を使用してください –

+0

私のチャートコードを意味しますか? – Jenny

関連する問題