I'm trying to use OnGetSeriesPointerStyle to customize some series points.
But it doesn't seem to run. I added a msgbox command to test that. Nothing.
The project compiles w/o error.
Is there something I need to do to cause the event to trigger and run?
Here's the code (The chart is named TChart):
Code: Select all
Private Sub TChart_OnGetSeriesPointerStyle(ByVal SeriesIndex As Long, ByVal ValueIndex As Long, AStyle As Long)
';MsgBox SeriesIndex & " - " & ValueIndex
Debug.Print "Running..."
If ValueIndex = 2 Then
TChart.Series(0).asPoint.Pointer.HorizontalSize = 5
';Else
';TChart1.Series(0).asPoint.Pointer.HorizontalSize = 2
End If
End Sub