Originally Posted by
jbortoli
would it be possible for you to say add some code and highlight what you mean or is that too much to ask
regards john
Done. I have commented wherever I made changes. I have added the following function to isolate the total strand length calculation
Code:
Public Function getTotalStrandLength(ByVal strTendonLength As String, ByVal strNumOfStrands As String) As Double
Dim dTLength As Double
Dim iNumOfStrands As Integer
dTLength = CDbl(strTendonLength)
iNumOfStrands = CInt(Replace(strNumOfStrands, "s", "", , , vbTextCompare))
getTotalStrandLength = dTLength * iNumOfStrands
End Function
If you don't understand any part of modifications, feel free to ask us.
HTH