Calculo de fecha condicional con macro

[Scops]

Hola de nuevo a todos.
Tengo un archivo, el cual adjunto, en el que en la celda A1 calculo la fecha actual + 1 día. El formato de la fecha es sin separadores, es decir, si la fecha es 19/05/10, en...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[IWOLLS]

Con esta función sabes cual es el día de la semana de la fecha.

=DIASEM(a1;1)

Saludos

 

[IWOLLS]

En este caso esta formula te valdria para sumar +2 si es sabado y +1 para el resto.


=SI(DIASEM(HOY();1)=6;HOY()+2;HOY()+1)


Salu2

 

[IWOLLS]

En macro podria servirte algo así:


Private Sub Wfecha()

fecha = Range("a1").Value

If Application.WorksheetFunction.Weekday(fecha, 1) = 6 Then fechafinal = fecha + 2
If...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Scops]

Hola IwollsMuchas gracias por tu ayuda.
Un saludo