[Excel 2003] Progress Indicator / Status Bar

[agmorgan]

I am using this code to show progress and that the macro isn't hanging

'Update status bar with message
    Application.StatusBar = "Splitting contents of: " & sFile
    '...
    '...Do stuff (potentially in a loop updating i each time)
    Application.StatusBar = "Updating.." & i
    '...
    '...Do stuff (potentially in a loop updating i each time)
    Application.StatusBar = "Loading.." & i
    '...
    'Give status bar back to Excel
    Application.StatusBar = False

What can I do though if the majority of the work is done in one 'Split' statement at the start?
The macro would still look like it is hanging.
I sort of feel a new thread is needed to be spawned to update the StatusBar until the Split is finished.
Even if that is the way to go, I'm not sure how to do it
Any ideas?