Notifications
Clear all

ERRO PARA TRANSPORTAR DATA

5 Posts
2 Usuários
0 Reactions
575 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Prezados, Bom Dia!
Tenho um formulário de calendário, onde "tico" uma data que depois é transportada para uma determinada célula da planilha.
Porém ao transportar ele transporta para o formado mm/dd/yyyy e preciso que transporte para o formato dd/mm/yyyy

alguém pode me ajudar?

ActiveCell.Offset(0, 0).Value = Text_Data.Value

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

 
Postado : 04/07/2016 8:52 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

gracielli.vida,

Boa tarde!

Use assim:

ActiveCell.Offset(0, 0).Value = Format(Text_Data.Value, "dd/mm/yyyy")

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 04/07/2016 9:20 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Wagner, não funcionou. :(
na hora de transportar continua levando no formato mm/dd/yyyy

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

 
Postado : 04/07/2016 10:52 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

troque por:

ActiveCell.Offset(0, 0).Value = CDate(Text_Data.Value)

[]s

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

 
Postado : 04/07/2016 11:00 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Resolvido Mauro.
Muitíssimo Obrigada.

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

 
Postado : 04/07/2016 12:36 pm