oldbloke's mutterings

Private Sub ComboBox11_Change()
'we need newval to be a string or it'll get the numeric representation of the entered time
Dim newval As String
If ComboBox11.Value = "Add time" Then
newval = InputBox("Enter new time")
ComboBox11.Value = newval
numitems = Sheets("Lists").Cells(2, timecol).Value + 1
Sheets("Lists").Cells(2, timecol).Value = numitems
'even though we made sure newval is a string, it'll get converted again unless we stick a ' in front
Sheets("Lists").Cells(numitems + 2, timecol).Value = "'" & newval
nfr = "Lists!" & timecolc & "3:" & timecolc & numitems + 2
ComboBox2.ListFillRange = nfr
End If
End Sub

The Mansion exchange now has 0 fee for buyers, and only 1% for sellers.
They don't run anything like as many markets as some other exchanges, though.
Let's check some odds... BetFair in brackets...
1.90 Juventus 1.97 (1.92/1.93)
3.69 Draw 3.88 (4.5/4.6)
4.46 Arsenal 4.71 (3.8/3.85)

mmmmm, the disparity in the draw & arsenal figures means they might be worth checking when looking for arbs.
Other than that, the gap between the buy & sell looks worse at Mansion. But that's just one data point. And the 0 commision makes a difference.
Next time I fancy some sports betting, I'll probably check what prices they have.

2123 entries
significant hands:
AA gets me up to 269th
JJ gets me to 43rd
JJ gets me to 3rd
A8s keeps me in the zone at 6th
At the break I'm down to 89th after losing a big one
An AT fails to hold up against a frankly inferior hand and I'm down to 220th
AK gets rivered, dropping me to 341st of about 500 left in
Things are desperate so I play an AT again. Pair the T. Opponent kas KQ. River is a K.
Finish 478th.