Note que al aparecer el buscador del archivo de acces, si se te ocurre arrepentirte y le pones cancel, la macro colapsa y te marca un error, para arreglar eso solo coloquen la siguiente linea:

On Error Resume Next

despues del siguiente codigo:

Public Sub Copiar_Tabla_Access()
Dim oConexion As ADODB.Connection
Dim rsTabla As ADODB.Recordset
Dim sNombreTabla As String
Dim sNombreAccess As String
Dim i As Integer
On Error Resume Next

Y con esto evitamos el error, estupendo foro!…

Gracias…

Si se puede exportar desde Access a Excel y seleccionar los datos que quieres pasar a cada una de las celdas. Lo malo es que en ese la macro de este post no vale, debería ser totalmente diferente ya que tendría que usar los objetos de Access y crear un objeto de Excel (la macro actual es justo al contrario). No es algo que pueda indicarte fácilmente en un comentario , intentaré hacer un ejemplo y postearlo.

Un saludo,
Lcflores

Ahora me surge una duda muy tonta, existe la posibilidad de, desde access, con la función TransferirHojaCalculo, a la hora de especificar el archivo excel al que quieres que te exporte la consulta, especificar también la hoja y la celda a partir de los cuales se copian los datos???

Gracias otra vez

Debes indicar también el path. Mira que no tengas caracteres extraños, como: ‘ ´ & % / – y cosas de ese estilo.

Suerte,
Lcflores

Wilver constanza

Desafortunadamente no existe una solución específica para todas las bases de datos. Una de las virtudes de Access es que tiene asistentes que te ayudarán para casi todo.

Dentro de Access, cuando creas una nueva tabla, te da varias opciones. Una de ellas es un asistente para tablas, dentro de este asistente, incluye la opción de crear una tabla de empleados con los campos típicos de este tipo de tablas.

Espero que esto pueda ayudarte,
Lcflores