VBA Excell：如何按从 0 到 n 的升序分配 x 轴值？

Question

大家好，

我是 VBA Excel 或一般编程的新手。我试图通过 VBA 自动绘制温度曲线。每个测量点与下一个测量点的距离为一秒。

我使用了下面的代码。我的问题是，现在第一个测量点分配给 1，第二个测量点分配给 2，等等。我想将第一个测量点分配给 0，第二个测量点分配给 1，等等。

Sub DiagramBlattErstellen()

'Variablen definieren
Dim MeinDiagrammBlatt As Chart
Dim Wertebereich As Range

Set Wertebereich = Worksheets("Unbenannt").Columns("H")


'Diagramm erstellen
Set MeinDiagrammBlatt = ThisWorkbook.Charts.Add2

'Werte zuweisen
MeinDiagrammBlatt.SetSourceData Source:=Wertebereich

'Name festlegen
MeinDiagrammBlatt.Name = "Vorlauftemperatur"

'Diagrammtyp
MeinDiagrammBlatt.ChartType = xlLine

有人知道如何解决我的问题吗？预先感谢并为不好的英语而道歉。

Answer 1

作为示例，使用 G 列作为轴标签，然后添加以下内容：

'Werte zuweisen
MeinDiagrammBlatt.SetSourceData Source:=Wertebereich
MeinDiagrammBlatt.FullSeriesCollection(1).XValues = "==Unbenannt!$G:$G"