Notifications
Clear all

Formatar Hora

7 Posts
3 Usuários
0 Reactions
1,277 Visualizações
(@carloshvb)
Posts: 99
Trusted Member
Topic starter
 

Bom dia Pessoal

Eu tenho uma planilha onde são realizados cálculos de hora e depois eu executo uma macro que copia uma parte desta planilha para outra e cola o dados como somente valores, porem as horas estão sendo coladas no formato:

01/01/1900 11:30:00

Então, eu gostaria de saber como faço para que o valor mude para:

11:30:00

Pois estou tendo problemas com os cálculos que a nova planilha faz devido a este problema.

Desde já, obrigado pelo apoio.

 
Postado : 29/10/2015 5:28 am
(@gui-d)
Posts: 155
Estimable Member
 

Carlos, se deseja somente formatar a célula como hora, basta clicar com o botão direito/formatar células/formate como hora.

[]

Guilherme Domingos

Se a mensagem foi util Favor Clicar na mãozinha ao lado de "citar".
Quando necessário, lembre se de marcar o tópico como [RESOLVIDO].

 
Postado : 29/10/2015 6:28 am
(@carloshvb)
Posts: 99
Trusted Member
Topic starter
 

Eu já tentei todos os formatos de hora do excel, mas a data continua lá e eu preciso que ela suma pois dá erro no calculo.

 
Postado : 29/10/2015 6:37 am
(@gui-d)
Posts: 155
Estimable Member
 

Carlos, isso significa que a célula copiada pela macro contém data. Pode ser que esteja oculta pela formatação da célula, mas a data está sendo copiada juntamente com a hora.

Mas ficaria mais simples analisar se você postasse um exemplo simples aqui do seu problema com o resultado esperado.

[]

Guilherme Domingos

Se a mensagem foi util Favor Clicar na mãozinha ao lado de "citar".
Quando necessário, lembre se de marcar o tópico como [RESOLVIDO].

 
Postado : 29/10/2015 7:05 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Uma possibilidade, em uma coluna auxiliar; supondoque sua data inicie em A1; insira a formula =A1-INT(A1) copie e arraste até a ultima, e seus calculos considere essa coluna.
Ou via vba

Sub hh()
Range("A1").Select
Do While ActiveCell <> ""
ActiveCell = ActiveCell.Value - Int(ActiveCell.Value)
ActiveCell.Offset(1, 0).Select
Loop
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 29/10/2015 7:12 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Outra possibilidade, se todas as horas vem com a data 01/01/1900, e nos calculos utilize a celula com data/hora -1
Por exemplo:
(A1-1)*8 ou Mod(A1;1)*8

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 29/10/2015 7:22 am
(@carloshvb)
Posts: 99
Trusted Member
Topic starter
 

Muito obrigado Reinaldo, a formula serviu perfeitamente.

 
Postado : 29/10/2015 8:06 am