Excel：如何格式化柱形图，以便在添加新数据时自动添加新列？

Question

A bit of background: I have a table which by using a combination of vlookup and index, goes through my main dataset and pulls out each row of data for a given month (in this case March). Each month will have a maximum of 15 entries, but may have less.

The image below is an example of the table for the month of March, which currently has 4 entries.

I want to create a column graph which is sourced from this table, that formats in a way such that if there is:

• 4 entries, it shows 4 evenly spaced columns
• 5 entries, it shows 5 evenly spaced columns
• etc...

However, when I create this graph using the two yellow highlighted columns of data, I get 4 columns (in the graph) squashed over to the left side, and a whole bunch of blank space, as seen below:

Is there a way that I can create a graph that looks like the graph on the left, and that will add in new columns automatically as data appears in the table, without looking like the graph on the right?

Thanks

Answer 1

You could automatically updated your graph data ranges using VBA.

For example if your data range is in columns A and B of Sheet2 and your graph is Sheet1 you could use the following code:

Sub UpdateRange()
Dim LastRow As Long
Dim RngCount as Range

Set RngCount = Sheets("Sheet2").Range("A1:A10")
LastRow  = Application.WorksheetFunction.CountA(RngCount)

Sheets("Sheet1").ChartObjects("Chart 1").Chart.SetSourceData Source:=Sheets("Sheet2").Range("A1:B" & LastRow)

End Sub

Graph with old data:

After data was added and the macro was run: