'Windows only!
'Opens MS Excel if it is installed.
'<code>Wait For (xl.OpenExcel(FilePath)) Complete (Success As Boolean)</code>
Public Sub OpenExcel (FilePath As String) As ResumableSub
Dim shl As Shell
shl.InitializeDoNotHandleQuotes("shl", "cmd.exe", Array("/c", "start", $""""$, $""${FilePath}""$))
shl.Run(-1)
Wait For shl_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)
If ExitCode <> 0 Then
Log(StdOut)
Log(StdErr)
Return False
End If
Return True
End Sub