2017-02-10 123 views
2

我有一个每天写电子邮件的宏。对于电子邮件标题,宏格式在特定的细胞中发现的数据输入,就像这样:VBA:格式日期为美国标准

Period = ThisWorkbook.Sheets("aux").Cells(2, 1) 
MsgBCC = "" 
MsgFrom = "----Specific email address here----" 
MsgSub = "Daily Update (" & Format(Period, "dd/mmm") & ")" 
Msg = "<html><body><font color=#303030 size=""3"" face=""Trebuchet MS"">" 

的事情是:我想要更改日期的格式,使其显示英文月份名称(不是我电脑的默认语言)。例如,我希望日期的格式为“dd/mm”,例如2月10日的“10/2月”。

我可以通过在工作表中使用“自定义”格式将日期格式更改为英语。我希望的格式的“坐标”是[$-409]mmm/aa;@。他们是Excel中产生,就像这样:

enter image description here

当我尝试在VBA Format功能,使用这种格式,不过,日期输出也不会改变。

任何想法如何我可以改变日期格式?

+2

Application.Text(日期(), “[$ - 40E] DDDD”)从https://sites.google.com/site/e90e50fx/home/被盗月 - 日 - 姓名 - 用Excel- –

+0

不错,伙计! – MBBertolucci

+1

我想你也只是需要'Period.Value'或'Period.Text',因为你试图格式化一个'Range'对象,当你真正想要的是它的价值!因此'格式(Period.Value,“dd/mm”)' – Wolfie

回答

相关问题