Returning the Task ID of the Started Application
Sub task() Dim myTaskID As Long myTaskID = Shell("c:\w.exe") End Sub