Насчет драйверов не знаю но с dll работаю как то так

в заголовок модуля добавить
Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long

Private Type OPENFILENAME
lStructSize As Long
hwndOwner As Long
...
End Type

использовать функцию можно так
Dim OpenFile As OPENFILENAME
Dim lReturn As Long

OpenFile.lStructSize = Len(OpenFile)
OpenFile.hwndOwner = Application.hWndAccessApp
.......

lReturn = GetOpenFileName(OpenFile)