title: runtime error 2147467259(80004005) ODBC SQL server does not exist or access denied
body: <p>I am new to VBA. When I try to execute this piece of code (written by someone else) I get an error at <code>objMyconn.open</code>:</p>
  
  <pre><code>Dim objMyConn As ADODB.Connection
  Dim objMyCmd As ADODB.Command
  
  Set objMyConn = New ADODB.Connection
  Set objMyCmd = New ADODB.Command
  Set dependenciesRecordset = New ADODB.Recordset
  
  dependenciesRecordset.CursorLocation = adUseClient 
  
  objMyConn.ConnectionString = "Provider=MSDASQL;Driver=SQL Server;Server=aac-
  srvsqldb02\db02;Database=mydatabase;UID=webreport;PWD=abcdefghijkl;"
  objMyConn.Open
  </code></pre>