Inicio > Microsoft Excel > tavopz > Sumar fecha a un Label...

Sumar fecha a un Label...

Experto: tavopz Cerrar	Usuario: oscarcito59 Cerrar	Fecha: 20/05/2008
Valoración:	Categoría: Microsoft Excel

19/05/2008

Usuario

Tavo, ¡tanto tiempo!
Te pregunto: en un UF tengo un Label donde me dá la fecha actual (LabelX.Caption=Date), en formato "dd-mmm-yy", además de una serie de TB y CB que no vienen al caso.
Lo que necesito es que, al hacer click en el CommandButon, en la Hoja3, me mande EL MES SOLAMENTE que correspondería, sumándole 7 meses... Esto es: si LabelX = 19-May-08, en Hoja 3 (donde quieras, yo después lo ubico) me aparezca DICIEMBRE.
Gracias, Tavito!

20/05/2008

Experto

Hola Oscar,
Pues con la función Month() puedes encontrar el mes que corresponde a la fecha y luego le sumas 7 y obtendrás el que necesitas. Lo que ocurre es que para convertir luego este número al nombre del mes, tendrás que usar un Case Select o algo por el estilo que te lo convierta.
x = Month(Date)+7
Select Case x
     Case 1
     y = "Enero"
     Case 2
     y = "Febrero"
            'Así sucesivamente
     Case Else
     y = "Error"
End Select
Sheets("Hoja3").Range("A1").Value = y

Saludos, Tavopz

20/05/2008

Usuario

¡¡ Espectacular, Tavito !!!
Todo resuelto!
Un abrazo

Compártelo

Volver a preguntar

Cerrar

... en "Microsoft Excel"

... a un experto de "Microsoft Excel"

... en otra categoría.
Herramientas

Cerrar

Imprimir

Descargar
Volver

Más opciones

Preguntar en Microsoft Excel

Enlaces patrocinados

Respuestas relacionadas