Question

在excel的VBA里如何获取日期和星期几

Answer 1

输入如下代码试试就知道了

Sub test()
MsgBox VBA.Now()
MsgBox VBA.Time
MsgBox VBA.Date
MsgBox Format(Now(), "aaaa")
MsgBox Format(Date, "aaaa")
End Sub

Answer 2

VB的几个函数：
Date 函数返回系统日期
Weekday(Date) 函数返回系统日期对应的星期，

注意：星期日返回1，星期一返回2，星期二返回3，星期三返回4，星期四返回5，星期五返回6，星期六返回7
WeekdayName(Weekday(Date)) 函数返回系统日期对应的星期的英语名称

Answer 3

不用vba就可以解决
在第一列输入日期,将单元格的格式设置为日期格式
在第二列让每行的值等于第一列对应行,然后将第二列单元格格式设置为日期格式中的星期几这种类型,就ok了