[shantystar]

VBA function for converting gross US Matchbook odds to net US Odds (i.e., odds after commission):

Public Function MB2US(ByVal dUSOdds As Double, Optional ByVal dCommission = 0.01) As Double
    Application.Volatile
    If dUSOdds < 0 Then
        MB2US = Dec2US( _
                    1 + (1 - dCommission) / _
                        (-dUSOdds / 100 + dCommission) _
                )
    Else
        MB2US = Dec2US( _
                    1 + (dUSOdds / 100 - dCommission) / _
                        (1 + dCommission) _
                )
    End If
End Function

right say!