VBA图表范围减去

Question

我找到了这段代码，每次运行时都会在图表中添加一个额外的列。 意思是它第一次运行它显示第1-7周，第二时间1-8，下一个1-9，我希望它显示2-7、3-8、4-9等。

<\/cXML>

我要执行与此代码相反的操作，因此应减去一列，而不是添加一列。如何修改代码来做到这一点？

（LINK：VBA: Modify chart data range）

谢谢！

Answer 1

尝试更改行

Set oRng = oRng.Worksheet.Range(oRng, oRng.Offset(0, 1))

到

Set oRng = oRng.Worksheet.Range(oRng.Offset(0, 1), oRng.Offset(0, 1))