Difference between revisions of "GenerateRealParametersFromDblArray"
From scripting
(Created page with " Function GenerateRealParametersFromDblArray(ParmList As Parameters, DblArr As Variant) As Variant Dim ParmArr() ReDim ParmArr(UBound(DblArr)) For X = 0 To UBound(DblArr)...") |
(No difference)
|
Latest revision as of 05:38, 22 April 2017
Function GenerateRealParametersFromDblArray(ParmList As Parameters, DblArr As Variant) As Variant
Dim ParmArr()
ReDim ParmArr(UBound(DblArr))
For X = 0 To UBound(DblArr)
Set ParmArr(X) = ParmList.CreateReal("STD_Rad" & Format(X, "00"), DblArr(X))
Next X
GenerateRealParametersFromDblArray = ParmArr
End Function
