我正在尝试制作图表,其中我的第一列数据为x轴值。它为我的大多数图表提供了我想要的结果,但对于某些图表,它却为我提供了一些我不想要的数据点。!/ Users / clairespriggs / Desktop / Screen Shot 2019-07-16 at 12.24 .56 PM.png
这就是我希望图表看起来像的样子 !/ Users / clairespriggs / Desktop / Screen Shot 2019-07-16 at 12.52.07 PM.png
'Create Charts for Station F Data
DataSheetSF.Activate
Union(Range("A1", Range("I1").End(xlDown)), Range("DV1", Range("DV1").End(xlDown))).Select
Charts.Add
ActiveChart.Move After:=Sheets(Sheets.Count)
ActiveChart.Name = "Voltage (F)"
DataSheetSF.Activate
Union(Range("A1", Range("A1").End(xlDown)), Range("J1", Range("Q1").End(xlDown)), Range("DV1", Range("DV1").End(xlDown))).Select
Charts.Add
ActiveChart.Move After:=Sheets(Sheets.Count)
ActiveChart.Name = "Current (F)"
DataSheetSF.Activate
Union(Range("A1", Range("A1").End(xlDown)), Range("U1", Range("AZ1").End(xlDown)), Range("DV1", Range("DV1").End(xlDown))).Select
Charts.Add
ActiveChart.Move After:=Sheets(Sheets.Count)
ActiveChart.Name = "On Potential (F)"
DataSheetSF.Activate
Union(Range("A1", Range("A1").End(xlDown)), Range("BA1", Range("CF1").End(xlDown)), Range("DV1", Range("DV1").End(xlDown))).Select
Charts.Add
ActiveChart.Move After:=Sheets(Sheets.Count)
ActiveChart.Name = "Off Potential (F)"
DataSheetSF.Activate
Union(Range("A1", Range("A1").End(xlDown)), Range("CG1", Range("DT1").End(xlDown)), Range("DV1", Range("DV1").End(xlDown))).Select
Charts.Add
ActiveChart.Move After:=Sheets(Sheets.Count)
ActiveChart.Name = "Resistance (F)"
第一小段给了我一个很好的图表,其余的给了我我不想要的图表。仅供参考,我希望将x轴作为日期和时间列