Thread
:
Difficult (for me) formula/UDF calculation
View Single Post
#
5
Mike Echo
Posts: n/a
In article ,
says...
Public Function NumSamples(total_containers As Long, _
skip_rate As Long) As Long
Dim nTemp As Long
If total_containers <= 2 Then
nTemp = total_containers
Else
nTemp = (total_containers - 1) \ skip_rate + 1 - _
((total_containers - 1) Mod skip_rate 0)
End If
NumSamples = nTemp
End Function
Thank you very much, J. E. I don't understand the thing but it works
perfectly. :-)
Reply With Quote