Sub ImportRegBDADOaExcel() Dim ac As Access.Application Dim cn As ADODB.Connection Dim rs As New ADODB.Recordset Dim intLineaExcel As Integer Dim strRutaBase As String Call Ruta ’ Conexión a la base de datos BDClientes.mdb Set cn = New ADODB.Connection Set rs = New ADODB.Recordset With cn .Provider = "Microsoft.ACE.OLEDB.12.0" ...
Suscripción
acceso ilimitado a todos los libros de ENI sin compromiso de permanencia
libro impreso o digital online