FYI. In case anyone has a need to connect to an Access 2007, 2010, or later (.accdb) database, below is a connection string that may be of some help:
Sub Access2010ConnectionTest(sFileSpec As String)
' Requires - Tools > References: Add, Microsoft ActiveX Data Objects 2.7 Library - or preferred version.
Dim cn As adodb.Connection
Set cn = New adodb.Connection
With cn
.Provider = "MSDASQL"
.ConnectionString = "Driver={Microsoft Access Driver (*.mdb, *.accdb)};Dbq=" & sFileSpec '& ";Uid=Admin;Pwd=;"
.Open
End With
' Database stuff here...
' Cleanup
cn.Close
Set cn = Nothing
End Sub