FlexPro
HistoryBase
Engineering
Training
Downloads
FlexPro Support
Knowledge
Community
About us
References
Jobs
General Contact
List Of Retailers
FlexPro Support
EN
DE
FR
Placeholder
Products and Solutions
Support and Downloads
Company
Magazine
Contact Us
Language
MyWeisang

Account settings

Topic

Get start time of a signal

Home page Community Automation and VBA Get start time of a signal

Viewing 3 posts - 1 through 3 (of 3 total)
  • Author
    Posts
  • #35041

    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

    #35039

    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

    #35040
    serin thomas
    Participant

    try this

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

Viewing 3 posts - 1 through 3 (of 3 total)
  • You must be logged in to reply to this topic.