excel vba-如何获取日期的日期名称？

Question

我有一个小代码，可以获取Excel中列出的日期的天名称。但是问题是，它没有正确的日期名称（例如星期二）。

例如：

sDayName = Format(Day(11/1/2016), "dddd")

然后，输出将产生不正确的“日期名称”，即：

sDayName = "Sunday"

应该是星期二。感谢您的帮助。

Answer 1

对于您的特定请求，假设您的日期字符串的格式设置为您的区域设置：

    sDayName = Format("11/01/2016", "dddd")

如果要今天的工作日：

    sDayName = Format(Date, "dddd")

如果您想要在任何区域设置中的任何日期的工作日

    sDayName = Format(DateSerial(2016, 11, 4), "dddd")
    'change 2016, 11, 4 for your year, month, day values

:)