ParameterFromSubName

From scripting
Revision as of 19:39, 24 April 2017 by Nickpisca (talk | contribs) (Created page with " Function ParameterFromSubName(NameStr As String, ParmsList As Parameters) As Parameter For X = 1 To ParmsList.Count If InStr(ParmsList.Item(X).Name, NameStr) <> 0 Then...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search
Function ParameterFromSubName(NameStr As String, ParmsList As Parameters) As Parameter
For X = 1 To ParmsList.Count
    If InStr(ParmsList.Item(X).Name, NameStr) <> 0 Then
        Set ParameterFromSubName = ParmsList.Item(X)
        Exit Function
    End If
Next X 
End Function