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

：）

Answer 2

WEEKDAY功能可用于此主题和Vba代码。例如：

Label2.Caption = WeekdayName(Weekday(TextBox2, 0), False, 0)

当我创建关于活动单元格的日期条目的userform时，我使用了这个函数。