Página 1 de 1

Formatação de datas VBA

Enviado: 26 Jun 2015 às 17:56
por duds
Boa tarde pessoal!

É utilizado um equipamento de ensaio aonde trabalho que emite os resultados em .txt esses resultados, passo para uma planilha. Até aí ok! Porém é de grande importância a data da realização do ensaio para a classificação dos dados na tabela, e essa data vem com a seguinte formatação: "dd-mmm-yyyy". O problema é que o software não é nacional, então alguns meses não possuem a sigla igual ao do português, por exemplo, Agosto-Ago e August-Aug.
Adicionando na macro que possuo para cadastrar os resultados, algum código encontre o erro e substitua a sigla, faz com que ocorra um problema, no depurador a indicação aparece correta: Se antes era 11-Feb-2015, no depurador indica 11-02-2015, porém ao transcrever para o excel, passa sendo 02/11/2015 (02/Novembro/2015) invertendo mês com dias.
Já tentei várias coisas como substituir pela sigla brasileira, mas ai falha a formatação pois não indica data, vira apenas um texto.
Se eu usar o Substituir do excel, funciona, o replace do VBA, inverte.
Alguém saberia como mudar isso?

Agradeço desde já!

Att.

Formatação de datas VBA

Enviado: 27 Jun 2015 às 08:44
por JeanHard
Bom dia Duds.
Já aconteceu isso comigo. O que resolveu no meu caso foi: No evento initialize já formatei minha text ==> Txtdata = CDate(Format(Date, "DD/MM/YYYY" ' ou seu formato)) e declarei uma variável no botão de confirmação ===> dim dt as date ===>
Txtdata = dt

Comigo deu certo.

Formatação de datas VBA

Enviado: 27 Jun 2015 às 08:46
por JeanHard
Desculpa minha falha. Corrigindo a variável é dt = Txtdata :oops:

Formatação de datas VBA

Enviado: 27 Jun 2015 às 11:49
por duds
Certo, tentarei a implementação! Muito obrigado Jean!
Utilizo dai essa variável para transcrever a data para o excel, correto?

Att.

Formatação de datas VBA

Enviado: 27 Jun 2015 às 12:32
por JeanHard
Correto.

Formatação de datas VBA

Enviado: 27 Jun 2015 às 12:34
por JeanHard
Eu citei o evento initialize pq no meu caso se tratava de uma data automática. Caso sua data seje digitada use também no evento do seu text.

Formatação de datas VBA

Enviado: 30 Jun 2015 às 13:42
por duds
Muito obrigado Jean, funcionou!

Att.