SOLVED: Is simulated multithreading the way to go (for what i need to do)?

[DigiRev]

You can speed it up pretty well by using DoEvents only when it is needed. You can use the GetInputState API function for this.

Private Declare Function GetInputState Lib "user32" Alias "GetInputState" () As Long
 
Do
    DoSomething
    If GetInputState Then DoEvents
Loop Until Condition = True

There is another (better) API function to use, but I forgot what it is. Hopefully someone remembers and will post it.