Macro que genere archivo con fecha

Hola Raulo,

Pues, algo asi:

Sub test()
Dim Ruta As String, Nombre As String
Ruta = "C:\TEMPORAL\"
Nombre = "CONCERTADAS" & " " & _
Format(Date, "yyyy-mm-dd") & ".xls"

ActiveWorkbook.SaveAs _
FileName:=Ruta & Nombre, _
FileFormat:=xlExcel9795
End Sub

Saludos,
KL

"Raulo" wrote in message
news:

La secuencia en la macro es esta, como deberia cambiarla considerando lo
que
vos me pones?
Gracias

ActiveWorkbook.SaveAs Filename:="C:\TEMPORAL\CONCERTADAS.xls",
FileFormat:= _
xlExcel9795, Password:="", WriteResPassword:="",
ReadOnlyRecommended:= _
False, CreateBackup:=False


"KL" escribio:

Hola Raulo,

Como no expones el macro, solo te pongo aqui la manera de crear el nombre
y
tu ya lo adaptas a tus necesidades:

Sub test()
Dim Ruta As String, Nombre As String
Ruta = "C:\Temp\"
Nombre = "Informe" & Format(Date, "yyyy-mm-dd") & ".xls"

ActiveWorkbook.SaveAs Ruta & Nombre
End Sub


Saludos,
KL


"Raulo" wrote in message
news:
> Tengo una macro que al terminar, me genera una archivo con un
> determinado
> nombe puesto por mi, necesito que ese nombre sea la fecha del dia y lo
> genere
> automaticamente.
> Hay algina manera de hacer esto?.
> Gracias

Eso, yo ya pense que estaba alucinando (con tanta cana que me mete Hector
Miguel por mis despistes:-))

Saludos,
KL


"Carlos Durán Urenda" wrote in message
news:%

sorry foro equivocado



"Carlos Durán Urenda" escribió en el mensaje
news:%

Hola Raulo

Las macros en Access son limitadas, debido a que no puedes manejar
variables ni ciclos

en su lugar deberias de utilizar codigo en VBA, el cual es mucho mas
potente

para crear el nombre de archivo podrias utilizar algo así


Dim Nombre as String

' Forma el siguiente nombre : Respaldo 2005-Sep-14.txt
'al poner primero el año y el mes te permite organizar mejor

Nombre = "Respaldo " & Format(Date, "yyyy-MMM-dd") & ".txt"


la gran ventaja es que puedes utilizar todas las instrucciones de tu
macro mediante codigo, con el estatuto DoCmd, el cual incluye todas las
instrucciones de las macros de Access... de forma que tu codigo podria
quedar de la siguiente manera


Sub GeneraArchivo( )
Dim Nombre as String
Nombre = "Respaldo " & Format(Date, "yyyy-MMM-dd") & ".txt"

DoCmd.SetWarnings False

DoCmd.OpenQuery "MiConsulta", acNormal
DoCmd..
DoCmd..
DoCmd..
DoCmd..
DoCmd.SetWarnigs True
End Sub
' deberias reemplazar el nombre fijo de tu archivo por la Variable Nombre

Si tu macro se ejecuta mediante un boton, en el evento al Hacer Click del
boton deberias seleccionar generador de código, de forma que te permita
abrir el codigo del formulario y programar en el evento dicho codigo

Saludos
Carlos Durán






"Raulo" escribió en el mensaje
news:

Tengo una macro que al terminar, me genera una archivo con un
determinado
nombe puesto por mi, necesito que ese nombre sea la fecha del día y lo
genere
automaticamente.
Hay algina manera de hacer esto?.
Gracias

sorry foro equivocado



"Carlos Durán Urenda" escribió en el mensaje
news:%

Hola Raulo

Las macros en Access son limitadas, debido a que no puedes manejar
variables ni ciclos

en su lugar deberias de utilizar codigo en VBA, el cual es mucho mas
potente

para crear el nombre de archivo podrias utilizar algo así


Dim Nombre as String

' Forma el siguiente nombre : Respaldo 2005-Sep-14.txt
'al poner primero el año y el mes te permite organizar mejor

Nombre = "Respaldo " & Format(Date, "yyyy-MMM-dd") & ".txt"


la gran ventaja es que puedes utilizar todas las instrucciones de tu macro
mediante codigo, con el estatuto DoCmd, el cual incluye todas las
instrucciones de las macros de Access... de forma que tu codigo podria
quedar de la siguiente manera


Sub GeneraArchivo( )
Dim Nombre as String
Nombre = "Respaldo " & Format(Date, "yyyy-MMM-dd") & ".txt"

DoCmd.SetWarnings False

DoCmd.OpenQuery "MiConsulta", acNormal
DoCmd..
DoCmd..
DoCmd..
DoCmd..
DoCmd.SetWarnigs True
End Sub
' deberias reemplazar el nombre fijo de tu archivo por la Variable Nombre

Si tu macro se ejecuta mediante un boton, en el evento al Hacer Click del
boton deberias seleccionar generador de código, de forma que te permita
abrir el codigo del formulario y programar en el evento dicho codigo

Saludos
Carlos Durán






"Raulo" escribió en el mensaje
news:

Tengo una macro que al terminar, me genera una archivo con un determinado
nombe puesto por mi, necesito que ese nombre sea la fecha del día y lo
genere
automaticamente.
Hay algina manera de hacer esto?.
Gracias

Esta muy bien y funcionó perfecto, solo que ahora quiero que ese archivo me
lo genere en otro subdirectorio con otro nombre pero me saleal poner "Dim
Ruta As String, Nombre As String":

"Declaración duplicada en el ambito actual"
Como puedo repetirla sin que salga el erro?

Gracias

"KL" escribió:

Hola Raulo,

Como no expones el macro, solo te pongo aqui la manera de crear el nombre y
tu ya lo adaptas a tus necesidades:

Sub test()
Dim Ruta As String, Nombre As String
Ruta = "C:\Temp\"
Nombre = "Informe" & Format(Date, "yyyy-mm-dd") & ".xls"

ActiveWorkbook.SaveAs Ruta & Nombre
End Sub


Saludos,
KL


"Raulo" wrote in message
news:
> Tengo una macro que al terminar, me genera una archivo con un determinado
> nombe puesto por mi, necesito que ese nombre sea la fecha del dia y lo
> genere
> automaticamente.
> Hay algina manera de hacer esto?.
> Gracias

Hola Raulo,

No veo muy claro que es lo que haces con el macro. Podrias poner aqui el
macro entero incluyendo los cambios que has realizado?

Saludos,
KL


"Raulo" wrote in message
news:

Esta muy bien y funciono perfecto, solo que ahora quiero que ese archivo
me
lo genere en otro subdirectorio con otro nombre pero me saleal poner "Dim
Ruta As String, Nombre As String":

"Declaracion duplicada en el ambito actual"
Como puedo repetirla sin que salga el erro?

Gracias

"KL" escribio:

Hola Raulo,

Como no expones el macro, solo te pongo aqui la manera de crear el nombre
y
tu ya lo adaptas a tus necesidades:

Sub test()
Dim Ruta As String, Nombre As String
Ruta = "C:\Temp\"
Nombre = "Informe" & Format(Date, "yyyy-mm-dd") & ".xls"

ActiveWorkbook.SaveAs Ruta & Nombre
End Sub


Saludos,
KL


"Raulo" wrote in message
news:
> Tengo una macro que al terminar, me genera una archivo con un
> determinado
> nombe puesto por mi, necesito que ese nombre sea la fecha del dia y lo
> genere
> automaticamente.
> Hay algina manera de hacer esto?.
> Gracias