AnsweredAssumed Answered

XYPlot SetScaleFormat

Question asked by aksnk89 Champion on Sep 11, 2015
Latest reply on Sep 11, 2015 by pkaiser

Hi,

I m getting an error stating  "Invalid Scale Min Argument" on line colored as Red. Can any solve this issue ? What am i missing here?

 

 

If i.Type = 29 Then

      Dim xd As XYDefinition

      Set xyplt = i

      Set xd = xyplt.GetDefinition

        For j = 1 To xyplt.PtCount

        sTagName = xyplt.GetTagName(j)

        sTagName = Replace(sTagName, Trim(txtPath1.Text), Trim(txtPath2.Text))

        maxS = xd.Tags.Item(j).AbsoluteMax

        minS = xd.Tags.Item(j).AbsoluteMin

        maxC = xd.Tags.Item(j).Max

        mixC = xd.Tags.Item(j).Min

        If xd.Tags.Item(j).IsXTag Then

        xd.Tags.Remove (j)

        xd.Tags.Add sTagName, True

       

        Call xd.Tags.Item(j).SetScaleConfiguration(False, maxC, minS, minC, maxS)

                      

        Else

       

        xd.Tags.Remove (j)

        xd.Tags.Add sTagName

        Call xd.Tags.Item(j).SetScaleConfiguration(False, maxC, minS, minC, maxS)

      

       

        End If

        Call xyplt.SetDefinition(xd)

      Next j

      End If

Outcomes