Máximos colaboradores
Popular Content
Showing content with the highest reputation on 01/20/11 in all areas
-
Hola compañeros Aunque el tema está ya muy tocado, acompaño un archivo por si aporto algo que resulte útil. En él se recogen dos soluciones en función de que los sábados se consideren hábiles o inhábiles. Saludos EDITO: He suprimido en el encabezamiento de la columna K el texto: "hasta 31 de marzo" DÍAS HÁBILES. Más completo.zip2 points
-
Hola: Esta macro, coloca un reloj en A1, para arrancarlo, ejecutar la macro, y para pararlo, rellenar A1 con el color rojo. Sub RELOJ() On Error Resume Next If ActiveSheet.Cells(1, 1).Interior.Color = vbRed Then Application.OnTime Hora, "RELOJ", SCHEDULE:=False Else ActiveSheet.Cells(1, 1) = Now Hora = Now + TimeValue("00:00:01") Application.OnTime Hora, "RELOJ", SCHEDULE:=True End If End Sub [/CODE] Saludos.1 point