Notifications
Clear all

Palavras dentro da data

4 Posts
3 Usuários
0 Reactions
979 Visualizações
(@mairon)
Posts: 40
Eminent Member
Topic starter
 

Boa tarde pessoal

tenho uma label que me informa a data do dia

Private Sub UserForm_Initialize()

'---- transforma label data na data do dia
labeldata = Date
labeldata = Format(labeldata, "dd mmmm yyyy")

Dessa forma a data fica assim "21 janeiro 2014" , eu gostaria de deixar assim "21 de janeiro do ano de 2014", alguém pode me ajudar?

 
Postado : 21/01/2014 3:43 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

uma possibilidade:

labeldata = Date
labeldata = Day(labeldata) & " de " & MonthName(Month(labeldata)) & " do ano de " & Year(labeldata)

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 21/01/2014 3:52 pm
(@mairon)
Posts: 40
Eminent Member
Topic starter
 

Perfeito! obrigado

 
Postado : 21/01/2014 4:38 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.

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

 
Postado : 21/01/2014 4:51 pm