0

作成時に.leftを使用して2つのチャートを隣り合わせに配置しようとしましたが、うまくいきません。私は何が恋しいですか?

With ThisWorkbook.Worksheets("Diagram").ChartObjects.Add(200, 200, 600, 400).Chart
    .Parent.Name = Name
    .left = 400

    If Not .HasTitle Then
        .HasTitle = True
        .ChartTitle.Text = Name
    End If

    .ChartType = xlXYScatterSmoothNoMarkers
    .Axes(xlValue).CrossesAt = CrossAt
    .Axes(xlCategory).TickLabels.NumberFormat = "YYYY-MM-DD"

    For i = LBound(sXRanges) To UBound(sXRanges)
        With .SeriesCollection.NewSeries
            .Name = country(i)
            .XValues = sXRanges(i)
            .Values = sYRanges(i)
        End With
    Next
End With
4

1 に答える 1

0

.Left参照しているチャートのプロパティではありません。実際に使用したいのは ChartObject です.Parent.Left

于 2012-09-20T13:13:40.667 に答える