Excel VBA中的区域日期格式

时间:2020-02-10 17:52:09

标签: excel vba

我在日期格式设置方面遇到了一个奇怪的问题-我一直按照以下格式设置日期格式-尝试获取和显示文件详细信息,以下在使用ldn /其他设置时效果很好。

但是,其中一位用户获得了法语日期时间设置,并且下面的代码无法格式化日期时间和文件大小。

不确定处理所有区域的最佳方法是什么?有什么建议吗?

无效的FR格式-02-d꣭2019 15:23:10,fileSize = 110,00,代替 的110.00

fileSize = FileLen(tool) / 1024
creationDate = Format(Local2GMT(.getFile(tool).DateCreated), "DD-MMM-YYYY HH:MM:SS")
modifiedDate = Format(Local2GMT(.getFile(tool).DateLastModified), "DD-MMM-YYYY HH:MM:SS")
accessfileDate = Format(Local2GMT(.getFile(tool).DateLastAccessed), "DD-MMM-YYYY HH:MM:SS")

Function Local2GMT(dtLocalDate As Date) As Date
    Local2GMT = DateAdd("s", -GetLocalToGMTDifference(), dtLocalDate)
End Function

0 个答案:

没有答案