Para hacer lo que quieres la consulta debe estar en SQL para que mediante una variable le metas la ruta de la base de datos que tu seleciones en el cuadro combinado.
Por ejemplo en esta consulta para exportar datos sacada de una consulta normal de exportacion.
Donde esta en negrita deberia de ir la variable con la ruta de la base de datos a donde quieras exportar
INSERT INTO Tabla1 IN 'C:\Borrar y exportar datos a una tabla base datos externa\b.mdb'
SELECT Tabla1.*
FROM Tabla1;
Por ejemplo
Dim varRuta as string
varRuta=Me.NombreCuadroCombinado
INSERT INTO Tabla1 IN " & varRuta & "
SELECT Tabla1.*
FROM Tabla1;
En este caso exportar todos los registros de la tabla1 a la tabla1 de la base de datos externa. Ten en cuenta que si tienes campo claves antes tendras que borrarlos para exportar los nuevos. El ejemplo que te he dado hace exactamente eso, pero mediante un boton y la consulta normal de exportacion con la ruta fija.
Dim DataBase As DAO.DataBase
Set DataBase = DBEngine.Workspaces(0).OpenDatabase("C:\Borrar y exportar datos a una tabla base datos externa\b.mdb", False, False, Password) 'Aqui iria tu variable con la ruta de la base de datos
DataBase.Execute "DELETE * FROM Tabla1" 'Borro datos de base de datos externa
Set DataBase = Nothing
MsgBox "Datos Borrados, ahora exportaremos los datos.", vbInformation
DoCmd.SetWarnings False
DoCmd.OpenQuery "ExportarDatos_B" 'Aqui iria tu consulta en SQL con la variable con la ruta de la base de datos
DoCmd.SetWarnings True
MsgBox "Proceso terminado.", vbInformation