title: Catastrophic Failure EXCEL VBA - error '-2147418113 (8000ffff)'
body: <p>I am struggling to find relevant information on the </p>
  
  <blockquote>
    <p>'run-time error '-2147418113 (8000ffff)' - Catastrophic Failure'</p>
  </blockquote>
  
  <p>I am experiencing.</p>
  
  <pre><code>Sub GenerateAIA_Click()
  Dim SQL_query, SQL_syntax, DB_path, setting_conn As String
  Dim conn As New ADODB.Connection
  Dim query_rslt As New ADODB.Recordset
  
  Dim mth, mth_yr As Variant
  Dim dt As Date
  Dim i, bol As Integer
  Dim temp1, temp2 As Variant
  
  dt = Sheets("Main").Range("C4")
  mth_yr = MonthName(Month(Sheets("Main").Range("I12")), False) &amp; " " &amp; Year(Sheets("Main").Range("I12"))
  
  ThisWorkbook.Sheets("AIA").Select
  
  DB_path = ThisWorkbook.FullName 'Refering the same workbook as Data Source
  setting_conn = "Provider=MSDASQL.1;DSN=Excel Files;DBQ=" &amp; DB_path &amp; ";HDR=Yes';"
  conn.Open setting_conn
  SQL_syntax = "SELECT * FROM [Setup$]"   'Your SQL Statement (Table Name= Sheet Name=[Sheet1$])
  query_rslt.Open SQL_syntax, conn
  </code></pre>
  
  <p>I have also noticed that this error is shown on the line</p>
  
  <pre><code>conn.Open setting_conn
  </code></pre>
  
  <p>I use excel 2016 and also my file format .xlsm<br>
  Anyone have idea why is this happening?</p>