ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

Codigo VBA para Converter DATA (Resolvido)

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
vilmarmoc
Colaborador
Colaborador
Mensagens: 33
Registrado em: Seg Out 13, 2014 3:36 pm

Codigo VBA para Converter DATA (Resolvido)

Mensagem por vilmarmoc » Seg Ago 03, 2015 11:29 am

Olá;
Preciso de Um código VBA que converta o valor inserido na coluna E que está em formato Geral ex. 03.08.2015 para o formato data (dd/mm/aa);

Desde já agradeço.
Editado pela última vez por vilmarmoc em Ter Ago 04, 2015 6:50 pm, em um total de 1 vez.



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1422
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Codigo VBA para Converter DATA

Mensagem por Reinaldo » Seg Ago 03, 2015 3:13 pm

Experimente a função nativa do excel --> Texto Para Colunas (No menu Dados)
Selecione a coluna desejada (uma por vez) -- Ma guia Menu selecione Dados -- Texto para Colunas , então clique 2 vezes em "Avançar" , na tela 3 selecione o radio referente a Data; então clique em concluir.


Reinaldo
:oops: :D :mrgreen: :geek:

vilmarmoc
Colaborador
Colaborador
Mensagens: 33
Registrado em: Seg Out 13, 2014 3:36 pm

Re: Codigo VBA para Converter DATA

Mensagem por vilmarmoc » Seg Ago 03, 2015 3:18 pm

Obrigado... Mas precisa ser automático. Assim que os dados são copiados para esta coluna, preciso que seja convertido em data, pois vem em um relatorio e neste campo contem data, porem o formato gerado é geral e não data.



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1422
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Codigo VBA para Converter DATA

Mensagem por Reinaldo » Seg Ago 03, 2015 4:01 pm

Mais automatico que isso???


Reinaldo
:oops: :D :mrgreen: :geek:

Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


vilmarmoc
Colaborador
Colaborador
Mensagens: 33
Registrado em: Seg Out 13, 2014 3:36 pm

Re: Codigo VBA para Converter DATA

Mensagem por vilmarmoc » Seg Ago 03, 2015 4:25 pm

Quando digo que tem que ser automático é que toda vez que apagar os dados e inserir novo, terá que repetir este procedimento. Para o usuário Leigo o ideal é que naquele campo, qualquer valor que ele insira, este valor seja convertido para o formato data, uma vez que trata-se de um campo calculável, ou seja, será calculado quantos dias de acordo com a data informada.



Avatar do usuário
Mauro Coutinho
Jedi
Jedi
Mensagens: 1561
Registrado em: Sáb Mar 13, 2010 8:10 pm
Localização: São José dos Pinhais - Pr

Re: Codigo VBA para Converter DATA

Mensagem por Mauro Coutinho » Ter Ago 04, 2015 11:50 am

Se quer fazer isto atraves de uma macro, utilize o Gravador de Macros e faça passo a passo o que o Reinaldo disse e terá sua rotina, depois é só ajustar os ranges e colocar no Evento Change da aba :

Código: Selecionar todos

    Private Sub Worksheet_Change(ByVal Target As Excel.Range)
        If Target.Column = 4 Then 'Ajuste para a coluna que serão colados as datas
          'Aqui  Sua rotina de conversão a que gravou
        End If
    End Sub


Mauro Coutinho - Exemplos Somente em Office 2003
São José dos Pinhais - Pr
Se sua Duvida foi solucionada . . . .Acrescente [RESOLVIDO] ao título.
Ficou satisfeito com o FORUM ? Divulgue, indicando-o aos colegas !

Avatar do usuário
Rafael Monteiro
Consultor
Consultor
Mensagens: 277
Registrado em: Seg Nov 28, 2011 8:27 am
Localização: Sorocaba - SP
Contato:

Re: Codigo VBA para Converter DATA

Mensagem por Rafael Monteiro » Ter Ago 04, 2015 2:19 pm

Use esse código se preferir.

Código: Selecionar todos

Cells.Replace What:=".", Replacement:="/", LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False


Abs.

Rafael R Monteiro.

vilmarmoc
Colaborador
Colaborador
Mensagens: 33
Registrado em: Seg Out 13, 2014 3:36 pm

Re: Codigo VBA para Converter DATA

Mensagem por vilmarmoc » Ter Ago 04, 2015 6:49 pm

Obrigado. Deu certo



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder