Csr2 Tempest 2 Boss Times, Finland Russia Relations, Articles C

En nuestros trabajos muchas veces dependemos de diferentes tecnologas para obtener un determinado resultado, Excel nos es la nica herramienta con la que tenemos que trabajar, un ejemplo es el uso de SQL o de Access a la hora de extraer, tratar y mostrar la informacin. Dim conAccess As ADODB.Connection Los nombres deben ser iguales a los que tiene la base de datos de Access (respetando si estn en maysculas o minsculas). With ActiveWorkbook.Connections(Datos6).OLEDBConnection, .BackgroundQuery = True .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=C:\cadena de conexion archivo access.accdb;" Muchas gracias por la consulta. Desprotegemos el libro introduciendo la contrasea. strSQL = "SELECT * FROM " & strTabla & " " Llevo mas de 100 libros. El problema que puedes estar teniendo es el siguiente, se debe al cifrado de la contrasea: debes hacer las siguientes modificaciones en Access, entra en OPCIONES, luego vas a CONFIGURACIN DE CLIENTE y en donde pone METODO DE CIFRADO, debes elegir USAR CIFRADO HEREDADO. Elimine los valores duplicados en el archivo de origen e intente importarlo de nuevo. Set cn = Nothing .Execute obSQL En el mensaje de estado, tambin se menciona el nombre de la tabla del registro de errores, que contiene la descripcin de cualquier error producido durante la operacin de importacin. Aumente el ancho de la columna en la vista Hoja de datos. Elija los pasos que coincidan con su versin de Access: Si usa la versin ms reciente de la versin de suscripcin Microsoft 365 de Access o Access 2019, en la pestaa Datos externos , en el grupo Importar & vnculo , haga clic en Nuevo origen de datos > Desde archivo > Excel. Durante estos das realizar una prueba y te lo confirmo. Si no lo tiene instalado, ver el siguiente error al conectarse a libros heredados: .ServerCredentialsMethod = xlCredentialsMethodIntegrated Al mover datos de Excel a Access, hay tres pasos bsicos para el proceso. Siga este procedimiento: Haga clic en la pestaa Archivo, en Nuevo y, a continuacin, haga clic en Base de datos en blanco. Hola Francisco: Los procedimientos de esta seccin explican cmo se debe preparar y ejecutar una operacin de importacin, as como la forma de guardar la configuracin de importacin para usarla ms adelante. Si selecciona Permitir a Access agregar la clave principal, Access agrega un campo Autonumeracin como primer campo en la tabla de destino y lo rellena automticamente con valores de identificador nicos a partir de 1. https://excelsignum.com/2016/05/01/combobox-dependientes-en-userform-con-sql/. Nota: En Excel para la Web, no puede crear rangos con nombre. Solo tienes que guardar a hoja de Excel en la que tienes la macro como xlsx donde el lmite de filas es de 1.048.576 cnn.Properties("Jet OLEDB:Database Password") = "" Ventas Valores numricos en lugar de valores de fecha. La solucin es sencilla. Set cn = GetObject(, "Access.Application") Buenas Segu, fabulosa la aportacin. Si los datos aparecen truncados en una columna de la tabla de Access, intente aumentar el ancho de la columna en la vista Hoja de datos. Pues la respuesta es exactamente el cdigo del ejemplo, lo que hace es descargar desde Access una tabla o una consulta y llevarla a excel, a este procedimiento lo denomina actualizar, que es lo mismo que descargar. En este ejemplo se trata de proteger el libro, para el ejemplo de proteger la hoja, solo tienes que cambiar en la macro: ActiveWorkbook. En la aplicacion que desarrolle se muestran unicamente los formularios de consulta que manipula el usuario. PD: doy por supuesto que en Access tienes dos tablas que se llaman resultados1 y resultados2. Si una o varias celdas de una hoja de clculo o un rango contienen valores de error, corrjalos antes de iniciar la operacin de importacin. OLEBD\DATABASE.accdb Para conectarse a Excel desde Power Apps, siga estos tres pasos. Se inicia el Asistente para vinculacin de hojas de clculo para guiarle durante el proceso de vinculacin. Tu opinin es muy importante para m. Recomendamos que d formato a una columna si incluye valores de tipos de datos distintos. Set cn = GetObject("", "Access.Application") saludos! .Open Al igual que la macro anterior, solo debes indicar el nombre de la base de datos de Access, la hoja (o nombre de la hoja, donde estn los datos a actualizar en Excel), la ruta al archivo de Access y al de Excel. strSQL = SELECT * FROM & strTabla & ActiveSheet.Protect contrasea Si la hoja de clculo o el rango contienen celdas en blanco, intente agregar los datos que faltan. End With, sSQLQuery = SELECT * & vbCr Hola, gracias por el tutorial, sin embargo no me abre la base de datos, tengo todos los componentes que indicas tikeados, sin embargo an as no lo hace. Aunque puede elegir un tipo de datos distinto, recuerde que los valores que no son compatibles con el tipo de datos que elige se omitirn o se convertirn incorrectamente durante el proceso de importacin. Cualquier cambio que realice en las celdas de origen en Excel aparece en la tabla vinculada. Y tengo activas las siguientes Referencias: Si ve errores o datos incorrectos en alguna parte de la tabla, ejecute la accin adecuada tal como se describe en la tabla siguiente e intente vincular de nuevo. Estoy haciendo una aplicacin en access en las que unas tablas (resultados1 y resultados2 )alimentadas desde un formulario las envo a excel con el evento al salir del formulario,porque tengo que hacer unos clculos y lo hago de la siguiente manera. Hola Gonzalo, Doy por supuesto que has intentado introducir la contrasea en la parte de la macro: cnn.Properties(Jet OLEDB:Database Password) = tucontrasea. Si un nombre de columna incluye algunos caracteres especiales, no se puede utilizar como nombre de campo en Access. bBien = True Sub Macro_hoja_protegida() Agregue una referencia a la biblioteca de objetos de Microsoft Excel. 27K views 10 years ago Conceptos bsicos - Clase 1 - Programacin del Excel con VBA Excel Hecho Fcil 1M views. Como solucin alternativa, puede quitar la etiqueta antes de importarla y, despus, volver a aplicarla despus de importarla. Si la primera fila de la hoja de clculo o el rango con nombre contiene los nombres de las columnas, puede especificar que Access trate los datos de la primera fila como nombres de campo durante la operacin de vinculacin. Tengo la versin 2010. Para ver los nombres de los campos, abra la tabla en la vista Diseo en Access. .CommandType = xlCmdTableCollection Hola Joaqun. En la segunda pgina del asistente, haga clic en Mostrar hojas de clculo o en Mostrar rangos con nombre, seleccione la hoja de clculo o el rango con nombre que desee importar y haga clic en Siguiente. Exit Sub Dim bBien As Boolean volvemos a aplicar la contrasea. Todas las que indicas tu menos la ltima (Microsoft Forms 2.0 Object Library) Gracias Segu Te dejar de mano por si tengo mas dudas con lo que estoy haciendo. De esta forma te aseguras que la informacin est oculta a los dems usuarios. Sin embargo, si la hoja de clculo o el rango de origen incluye una columna que contiene solo valores de -1 o 0, Access crea de forma predeterminada un campo numrico para el columna. Un dato importante, de la macro que os acabo de mostrar es la ruta de acceso a la base de datos, veamos que es lo que aparece: 'CONECTAMOS CON LA BASE DE DATOS DE ACCESS Y ABRIMOS CONSULTA Si su objetivo es guardar parte o todos los datos de una o varias hojas de clculo de Access, debe importar el contenido de la hoja de clculo a una base de datos de Access nueva o existente. Revise los datos de origen y ejecute una accin tal como se describe en esta tabla. DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, resultados1, C:\Users\Joaquin\Desktop\autonomo.xlsm, True Respondo a tus preguntas: Antes de iniciar la operacin de importacin, decida si desea guardar los datos en una tabla nueva o existente. En la primer corrida, me copia la primer tabla, en la segunda corrida, de repente envia el error que pusiste por default a veces, solo me copia un numero pequeo de columnas, no todas. End With Set cn = GetObject(, "Access.Application") str = cn.CurrentDb.Properties("Pruebas") La lista de valores se trata como un valor nico y se incluye en un campo de texto. Nota:Microsoft Access no admite la importacin de datos de Excel con una etiqueta de confidencialidad aplicada. No obstante, si la tabla contiene campos que no existen en el origen, no es necesario que los elimine de la tabla si aceptan valores nulos. Access revisa las primeras ocho filas en cada columna y sugiere el tipo de datos para el campo correspondiente. Sin embargo, a la hora de importa tendrs el siguiente problema, y es que los registros se irn duplicando a medida que vayas importando, dado no ests actualizando, sino que simplemente importas. strSQL = "SELECT * FROM " & strTabla & " " En la tabla siguiente se describen los pasos que puede ejecutar para corregir valores que faltan o son incorrectos. Puedes realizar lo que indicar accediendo al formato de la hoja seleccionarla toda y con botn derecho desproteger todas las celdas. Esta operacin no est disponible si la base de datos no contiene ninguna tabla. Antes de entrar en el programador vamos a colocar un botn para ejecutar la macro. Por el contrario, si la operacin no se ejecut correctamente, Access mostrar el mensaje Error al intentar importar el archivo. Cierre el archivo de origen si est abierto. OLEBD\DATABASE.accdb" Hola buenas tardes, excelente post, algo asi ando buscando pero para una base de datos de Postgresql mediante consultas desde Excel. El nmero de columnas de origen no puede ser superior a 255 porque Access no admite ms de 255 campos en una tabla. No obstante, si la hoja de clculo o el rango de origen incluye una columna que contiene solo valores -1 o 0, Access, de forma predeterminada, crea un campo numrico para la columna y no podr cambiar el tipo de datos del campo correspondiente de la tabla. DoCmd.DeleteObject acTable, "resultados2" .Execute obSQL Si desea agregar, editar o eliminar datos, debe realizar los cambios en el archivo de origen. Saludos. En un fichero comprimido rar. Dim conAccess As ADODB.Connection If cn Is Nothing Then Prueba y luego de dices si te ha funcionado onda el cifrado heredado. End With. A continuacin, haga clic en Siguiente. Ahora tengo una pregunta, como puedo hacer si lo unico que quiero es una macro para que descargue una tabla de access a excel? En cualquier caso, en breve realizar una entrada relacionada con tu pregunta. Los valores de fecha que aparecen en columnas numricas se convierten incorrectamente en nmeros. Sobre este punto no tengo desarrollos realizados, pero s te puedo orientar a otro blog donde se hace un buen e interesante planteamiento, se trata de JLD Excel en Castellano de Jorge L. Dunkelman, y en concreto el post de referencia sera este: http://jldexcelsp.blogspot.com.es/2009/06/transferir-datos-de-excel-access_11.html En la ventana Elegir origen de datos elegimos <Nuevo origen de datos> y damos clic en Aceptar. cn.UserControl = True .Name = Datos6 If Not bBien Then Ok, envame el Access (con estructura de datos para realizar pruebas) , para ver si se puede realizar todo en Access. With ActiveWorkbook.Connections(Datos6) Romper un vnculo. Importante:Aunque el mensaje de estado indique que se ha realizado la operacin correctamente, debe revisar el contenido y la estructura de la tabla para asegurarse de que todo se vea correctamente antes de empezar a usar la tabla. Al abrir un libro de Excel en Access (en el cuadro de dilogo Abrir archivo, cambie el cuadro de lista Tipo de archivo a Archivos de Microsoft Office Excel y seleccione el archivo que desea), Access crea un vnculo al libro en lugar de importar los datos. Si el tipo de datos es incorrecto, es posible que vea valores nulos o incorrectos en toda la columna tras finalizar la operacin de importacin. Lo que he pensado es poner un boton Actualizar, pero no he encontrado nada para excel y postgresql. Por ejemplo: Un campo de S/No muestra -1 y 0 en la vista Hoja de datos tras finalizar la operacin de importacin. Nota: El comando Modificar vnculos no est disponible si el archivo no contiene vnculos a otros archivos. Un poco de teora y prctica y estars 100%, Un abrazo y ya sabes, si tienes alguna consulta, estoy a tu disposicin , Hola buen dia, gracias por la herramienta tan util que has dejado por aca. Si el rango incluye celdas combinadas, el contenido de la celda se coloca en el campo que corresponde a la columna ms a la izquierda y los otros campos se dejan en blanco. Hola Kiko, tal y como te comentaba, la mejor solucin sera adaptar la macro que has enviado a la que propongo en este artculo. Si has utilizado alguno de los muchos recursos de esta web y quieres escribir una resea puedes hacerlo entrando en la pgina: ESCRIBE UNA RESEA, 'CONECTAMOS CON LA BASE DE DATOS DE ACCESS Y ABRIMOS CONSULTA, 'EN CASO QUE LA BASE DE DATOS TENGA UNA CONTRASEA, SE DEBE PONER AQU, 'LIPIAMOS DATOS DE EXCEL ANTES DE ACTUALIZAR, "G:\PRUEBAS ACCESS\CONEXION ACCESS Y EXCEL. Es usuario de Excel desde hace tiempo pero para seguir avanzando desea utilizar Access para trabajar con estos datos. automticamente se iniciar el asistente para la vinculacin de hojas de clculo para ayudarte en todo el proceso de vinculacin. Ahora comprendo, puedes ejecutar un proceso colocando en thisworkbook el siguiente cdigo: Private Sub Workbook_Open() En este tema, se explica detalladamente cmo importar datos de Excel o crear vnculos que redirijan a estos desde bases de datos de escritorio de Access. Para analizar cual puede ser problema que afecta a tu proyecto necesitara realizar pruebas sobre la base de datos (o similar). 'especificar nombre de tablas en access y excel Este vdeo muestra cmo vincular una tabla de Excel desde Access para poder aprovechar las herramientas que ofrece Access para manipular la informacin. Saludos. Reemplace todos los valores de texto por valores que coincidan con el tipo de datos del campo de destino e intente importar de nuevo. Si desea un campo S/No en la tabla vinculada, asegrese de que la columna de origen incluye valores VERDADERO y FALSO. DoCmd.DeleteObject acTable, "resultados2" Haga clic con el botn secundario en el rango seleccionado y, a continuacin, haga clic en Asignar nombre a un rango o en Definir nombre. Tengo una pregunta si intente realizar la conexin con una consulta de anexar o de actualizacin y no me pega la informacin en el excel a que se debe. Para vincularse a datos en varios lugares de un libro, repita la operacin de vinculacin para cada hoja de clculo o rango. Los valores numricos que aparecen en columnas de fecha se convierten incorrectamente en fechas. Hay software del tipo, pero no me agradan del todo. Si aparece el cuadro Importar a Visio y el programa Excel, haga clic . Otra forma, menos agresiva es eliminar solo los registros de la tabla de access y luego actualizar con los datos de la hoja de Excel. Resume Salir Entonces pens en volcar toda la informacin a excel, ingreso y ventas (resultados1) y compras y gastos (rtesultados2), en un evento al grabar los asientos. Puede establecer el sistema de fechas en Opciones de Excel: Opciones de> de archivo > sistema de fechas Uso avanzado> 1904. Puede modificar la base de datos del ejemplo, y en el campo provincia incluir algunos valores como despachado, anulado, pendiente y te devolver los registros filtrados. Piensa en realizar la adaptacin, merece la pena. Tengo una pregunta y no se si tengas ya el articulo al respecto. conExcel = [Excel 8.0;HDR=Yes;DATABASE=C:\cadena de conexion excel.xls]. & Origen Si la tabla ya existe, Access muestra un mensaje en el que se le pregunta si desea sobrescribir el contenido existente de la tabla. .Open OLEBD\DATABASE.accdb" cambi a cifrado heredado, volv a poner contrasea y todo OK.. DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, resultados2, C:\Users\Joaquin\Desktop\autonomo.xlsm, True Cuando se vincula a una hoja de clculo de Excel o un rango con nombre, Access crea una nueva tabla vinculada a las celdas de origen. .CommandText = CABECERA,CARGOS_FACTURA,CARGOS_PREFACTURA,CENTRO_COSTE,CLIENTE,CUOTAS,DESCUENTOS_FACTURA,DESCUENTOS_PREFACTURA,DESCUENTOS_TELEFONO,DETALLE,FACTURA,PREFACTURA,RESUMEN,SERVICIO,SUB_CCOSTE,TELEFONO,TOTALES_CLIENTE,TOTALES_SERVICIO,TOTALES_SOPORTE,VARIOS Compras Si la primera fila de la hoja de clculo o del rango de origen contiene los nombres de campos, seleccione La primera columna contiene encabezado de columna y haga clic en Siguiente. Si la hoja de clculo o el rango de origen incluye una columna que contiene solo valores VERDADERO o FALSO, Access crea un campo S/No para la columna en la tabla vinculada. si la tiene debes especificarla en la macro. Para almacenar los datos en una tabla nueva, seleccione Importar el origen de datos en una nueva tabla de la base de datos actual. Gracias por el aporte. Puede que no algunas referencias no las tengas instaladas, Forms no es relevante, pero el recorset s. Hay hay alguna forma de generar alguna interface que me permita abrir un programa de base de datos y de ah jalar mi libro de excel segn el nombre ? Para establecer la conexin, cree una nueva variable llamada %Excel_File_Path% e inicialcela con la ruta del archivo de Excel. Sub UpdateAccess() Los resultados de una columna o celdas calculadas se muestran en el campo correspondiente pero no puede ver la frmula (o la expresin) en Access. Es posible que tenga que establecer la propiedad Formato de algunos campos en la vista Diseo para asegurarse de que los valores se muestran correctamente en la vista Hoja de datos. Seleccione el libro de trabajo de Excel al que quiera conectarse y, a continuacin, haga clic en Abrir. Si lo desea, puede realizar alguna de estas tareas. Edito el mensaje. Aqu importa la tabla completa, solo tendras que modificar la consulta sql para que te trajese los datos segn consulta. Despus de investigar las posibles alternativas a tu comentario, lo ideal es que realices un trabajo previo en Access, es decir, que desde la base de datos principal utilices la herramienta de importacin de datos externos e importes la base (o bases) de datos que necesites y ah selecciones las tablas o consultas que te interesen. Las opciones que tengo en el cuadro combinado son: despachado, anulado, pendiente, quisiera que al momento de seleccionar uno de ellos me muestre en excel toda la informacin con respecto a ese estado. Para evitar esto, reemplace los valores de fecha por valores numricos en la columna de origen e intente importar de nuevo. Ms informacin sobre vnculos externos. Porque la idea es que una vez excel recibe los datos realizar unos clculos y automticamente recupere esos clculos en access para realizar un informe. Nota:La pestaa Datos externos no est disponible a menos que est abierta una base de datos. cnn.Properties(Jet OLEDB:Database Password) = cnn.Provider = Microsoft.ACE.OLEDB.12.0 Verifica esto, si ves que sigue el error, y para descartar problemas, puedes enviarme la base de datos (una muestra o ejemplo) en access y el excel con la macro que ests implementando. Haga clic con el botn secundario en del rango seleccionado y, a continuacin, haga clic en Asignar nombre a un rango o en Definir nombre. Para resolver esto, tras finalizar la operacin de importacin, establezca la propiedad Formato del campo en S/No para ver en su lugar las casillas de verificacin. Es decir quiero totalizar por trimestres todas ventas y gastos y no lo consigo hacer con consultas.He probado con consultas de tablas cruzadas pero no consigo los resultados. En cada uno de los pasos os he ido comentando (en verde) qu es lo que hace la macro en cada momento. Supongo que tu pregunta se refiere a si en vez de ser una tabla, se puede conectar y actualizar una consulta de Access. recSet.Open strSQL, cnn, La ruta que aparece en rojo la debis modificar antes de probar la macro, en mi PC dispongo de unidad G (como disco externo), y el ejemplo lo tengo en una carpeta llamada PRUEBAS ACCESS y a su vez en otra carpeta denominada CONEXIN ACCESS Y EXCEL, dentro est la base de datos DATABASE.accdb. End If Worksheets("Hoja1").Select Formato Macro *" & _ .Open Access explora las ocho primeras filas de origen para determinar el tipo de datos de los campos de la tabla. Otra alternativa, puede ser, realizar una consulta con todos los archivos Error, y disponer los datos de forma que los puedas importar a Excel en una sola hoja reporte (con la macro de mi ejemplo puedes importar consultas). Gracias por el aporte de la conexin y copia a Excel de una tabla. For i = 0 To lngCampos - 1 End With .RefreshOnFileOpen = False Cree que se pueda actualizar la base de datos desde un formulario mediante un boton de comando?, porque excel tiene instrucciones de actualizar cada 20 minutos en egundo plano pero no lo hace. Para conectar un archivo .csv, use el conector del archivo de texto. End Sub. Guardar la informacin le ayuda a repetir la operacin sin tener que examinar el Asistente cada vez. para todas las filas de datos. Sheets("Hoja1").Cells(1, i + 1).Value = recSet.Fields(i).Name Excel dispone de muchas frmulas y funciones, como la funcin de Excel BDVAR y BDVARP, muy utilizadas en base de datos estadsticos para calcular diferencias demogrficas. DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12, resultados2, C:\Users\Joaquin\Desktop\autonomo.xlsm, True Origen = "[hoja de excel con los datos a introducir, ejemplo: Hoja1$]" Excel no proporciona ninguna funcionalidad para crear una base de datos de Access a partir de datos de Excel. cn.UserControl = True Set conAccess = New ADODB.Connection Text_NombILEBus.Text = adoconsulta!Nombre, adoConexion.Close Hola estimado, me ha funcionado perfecto con tablas. El nombre de la tabla es la misma que est en la macro? En Access, no es posible vincular a elementos grficos en una hoja de clculo de Excel, como logotipos, grficos e imgenes. Si ve valores de error o datos incorrectos, debe solucionar el problema en los datos de origen. G:\PRUEBAS ACCESS\CONEXION ACCESS Y EXCEL. Mi consejo es que entres en la base de datos de access y desde ah ocultes el panel de navegacin directamente: Archivo > Opciones > Base de datos Actual > Navegacin y desmarcas Mostrar Panel de Navegacin. DoCmd.DeleteObject acTable, "resultados1" Durante la operacin de importacin, puede especificar un tipo de datos que sea compatible con los resultados de la frmula, como un Nmero. La columna de origen contiene valores de fecha en algunas de las primeras ocho filas y ha intentado importarla a un campo numrico. Un valor infringe la regla establecida mediante la propiedad ReglaDeValidacin para este campo o tabla. 'indicar la base base de datos Si la hoja de clculo o el rango con nombre incluyen celdas combinadas, el contenido de la celda se coloca en el campo que corresponde a la columna ms a la izquierda y los otros campos se dejan en blanco. On Error Resume Next End Sub. End Sub. alquiler Asimismo, es una buena costumbre dar formato a cada columna de origen en Excel y asignar un formato de datos especfico a cada columna antes de comenzar la operacin de importacin. Excel para Windows puede usar dos sistemas de fechas: El Sistema de fechas de 1904 (en el que los nmeros de serie oscilan entre 0 y 63.918), que corresponden a las fechas del 1 de enero de 1904 al 31 de diciembre de 2078. En cuanto tenga un momento, reviso los archivos. End Sub. Leyendo lo que comentas, no me queda claro cal es la disposicin de los datos en el archivo Excel denominado Reporte. Vaya a los pasos siguientes para ejecutar la operacin de importacin. Has codificado las referencias en el archivo de Excel en caso de estar utilizando uno diferente al de la descarga? Se le pedir que d un nombre posteriormente a esta tabla. Next Como vincular una tabla de Excel con Access | 5 motivos para integrar Access y Excel 2 - YouTube 0:00 / 5:30 Como vincular una tabla de Excel con Access | 5 motivos para. Dim conAccess As ADODB.Connection En una intranet hay cientos de computadoras conectadas, cada una de ellas tiene un archivo .mdb, cada archivo tiene varias tablas (la que me interesa es la primera de ellas que se llama Error, en una carpeta logre juntar cada archivo .mdb, ahora bien lo que quiero hacer es conectar cada una de las tablas Error a un archivo denominado Reporte en Excel en el cual tengo un formato, lo que quiero es hacer una conexion de cada tabla hacia excel y que al modificar un dato en excel se modifique en el archivo .mdb y viceversa, Gracias de antemano. With conAccess La tabla muestra los datos en la hoja de clculo o el rango con nombre de origen pero no almacena realmente los datos en la base de datos. por ActiveSheet. sSQLQuery = sSQLQuery & WHERE Folio = & Text_folioILE.Text & & vbCr, adoRegistros.Open sFolio, adoConexion, adOpenStatic, adLockReadOnly, If adoRegistros.BOF = adoRegistros.EOF And adoRegistros.EOF = False Then, Text_folioILE.Text = adoconsulta!Folio cnn.Close: Set cnn = Nothing Si la primera fila contiene encabezados de columna, el orden de las columnas y campos no tiene por qu coincidir pero el nombre y el tipo de datos de cada columna deben coincidir exactamente con los de su campo correspondiente. Especifique cmo desea guardar los datos importados. path_Bd = "G:\PRUEBAS ACCESS\CONEXION ACCESS Y EXCEL. 4 Trim. Lo primero que se va a realizar es declarar las variables para conectar Excel con Access estas son las variables necesarias: Dim cn As ADODB.Connection, rs As ADODB.Recordset Luego de ello se crea un objeto conexin y un objeto recordset de esta manera: Set cn = New ADODB.Connection Set rs = New ADODB.Recordset 'EN CASO QUE LA BASE DE DATOS TENGA UNA CONTRASEA, SE DEBE PONER AQU As es como funcionara: Los ejemplos de este ejercicio estn basados en Excel 2010 y Access 2010, en versiones anteriores puede dar problemas, para Access 2003 (archivos .mdb) abra que modificar la macro donde pone: cnn.Provider = Microsoft.ACE.OLEDB.12.0 se debe poner: cnn.Provider = Microsoft.Jet.OLEDB.4.0.