EXCEL2003: Cambiar Origen de Datos Externos

15/11/2008 - 00:48 por MEG | Informe spam

Hola a todos,

Lo que quiero hacer es cambiar el origen de datos externo (Access) a través
de un código VBA pero no se como, aquí les indico los datos a ver si me
pueden ayudar.

Tengo lo siguiente:

1) Libro de Excel
Ubicación: C:\Users\usuarioX\Desktop\BD_Prueba\EX1.xls
Llamado: EX1
Contiene: solo una hoja llamada HDatos
Datos Externos: Origen de Datos ODBC (Access)
Pegar Datos Externos: a partir de la cela A1

2) BD Access
Ubicación: C:\Users\usuarioX\Desktop\BD_Prueba\BD_Access\BDA.mdb
BD Llamado: BDA
Contiene: la Consulta que se Conecta con Excel (EX1.xls)
Consulta llamada: CBD1
Campos de la Consulta: Nombres, Apellidos, Telefono.

Ahora con los datos anteriores como puedo hacer, con códigos, para cambiar
la Ruta de la Data de Access (BDA.mdb) que lee el Libro de Excel (EX1.xls).

Gracias por la ayuda.

NOTA: si me pueden dar un ejemplo con los datos anteriores seria estupendo.

Saludos,

MEG

Siga el debate

6 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#6 Héctor Miguel

19/11/2008 - 21:47 | Informe spam

hola, !

Gracias por el Truquillo, lo voy a intentar, pero lo que quiero hacer es exactamente lo que tu me indicas:
1.- "mientras sigas usando el metodo .Add"... Exactamente quiero cambiar el .add por un .Actualizar, pero no se como hacerlo.
2.- "una alternativa es modificar la ruta al archivo de origen por macros". Esto seria fabuloso!! Pero como lo hago?

Realmente me interesa que me ayudes con el codigo o indicandome que paginas Web puedo visitar donde pueda conseguirlo...

- si te funciona el "truquillo" del mensaje anterior (probando desde la ventana de inmediato)...
- lo unico que necesitaras es adaptarlo en alguna macro de "cambio de ubicacion" de los datos de origen (es decir)...
- usando la misma instruccion (en caso de funcionar) que aplicaste en la segunda instruccion desde la ventana de inmediato...

activesheet.querytables(1).connection = "pon aqui la cadena EDITADA y delimitada por comillas dobles"

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ previos __

una alternativa es modificar la ruta al archivo de origen por macros... o... (un truquillo +/- como el siguiente)...

-> si se trata de -solo- una tabla de consulta (o por cada una) sin escribir macros... prueba a hacer lo siguiente:
a) activa/selecciona/... la hoja donde esta ubicada la tabla y ve al editor de vba -> atajo = {Alt}+{F11}
b) (ya en el editor de vba) -> presenta la ventana de inmediato (menu) ver / ventana inmediato (o el atajo {ctrl}+G)
c) (en la ventana de inmediato) -> ejecuta la siguiente instruccion...
? activesheet.querytables(1).connection (y pulsa {enter})
-> nota el signo de cierre de interrogacion inicial <-
-> te devolvera en la siguiente linea la cadena con la conexion al origen de datos ;)
d) usa/aprovecha/... la linea anterior y... EDITA las partes que sean necesarias (driver/proveedor, archivo, tabla... etc.)
e) una vez EDITADA/corregida/actualizada/... la cadena de conexion... -> ejecuta una nueva instruccion (casi la misma)...
activesheet.querytables(1).connection = "pon aqui la cadena EDITADA y delimitada por comillas dobles"
-> pulsa {enter} -> regresa a excel -> hazle un refresco a la consulta y...

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida