title: Error running Shell object / commands through Excel VBA
body: <p>I am running a C++ program through my VB code, and I am having trouble getting my code to run on a shared drive vs. on a local computer.  My program generates a set of assumptions, then runs those assumptions through a C++ model, then picks up the model output and prepares it for viewing in the VB workbook.  </p>
  
  <p>The code below works fine when I have the workbook saved in a local directory on my C drive, but when I upload it to my company's shared drive, I get the following error:</p>
  
  <p>"Run-time error '-2147024894 (80070002)': Method 'Run' of object 'IWshShell3' failed"</p>
  
  <p>Code:</p>
  
  <pre><code>'---------------------------------------------------------
  ' SECTION III - RUN THE MODEL AS C++ EXECUTABLE
  '---------------------------------------------------------
  Dim ModelDirectoryPath As String
  Dim ModelExecutableName As String
  Dim ModelFullString As String
  
  ' First build the command string
  Application.StatusBar = "Running C++ Model..."
  
  ModelDirectoryPath = Range("ModelFilePath").value
  ModelExecutableName = Range("ModelFileName").value
  ModelFullString = ModelDirectoryPath &amp; ModelExecutableName
  ModelFullString = ModelFullString &amp; " " &amp; ScenarioCounter &amp; " " &amp; NumDeals _
                    &amp; " " &amp; ModelRunTimeStamp &amp; " " &amp; Settle_YYMMDD
  
  ' Run the program
  Dim wsh As Object
  Set wsh = VBA.CreateObject("WScript.Shell")
  Dim waitOnReturn As Boolean: waitOnReturn = True
  Dim windowStyle As Integer: windowStyle = 1
  Dim errorCode As Integer
  
  errorCode = wsh.Run(ModelFullString, windowStyle, waitOnReturn)
  
  If errorCode = 0 Then
      ' MsgBox "C++ Model Completed without Errors."
  Else
      MsgBox "Program exited with error code " &amp; errorCode &amp; "."
  End If
  
  Application.StatusBar = "C++ Model Complete"
  </code></pre>
  
  <p>Any thoughts?</p>