solucionar formato de fecha

Diego, muchas gracias, pero lamentablemente no me resulta, no se que hago
mal.
Si pudieras explicarme un poco mas "a prueba de tontos" (ignorante en
realidad), te lo agradecería.
Sergio

"Diego LB" escribió en el mensaje
news:

Hola Sergio,

Prueba con este macro
1- Entras a editor VB
2- Te ubicas en la hoja correspondiente
3- Y escribes este código

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Hora As String

If ActiveCell.Column <> 3 Then Exit Sub
Hora = Format(InputBox("Ingrese hora"), "0000")
If Hora = "" Then Exit Sub
ActiveCell = Left(Hora, 2) & ":" & Right(Hora, 2)

3 es la columna que va a tener el formato, puedes cambiarla

hasta pronto

End Sub
DEL


"Sergio" escribió:

Por favor, tengo que ingresar en una planilla muchas fechas.
Lo hago separando las horas de los minutos con ":".
Quisiera saber si hay forma de hacerlo más fácil.
Ejemplo: ingreso 12:04, quisiera ingresar 1204 y se leyera con el formato
de
hora.
Espero haberme explicado bien.
Gracias a quien me pueda ayudar.
Sergio

hola, Sergio !

Quise decir "tengo que ingresar muchas HORAS en una planilla".
Crei que podria haber alguna forma de formatear la celda para este efecto.
Necesito calcular las diferencias entre "hora de inicio" y "hora de termino" y como son muchas
queria evitarme el tener que escribirlas con los puntos. Parece que es mas complicado de lo que creia.
Gracias de todas maneras...

por que no piensas [p.e.] en las posibilidades y alcance del truco con la funcion texto ?
si suponemos que pones en A1 la hora de entrada [1204] y en B1 la hora de salida [1500]
=texto(b1,"0\:00")-texto(a1,"0\:00")
arroja una diferencia de: 0.122222222222222
si le aplicas un formato de h:mm *veras* -> 2:56 ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Me puedes dar un correo yo te paso un ejemplo
DEL


"Sergio" escribió:

Diego, muchas gracias, pero lamentablemente no me resulta, no se que hago
mal.
Si pudieras explicarme un poco mas "a prueba de tontos" (ignorante en
realidad), te lo agradecería.
Sergio

"Diego LB" escribió en el mensaje
news:
> Hola Sergio,
>
> Prueba con este macro
> 1- Entras a editor VB
> 2- Te ubicas en la hoja correspondiente
> 3- Y escribes este código
>
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Dim Hora As String
>
> If ActiveCell.Column <> 3 Then Exit Sub
> Hora = Format(InputBox("Ingrese hora"), "0000")
> If Hora = "" Then Exit Sub
> ActiveCell = Left(Hora, 2) & ":" & Right(Hora, 2)
>
> 3 es la columna que va a tener el formato, puedes cambiarla
>
> hasta pronto
>
> End Sub
> DEL
>
>
> "Sergio" escribió:
>
>> Por favor, tengo que ingresar en una planilla muchas fechas.
>> Lo hago separando las horas de los minutos con ":".
>> Quisiera saber si hay forma de hacerlo más fácil.
>> Ejemplo: ingreso 12:04, quisiera ingresar 1204 y se leyera con el formato
>> de
>> hora.
>> Espero haberme explicado bien.
>> Gracias a quien me pueda ayudar.
>> Sergio
>>
>>
>>

hola Hector ( y Sergio, Diego y cia.)

si suponemos que pones en A1 la hora de entrada [1204] y en B1 la hora de salida [1500]
=texto(b1,"0\:00")-texto(a1,"0\:00")
arroja una diferencia de: 0.122222222222222
si le aplicas un formato de h:mm *veras* -> 2:56 ;)

permiteme una pregunta (por cierto, a mi la formula me funciona de
maravilla)=>

¿cual es el sentido/que hace la barra invertida?

supongo que tiene que ver con permitir 1 o 2 nros para la hora [es
decir, reconocer 3 y/o 4 cifras correctamente] pero no acabo de ver
como o porque lo hace..

si tienes tiempo te agradezco la explicacion

un saludo y hasta pronto
Ivan

Diego, muchas gracias, aquí va mi correo:


"Diego LB" escribió en el mensaje
news:

Me puedes dar un correo yo te paso un ejemplo
DEL


"Sergio" escribió:

Diego, muchas gracias, pero lamentablemente no me resulta, no se que hago
mal.
Si pudieras explicarme un poco mas "a prueba de tontos" (ignorante en
realidad), te lo agradecería.
Sergio

"Diego LB" escribió en el mensaje
news:
> Hola Sergio,
>
> Prueba con este macro
> 1- Entras a editor VB
> 2- Te ubicas en la hoja correspondiente
> 3- Y escribes este código
>
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Dim Hora As String
>
> If ActiveCell.Column <> 3 Then Exit Sub
> Hora = Format(InputBox("Ingrese hora"), "0000")
> If Hora = "" Then Exit Sub
> ActiveCell = Left(Hora, 2) & ":" & Right(Hora, 2)
>
> 3 es la columna que va a tener el formato, puedes cambiarla
>
> hasta pronto
>
> End Sub
> DEL
>
>
> "Sergio" escribió:
>
>> Por favor, tengo que ingresar en una planilla muchas fechas.
>> Lo hago separando las horas de los minutos con ":".
>> Quisiera saber si hay forma de hacerlo más fácil.
>> Ejemplo: ingreso 12:04, quisiera ingresar 1204 y se leyera con el
>> formato
>> de
>> hora.
>> Espero haberme explicado bien.
>> Gracias a quien me pueda ayudar.
>> Sergio
>>
>>
>>