If Betangel give an accurate update time with an accuracy of at least 10 ms
While Excel can display time in ms, ("[h]:mm:ss.000",) Neither the Bet Angel Sheet, last update time cell nor the Update Times log we got from CPerry recorded Time in less than whole seconds.

Developer Note: http://betangel.kayako.com/Knowledge...-practice-mode
http://betangel.kayako.com/Knowledge...tions-settings
"The expected response times inside the UK can be anywhere between 50ms - 200ms."
End Note

Maybe something like:
BA Cell C3 = LastUpdateTime

Sub Worksheet_Change
If Target = C3 then
UpdatePerSecond.Tik = C3
'
'
'
End Sub
clsUpdatesPerSecond
Dim LastSecond As Date
Dim CurrentSecond As Date

Dim TikCount As Long
Dim Tik As Date

Dim PreviousValue As Double
Private pValue As Double

Property Let Tik(UpdateTime As Date)
CurrentSecond = UpdateTime

If CurrentSecond = LastSecond Then
TikCount = TikCount + 1
Else
LastSecond = UpdateTime
End If

CalculateValue
End Property

Private Sub CalculateValue
If CurrentSecond = LastSecond Then
 PreviousValue = 1000 /TikCount 'ms per update in this second
Else
pValue = PreviousValue 'ms per update in last whole second

'Reset times and counts
TikCount = 0
LastSecond = CurrentSecond
End Sub

Property Get Value()
'Used as Modifier for Certain Formulas per otl
Value = FunctionBytOffTheLip(pValue) 
End Property