Get start time of a signal

[paulwarshawsky@yahoo.com]

I am trying to write a macro that changes the scaling of the x-axis of a worksheet or 2-d diagram to display the first 30 seconds of a time signal. The problem is I cannot get the value of the start time:

Sub Macro()
‘
‘ Macro recorded on 2004-11-18 9:21:43 PM by (unknown)
‘
Dim StartTime as Long
StartTime = ??????????? ‘Help
ActiveDatabase.ActiveObject.CursorActive = False
ActiveDatabase.ActiveObject.Grid.Interior.Select
ActiveDatabase.ActiveObject.XAxes(1).Scaling.AutoScaleStartValue = False
ActiveDatabase.ActiveObject.XAxes(1).Scaling.AutoScaleEndValue = False
ActiveDatabase.ActiveObject.XAxes(1).Scaling.StartValue = StartTime
ActiveDatabase.ActiveObject.XAxes(1).Scaling.EndValue = StartTime + 30
End Sub

Also, is there some reference for the object model for flexpro VBA? I’m using the object browser, but this provides very limited information.

Thanks,

Paul

[paulwarshawsky@yahoo.com]

I am trying to write a macro that changes the scaling of the x-axis of a worksheet or 2-d diagram to display the first 30 seconds of a time signal. The problem is I cannot get the value of the start time:

Sub Macro()
‘
‘ Macro recorded on 2004-11-18 9:21:43 PM by (unknown)
‘
Dim StartTime as Long
StartTime = ??????????? ‘Help
ActiveDatabase.ActiveObject.CursorActive = False
ActiveDatabase.ActiveObject.Grid.Interior.Select
ActiveDatabase.ActiveObject.XAxes(1).Scaling.AutoScaleStartValue = False
ActiveDatabase.ActiveObject.XAxes(1).Scaling.AutoScaleEndValue = False
ActiveDatabase.ActiveObject.XAxes(1).Scaling.StartValue = StartTime
ActiveDatabase.ActiveObject.XAxes(1).Scaling.EndValue = StartTime + 30
End Sub

Also, is there some reference for the object model for flexpro VBA? I’m using the object browser, but this provides very limited information.

Thanks,

Paul

[serin thomas]

try this

dim factor = 30
signal(data.y,data.x*factor)

[Autor]

Beiträge