Visual Basic - Base de datos

Oye alguien me puede decir q ue falla aki

Public Sub abrirBaseDatos(tabla As String)
Dim ruta As String

ruta = App.Path & "Fichas.mdb"
Set bd = OpenDatabase(ruta)
Set rstFichas = bd.OpenRecordset(tabla)
end sub

me dice que no coinciden los tipos

aki pueden fallar varias cosas, nos tendrías que explicar

1º ¿Cómo le pasas el parámetro "tabla" a la Sub?
2º La asignación de la variable ruta está incorrecta (aunque no daría el error que dices, sino "no se encuentra la base de datos...")
3º ¿Cómo declaraste la variable "bd"?
4º ¿Cómo declaraste el recordset (rstFichas)?
5º ¿Has marcado la referencia a DAO?
6º ¿En qué parte (línea) del código que pones, dá el error?

Si contestas a estas cuestiones, es posible que te podamos ayudar.

Hola

1. Cuando llamo al procedimiento le paso el nombre de la tabla como string
Call abrirBaseDatos("Fichas")
3,4 las variables bd y rstFichas estan declaradas en un modulo
Public bd As Database
Public rstFichas As Recordset
5. Si DAO 3.6 OBJECT LIBRARY
6. Set rstFichas = bd.OpenRecordset(tabla)

Gracias

declaraste la conexxion y el recordset?, si no debes declararlos para que se reconosca y puedas usar el set

Esto es lo que he declarado en un modulo.
Public bd As Database
Public rstFichas As Recordset

Parece que lo que tienes en un conflicto de referencias, declara las variables así:

Public bd As DAO.Database
Public rstFichas As DAO.Recordset

y esta instrucción

ruta = App.Path & "Fichas.mdb"

debe llevar delante de "Fichas.mdb" una barra invertida, no sé si la omitiste o es porque este editor la elimina.

Prueba ()

Efectivamente, este editor es una porquería ya que entre los paréntesis de prueba le puse la barra invertida, y no aparece

Hola
Ok funciona correctamente, muchas gracias