Notifications
Clear all

VBA Date

3 Posts
2 Usuários
0 Reactions
888 Visualizações
(@fazerbem)
Posts: 697
Honorable Member
Topic starter
 

Preciso saber onde esta o erro abaixo.

Ao inicializar o formulario tenho

Data.Caption = Date

Entao aparece na Label Data.Caption a data de hoje neste formato 11/02/2017

Ao precionar o Botao Processar, Pego a Label Dada.Caption e copio a data na celula da Planilha em "E3".
A Celula Ë3" esta personalizada para aparecer 11 Fevereiro,2017

Entao quando é colado na Celula "E3", fica desta forma 2 Novembro, 2017.

Onde esta o erro aqui ?

Andre

 
Postado : 11/02/2017 6:21 pm
brunoxro
(@brunoxro)
Posts: 698
Honorable Member
 

Boa noite Andre,

O VBA está interpretando como mm/dd/yyyy e não como dd/mm/yyyy, ele está seguindo o padrão americano.

tente:

Range("E3").value = format(Date,"dd mmm yyyy")

att,

 
Postado : 11/02/2017 6:52 pm
(@fazerbem)
Posts: 697
Honorable Member
Topic starter
 

brunoxro

Obrigado mesmo, ficou joia, dai so alterei para

Sheets("Vendas Feitas").Range("E3").Value = Format(Date, "d mmmm, yyyy")

Testei e ficou exato como eu queria, muito Obrigado mesmo !!

Andre

 
Postado : 11/02/2017 7:13 pm