title: ORA-12560: TNS: protocol adapter error issue: Excel 64-bit/Windows 10 64-bit
body: <p>I'm running a VBA script I used to use when connecting to Oracle database through Excel 32-bit but now I'm using Excel 64-bit.</p>
  <p>VBA code:</p>
  <pre class="lang-vb prettyprint-override"><code>Set cn1 = New ADODB.Connection
  Set rs1 = New ADODB.Recordset
  cn1.ConnectionString = &quot;Driver={Microsoft ODBC for Oracle};Server=BR1P1;Uid=BR1USER;Pwd=myPass&quot;
  cn1.Open
  rs1.Open Query, cn1
  </code></pre>
  <p>When I execute &quot;cn1.open&quot; I get this error:
  <code>&quot;Run-time error'-214746... [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified&quot;</code></p>
  <p>Then I tried to solve adding a new data source:
  ODBC Data Source Administrator (64-bit)&gt; File DSN&gt; click in Add...&gt; from list I select: Oracle em OraClient11g_home1 (&quot;Oracle em&quot; means &quot;Oracle for&quot;, my OS in in portuguese)&gt; Next&gt; browse to the file: &quot;C:\Windows\System32\odbcad32.exe&quot;&gt; Next&gt; Finish</p>
  <p>Doing so system will give me the driver name: <code>&quot;Oracle em OracleClient11g_home1&quot;</code></p>
  <p>Afterwards it will prompt for Service Name, User Name and Password. I inform server Name according to my TNSNAMES.ORA</p>
  <p>Back to VBA I changed the code according to the driver name:</p>
  <pre class="lang-vb prettyprint-override"><code>cn1.ConnectionString = &quot;Driver={Oracle em OracleClient11g_home1}&quot;
  </code></pre>
  <p>Now when execute &quot;cn1.Open&quot; in VBA I receive this new error message:</p>
  <pre><code>&quot;Run-time error'-214746... [Oracle][ODBC]ORA-12560: TNS:protocol adapter error&quot;
  </code></pre>
  <p>My TNSNAMES.ORA file is like this:</p>
  <pre><code>BR1P1 = (DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = myhost.com)(PORT = 1575))) (CONNECT_DATA = (SERVER = DEDICATED) (SERVICE_NAME = BR1P1)))
  </code></pre>
  <p>Well I'm just stucked on this. Please I appreciate any help on this.
  It's being a pain after I changed my MS Office to 64-bit version.</p>