Re: Macros de Excel: SalidaHacia y TransferirHojaCálculo.
Enrique Fowler Newton
Access con "exportar" van a esa carpeta.
--
Saludos,
Enrique Fowler Newton
http://webs.uolsinectis.com.ar/efn
"Wallas mouse" <wal...@prixon.com> escribió en el mensaje de noticias
news:urtNUZQX...@TK2MSFTNGP06.phx.gbl...
Hola Enrique, ¿Tiene permisos el usuario para utilizar la carpeta? Si no es
así:
Botón derecho del ratón, pestaña SEGURIDAD, agregar usuario y para finalizar
marca los privilegios.
Saludos,
WALLAS
"Enrique Fowler Newton" <e...@uolsinectis.com.ar> escribió en el mensaje
news:3B1D8380-E33E-49BB...@microsoft.com...
En Access 97 tenía una base de datos (MDB) que exportaba tablas de una
base de datos como archivos Excel 97 (XLS) usando la acción
TransferirHojaCálculo. Funcionaba.
Cuando la corrí desde Access 2007, las acciones de exportación dejaron de
funcionar.
Resolví reescribir las líneas, en una macro de prueba, pero me encontré
que la acción TransferirHojaCálculo no es aceptada por Access porque no
figura en la lista de acciones disponibles, que termina en
SeleccionarObjeto.
En la Ayuda, encontré la acción SalidaHacia y la usé con estos datos:
La corrí y me apareció este aviso de error:
El archivo a ser creado no está abierto, no estoy usando una plantilla,
tengo suficiente espacio en disco, la ruta de acceso existe y escribo
habitualmente en la carpeta especificada.
Otra pantalla me dice que se trata del "error 2950".
¿Alguna sugerencia?
Nota: mientras trato de encontrar la solución me arreglo con Datos
Externos > Exportar.
Saludos,
Enrique Fowler Newton
http://webs.uolsinectis.com.ar/efn
Enrique Fowler Newton
Apliqué tu sugerencia y obtuve este código:
Function Macro1()
On Error GoTo Macro1_Err
DoCmd.OutputTo acOutputTable, "Para Excel: Cobros",
"ExcelWorkbook(*.xlsx)", """C:\Users\EFN\Documents\Finanzas\De Access a
Excel Cobros (2).xlsx""", False, "", 0, acExportQualityPrint
Macro1_Exit:
Exit Function
Macro1_Err:
MsgBox Error$
Resume Macro1_Exit
End Function
Desde VBA, ejecuté y me dio "error de compilación, no se puede encontrar el
proyecto o la biblioteca". Con "paso a paso" me da lo mismo.
Ejecuté "Inspección rápida" sobre la línea
DoCmd.OutputTo acOutputTable, "Para Excel: Cobros",
"ExcelWorkbook(*.xlsx)", """C:\Users\EFN\Documents\Finanzas\De Access a
Excel Cobros (2).xlsx""", False, "", 0, acExportQualityPrint
y me dio que es una expresión no válida.
Noto que el traductor a módulos incluyó la palabra "function". No se mucho
de VBA, pero entiendo que una función no ejecuta acciones (en el caso
"SalidaHacia") sino que devuelve valores.
Me queda por saber si "TransferirHojaCálculo" está o no entre las acciones
aceptadas por Access 2007. Como les dije, mi lista termina en
"SeleccionarObjeto".
Saludos,
Enrique Fowler Newton
http://webs.uolsinectis.com.ar/efn
"Javier Terán González" <javi...@hotmail.comnospam> escribió en el mensaje
de noticias news:O5$jjZQXI...@TK2MSFTNGP04.phx.gbl...
Convierte la macro a un módulo VBA e intenta hacer una depuración paso a
paso para ver si sacas algo mas en claro.
Un saludo.
"Enrique Fowler Newton" <e...@uolsinectis.com.ar> escribió en el mensaje de
noticias:3B1D8380-E33E-49BB...@microsoft.com...
Enrique Fowler Newton
Apliqué tu sugerencia y obtuve este código:
Function Macro1()
On Error GoTo Macro1_Err
DoCmd.OutputTo acOutputTable, "Para Excel: Cobros",
"ExcelWorkbook(*.xlsx)", """C:\Users\EFN\Documents\Finanzas\De Access a
Excel Cobros (2).xlsx""", False, "", 0, acExportQualityPrint
Macro1_Exit:
Exit Function
Macro1_Err:
MsgBox Error$
Resume Macro1_Exit
End Function
Desde VBA, ejecuté y me dio "error de compilación, no se puede encontrar el
proyecto o la biblioteca". Con "paso a paso" me da lo mismo.
Ejecuté "Inspección rápida" sobre la línea
DoCmd.OutputTo acOutputTable, "Para Excel: Cobros",
"ExcelWorkbook(*.xlsx)", """C:\Users\EFN\Documents\Finanzas\De Access a
Excel Cobros (2).xlsx""", False, "", 0, acExportQualityPrint
y me dio que es una expresión no válida.
Noto que el traductor a módulos incluyó la palabra "function". No se mucho
de VBA, pero entiendo que una función no ejecuta acciones (en el caso
"SalidaHacia") sino que devuelve valores. He probado cambiar "function" por
"sub" pero nada se modifica.
También me queda por saber si "TransferirHojaCálculo" está o no entre las
acciones
aceptadas por Access 2007. En
http://office.microsoft.com/es-es/access/HA012263083082.aspx se dice que sí
pero mi Access me presenta una lista de acciones que termina en
"SeleccionarObjeto". ¿Alguien querría ver si le sucede lo mismo?
Javier Terán González
DoCmd.OutputTo acOutputTable, "contactos", "ExcelWorkbook(*.xlsx)",
"D:\Users\javiteran\Documents\b.xlsx", False, "", 0, acExportQualityPrint
lo he copiado del que tu me has enviado en el código vba.....
Lo único raro que veo es lo primero:
La consulta o tabla que quieres exportar se llama "Para Excel: Cobros".
Buff, un nombre un poco raro, pero debería de funcionar
Si es una tabla el primer parámetro es acOutputTable
Si es una consulta el primer parámetro acOutputQuery
También me ha dado error al tener una triple comilla el nombre del fichero,
prueba a dejar el nombre del fichero sólo con una comilla al principio y
otra al final como en el ejemplo que te mando..
Pruebalo desde vba con la tecla F5 cuando estés dentro de la función.
Un saludo.
"Enrique Fowler Newton" <e...@uolsinectis.com.ar> escribió en el mensaje de
noticias:8F65511F-83D8-4833...@microsoft.com...