答案1
选择包含数据的范围,然后在功能区上选择“插入”>“表格”。这会将范围转换为一种称为“表格”的特殊范围。如果您在表格下方添加数据,表格将扩展以包含添加的数据。
使用表格创建图表,但不要延伸到表格下方。图表不会为大量未使用的单元格留下任何空间。当数据添加到表格中并且表格扩展时,图表将更新以包含添加的数据。
答案2
我在工作,看不到你的图片,所以我希望我正确理解了你的问题。此宏查看 B 列以确定你的列有多长,然后将图表系列设置为该长度。在代码的前两行中,你需要将“sheet1”和“Chart 1”更新为你的实际工作表和图表名称。我假设你的数据从 A1 开始,包括标题行。
Sub UpdateChart()
Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("sheet2")
Dim c As ChartObject: Set c = ws.ChartObjects("Chart 1")
Dim lastRow As Long: lastRow = ws.Cells(Rows.Count, 2).End(xlUp).Row
Dim x As Long
For x = 1 To c.Chart.SeriesCollection.Count
c.Chart.SeriesCollection(x).Formula = "=SERIES(" & ws.Name & "!R1C" & x & ",," & ws.Name & "!R2C" & x & ":R" & lastRow & "C" & x & "," & x & ")"
Next x
End Sub