** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y Otros sistemas
  Mensajes nuevos Mensajes nuevos RSS - Celda Excel en campo Access
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoCelda Excel en campo Access

 Responder Responder
Autor
Mensaje
Capasio Ver desplegable
Nuevo
Nuevo


Unido: 20/Agosto/2018
Localización: España
Estado: Sin conexión
Puntos: 5
Enlace directo a este mensaje Tema: Celda Excel en campo Access
    Enviado: 20/Agosto/2018 a las 18:34
Saludos a todos
Necesito que una tabla Access tenga un campo que me muestre el contenido de la celda $A$1 de un fichero Excel y que el campo se actualice cada vez que modifique la $A$1 en la hoja de cálculo.

Los "x" registro de la tabla de Access me tienen que mostrar la celda $A$1 de "x" hojas de cálculo distintas y actualizarse cada vez que modifique una de las Excel.

Ahora mismo en la tabla Access tengo un campo con un hipervínculo a cada Excel.

Aviso, se muy poquito de programación en Access y supongo que hacer esto si se puede no será fácil para novatos. Así que os ruego paciencia conmigo.
Gracias de antemano.
Arriba
lbauluz Ver desplegable
Administrador
Administrador
Avatar

Unido: 29/Marzo/2005
Localización: Prisión Brieva
Estado: Sin conexión
Puntos: 3195
Enlace directo a este mensaje Enviado: 21/Agosto/2018 a las 02:28
En ese caso lo más fácil es que crees una macro en Excel que cada vez que se modifique la celda haga un update en esa tabla.

Luis
Those are my principles, and if you don't like them... well, I have others. Groucho Marx
Arriba
Capasio Ver desplegable
Nuevo
Nuevo


Unido: 20/Agosto/2018
Localización: España
Estado: Sin conexión
Puntos: 5
Enlace directo a este mensaje Enviado: 22/Agosto/2018 a las 10:09
Gracias por la idea. Seguro que funciona pero solo se crear macros por grabación.

Creo que mi problema es una simple cuestión de sintaxis con el generador de expresiones pero no lo he planteado bien.

Lo que quiero probar a ver si funciona (puesto que ya tengo para cada registro la ruta y el nombre de la hoja de cálculo en el campo "hipervínculo") es a través de una consulta, crear un campo calculado que me devuelva el contenido de la celda $A$1 de la hoja "hoja1" de la Excel cuya ubicación y nombre está contenida en el campo "hipervínculo".

Gracias. 
Arriba
fcoval Ver desplegable
Habitual
Habitual


Unido: 19/Enero/2013
Estado: Sin conexión
Puntos: 110
Enlace directo a este mensaje Enviado: 24/Agosto/2018 a las 08:10
Publicado originalmente por Capasio Capasio escribió:

Lo que quiero probar a ver si funciona (puesto que ya tengo para cada registro la ruta y el nombre de la hoja de cálculo en el campo "hipervínculo") es a través de una consulta, crear un campo calculado que me devuelva el contenido de la celda $A$1 de la hoja "hoja1" de la Excel cuya ubicación y nombre está contenida en el campo "hipervínculo".


Lo que te indica el compañero es lo mas práctico.

Pero puesto a probar lo que dices...

Supongamos que tienes una TABLA con dos campos llamados "Ruta" y otro "Fichero"

Creamos esa CONSULTA basada en esa tabla y donde llamamos a la funcion
TraerDatoExcel([Ruta] & [Fichero])


Y en un módulo la función

Cita

Function TraerDatoExcel(RutaFicheroExcel) As String

    Dim xls As Object, ValorCelda As String
    Set xls = CreateObject("Excel.Application")
    
    xls.Workbooks.Open (RutaFicheroExcel)
    ValorCelda = xls.Worksheets("Hoja1").Range("A1")
    Debug.Print ValorCelda
    TraerDatoExcel = ValorCelda

    xls.Quit
    Set xls = Nothing
    
End Function



Arriba
Capasio Ver desplegable
Nuevo
Nuevo


Unido: 20/Agosto/2018
Localización: España
Estado: Sin conexión
Puntos: 5
Enlace directo a este mensaje Enviado: 27/Agosto/2018 a las 10:09
fcoval: Le has dado de lleno. Funciona perfectamente. Es justo lo que necesitaba.

Muchísimas gracias!!!
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable