ruta donde guardar archivo

14/09/2008 - 19:56 por gongi | Informe spam

Hola grupo !

Por favor, una duda, se puede modificar la propiedad Dialogs para que
siempre me 'muestre' la misma ruta y *directorio*, donde guardar ?.
No uso *ActiveWorkbook.SaveAs Filename:* porque cuando se llega un
4º nivel del árbol, hay que elegir manualmente un subdirectorio porque
su nombre varía en funcion del fichero que quiero guardar : \
\servidor\documentos\excel\facturas\1001 010108, 1002
020108 , .1099 311208
Muchas gracias por vuestra ayuda.

Sub demo()
Dim respuesta As Boolean
respuesta = Application.Dialogs(xlDialogSaveWorkbook).Show
<
If respuesta Then
MsgBox "okeis guardado"
Else
MsgBox "not ha cancelado"
End If
End Sub

Siga el debate

6 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#6 gongi

23/09/2008 - 15:19 | Informe spam

On 22 sep, 22:33, "Héctor Miguel"
wrote:

hola, domingo !

> Por lo visto este tipo de codigo da problemas (hard code).
> He visto por ahi que primero lo guardan en una variable (ruta = \directorio chdir ruta)

si este tipo de instrucciones no es de uso constante, no tiene caso declarar variables (si ya no las vas a usar) -???-

> Existe la posibilidad de montarlo con el ActiveWorkbook.saveas Filename
> para que se guarde directamente sabiendo que el directorio donde se guarda varia
> (como expuse en la 2ª parte de mi consulta) ?

si tu carpeta esta en una unidad de red, lo mas conveniente es usar la constante "real"
o sea, llamas a la carpeta de red usando las UNC (Universal Naming Conventions) p.e.

activeworkbook.saveas "\\servidor\\facturas\facturas2008\" & range("a1") & range("a2") & range("a3")

saludos,
hector.

Gracias Hector, ya vuelvo a intentarlo.

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida