Help with: 'Run time error '-2147418113 (8000ffff)': Catastrophic Failure'.

[peter_z]

Hey guys, this is giving me some serious trouble so any help is much appreciated. One of the people at my work place can't use this excel file I used getting the error:

'Run time error '-2147418113 (8000ffff)': Catastrophic Failure'.

Everyone else can use it perfectly fine.

The code is:

'you must create a connection to the Microsoft ActiveX Data Objects 2.X library
'via Tools>References within the VBE!
 
strProvider = "Microsoft.ACE.OLEDB.12.0"
strDataSource = Worksheets("Reference").Range("B1").Value
Dim rst As ADODB.Recordset
Dim cnn As ADODB.Connection
 
With cnn
    .ConnectionString = "Provider=" & strProvider & "; Data Source=" & strDataSource & "; User Id=admin;Password=;"
    .CursorLocation = adUseClient
    .Open
End With

help please !

Any advice is much appreciated

 

[Derek Brown]

I don't have a specific answer for you as I do not use ADODB with Excel worksheets.
However, I could not see a "Set cnn = New ADODB.Connection" statement in your code.
Although it is for earlier versions (Jet), the following may be of interest:
http://support.microsoft.com/kb/257819

 

[Weaver]

The only time I ever got that error was when I tried to access an .mdb that was already open in another app.