Teledyne LeCroy WaveExpert series Automation Manual - Manual (Page 46)

A BOUT R ESULTS
Const ROWOFFSET = 10
Const COLOFFSET = 7
Dim HorizontalPerStep As Double
Dim HorizontalOffset As Double
Dim ScaleArray As Boolean
Dim nSamples As Long
Dim startIndex As Long
Dim sparseFactor As Long
Dim wform
ScaleArray = Cells(9, 5)
nSamples = Cells(10, 5)
startIndex = Cells(11, 5)
sparseFactor = Cells(12, 5)
wform = app.Acquisition.C1.Out.Result.DataArray(ScaleArray, nSamples,
startIndex, sparseFactor)
HorizontalPerStep = app.Acquisition.C1.Out.Result.HorizontalPerStep
HorizontalOffset = app.Acquisition.C1.Out.Result.HorizontalOffset
For i = 0 To UBound(wform)
Cells(i + ROWOFFSET, COLOFFSET) = i
Cells(i + ROWOFFSET, COLOFFSET +1) = HorizontalPerStep * i +
HorizontalOffset
Cells(i + ROWOFFSET, COLOFFSET+2) = wform(i)
Next i
Persist Interface:
Description:
Retrieves a 2D array containing hits in each cell of of the rectangle selected via the input arguments.
Arguments (optional):
numColumns as Long
Default value: -1, retrieve all columns
Number of columns to retrieve.
numRows as Long
Default value: -1, retrieve all rows
Number of rows to retrieve.
startColumn as Long
Default value: 0, first column
Index of the first column to retrieve. (0-based)
startRow as Long
Default value: 0, first row
Index of the first row to retrieve. (0-based)
Example:
‘Reads values to use for DataArray arguments from a spreadsheet, and then
loops through
‘the retrieved array, saving the data to the spreadsheet.
Const ROWOFFSET = 10
2-10 916435 RevA