I am using the following to create a connection to an Access Db file via the Workbook_Open procedure in ThisWorkbookSet cnConnection = CreateObject("ADODB.Connection")
strDbName = ThisWorkbook.Path & "\" & strDbFile
cnConnection.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strDbName...