2 Preguntas

Que tal Déiniel Cardenas:
aqui te envio un codigo, aqui me lo facilitaron, lo uso actualmente y
ahorita que requieres algo que te ponga la fecha, jugue con el, claro
respetando el original te pone la fecha, solo que ocuparias nombrar una
hoja de tu libro de excel "B" sin las comillas, al momento de abrir o
ejecutar te pedira si "VAS A CREAR NUEVO DIA PARA SCANEAR" le dices que si y
te pondra le fecha actual, si el dia de mañana vuelves a te enviara el mismo
mensaje y le dics que no, y se quedara la fecha actual. o puedes jugar con
el codigo, este codigo fui extraido parte del original, y efectivamente yo
hice la pregunta de que se estampe la fecha y no cambie , pero por consejo
de Hector Miguel no lo utilce por ser una macro y cargaria mas mi libro que
tengo 3 macros que lo mueven , pero juega
aqui el codigo:

Private Sub Workbook_Open()

' Seleccionamos el tamaño del papel DIN A4
Worksheets("B").ScrollArea = "A1:AB350"

' Mensaje para saber si se va a hacer un presupuesto nuevo
' y cambiar el numero y la fecha
If MsgBox("VAS A CREAR NUEVO DIA PARA SCANEAR", vbYesNo, "Confirmar") _
= vbYes Then

' Incrementamos el numero del presupuesto
Sheets("B").Range("B3") = Sheets("B").Range("B3")


' Colocamos la fecha del sistema
Range("D1").Value = Date

' Seleccionamos la celda para empezar a colocar los datos del cliente
Range("B3").Select

Else
End If

End Sub


"Déiniel Cárdenas" <Diniel C escribió en
el mensaje news:
> Hola a todos,
>
> La primera pregunta es la siguiente:
>
> Cómo puedo hacer para con una macro se guarde un archivo con un nombre
> predeterminado por la fecha. Es decir corro la macro y hoy por ejemplo me
> guarde un archivo llamado RECAUDACIÓN 20-09-05.
>
> Por otro lado, es una pregunta que hicieron días atrás pero creo que no
tuvo
> ninguna respuesta. Cómo puedo hacer para que la fecha después de una
formula
> =hoy() no se cambie. Ojo la solución no podría incluir la desactivación
del
> generador automático de formulas por que hay varios calculos que se están
> generando.
>
> Gracias a todos de antemano.
>
> Déiniel Cárdenas