Extrair data e converter em data válida

2024 - VBA & Macros

Post Recente por valdecirrk 7 anos atrás

3 Posts

2 Usuários

0 Reactions

1,392 Visualizações

RSS

valdecirrk

(@valdecirrk)

Posts: 230

Estimable Member

Topic starter

bom dia

Existe na minha planilha este formato de registro 13/2/2017 - 09:21:00.
Quero tirar somente a data e converter em data válida.

até fiz alguma coisa, mas quando utilizo o filtro simples ao em vez de aparecer a data dentro de um grupo de meses fica como uma data diferente, não dentro do mês.

Exemplo: o formato abaixo aparece quando vou aplicar filtro.

+Janeiro
+Fevereiro
10/10/2016
12/10/2017

Postado : 21/11/2017 6:19 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Bom dia!!

Há algumas postagens no fórum use a pesquisa.
https://cse.google.com.br/cse?cx=partne ... gsc.page=2

Sub AleVBA_26592()
'Considerando que as (datas-horas) estão em coluna A, resultado na coluna B.
    Dim Lastrow As Long
    Lastrow = Range("A" & Rows.Count).End(xlUp).Row
    Range("B2:B" & Lastrow).Formula = "=LEFT(A2,SEARCH(""-"",A2)-1)"
    Range("B2:B" & Lastrow).Value = Range("B2:B" & Lastrow).Value
End Sub

Att

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

Postado : 21/11/2017 6:31 am