Ok after some random code insertion it seems to be working. What got it working was changing this:
Code:
Call UpdateBookmark("bmctime", TextBox9.Value)
For i = 0 To ListBox1.ListCount - 1
To this:
Code:
Call UpdateBookmark("bmctime", TextBox9.Value)
Me.Repaint
UserForm1.Hide
For i = 0 To ListBox1.ListCount - 1
I have no idea why and no idea if that's a best practice or even proper but it is working.