for me it's the first time that I am using Testlab Automation and I am struggling to export some measured data from my LMS project into an Excel-file. With a VBA script in Excel I manage to access the folder structure of the sections and runs in my LMS project, but I don't know how to export data into my open Excel file.
The commands I am using are:
Set my_db = TL.ActiveBook.Database
Set my_att = my_db.ElementNames("")
tmp_t = my_db.ElementType(my_att.item(i))
With those commands I can retrieve the structure and the names of folders etc. In the object library I've found the command my_db.GetItem(). With that I can get the number of Data-Points in a specified measurement (Like Overall Level Data from Channel1). But I still don't get the actual data, just the amount of data points.
How can I get all the data points from a given measurement and store them in an Excel range?
Solved! Go to Solution.
thank you very much for the fast and helpful answer! I managed to retrieve the information I was looking for.
For others who might be interested, here is the code I used to get Overall level data (section and run_name still have to be filled):
Path = section & "/" & run_name & "/Tracked processing/Fixed sampling/Time/Sections/Overall level" Set att3 = my_db.ElementNames(Path) Path2 = Path & "/" & att3(0) att4 = my_db.ElementType(Path2) Set dataBlock = my_db.GetItem(Path2) Xvalues = dataBlock.Xvalues YRealValues = dataBlock.RealYValues YUserValues = dataBlock.UserYValues(LMSTestLabAutomation.CONST_ScaleProperty.dB_Scale) XLange = dataBlock.XCount label = dataBlock.label YValues = dataBlock.YValues YQuantity = dataBlock.YQuantity XQuantity = dataBlock.XQuantity YAxisId = dataBlock.YAxisId XAxisId = dataBlock.XAxisId LengthX = UBound(Xvalues)
Recently I asked about how to read out data from a LMS project using Excel and VBA. Thanks to the help I managed to read out all post-processed data. However now I am stuck trying to read out the original measured time data.
How can I access the throughput data? I tried the following:
Dim dataBlock as LMSTestlabAutomation.IBlock2
Set att = my_db.ElementNames(PathToThroughput) Path2 = PathToThroughput & att.item(0) Set dataBlock = my_db.GetItem(Path2)
I get the following error: "Runtime error '13': Types mismatching"
I suspect I need to use another variable type than IBlock2. But I don't know what.
my_db.ElementType(Path2) yields 'BlockStream'
So the question would be how do I access a BlockStream?
Any help is gladly appreciated.