根据单元格值调整范围以创建图表

Question

我有数据，我试图绘图，需要一种方法来自动调整图表范围，以确保没有绘制零值。从本质上讲，如果我有一个10行乘4列的数据范围和第5行以下的所有内容，那么我想要一个宏来选择前5行中的数据来制作图表并保留其他数据集。

任何想法都将不胜感激

修改

我尝试将零值设置为N / A，因此图表不会绘制它们，但确实如此。我现在正在尝试修改我所做的循环，以便它将数据下移直到它达到0值，一旦它完成它将选择它上面的所有数据和字段并将其定义为我的图表数据：< / p>

    Dim xlastrow As Integer
    Dim xrow As Integer
    xrow = 15
    Range("b10000").End(xlUp).Select
    xlastrow = ActiveCell.Row
    Range("c10000").End(xlUp).Select


    Do Until Cells(xrow, 2).Value = "0"
      If Cells(xrow, 2).Value <> "0" Then
      Cells(xrow, 2).Select


    End If
    xrow = xrow + 1
    Loop
    ActiveCell.Select
    Selection.offset(, -1).Select

此代码用于识别最后一行非零值的位置，并选择行中的第一个单元格（具有未来图表中值的x轴描述的单元格）。如何完成代码以便它选择顶部和右侧的所有内容并将其定义为我的图表区域？

Answer 1

以下是可帮助您创建动态图表的文章索引：Dynamic Chart Review。