|如果您想在一周的今天自动更新,那么这篇文章适合您。本文重点介绍通过vba中的msgbox更新用户的当前日期。

问题):我想要一个代码来确定星期几。

我们需要按照以下步骤启动VB编辑器:单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”。 *单击插入,然后单击模块

image 1

这将创建新的模块。在模块中输入以下代码

image 2

Sub TodaysDay()

选择案例DatePart(“ w”,Date,vbMonday)

情况1

MsgBox“星期一”

情况2

MsgBox“星期二”

情况3

MsgBox“星期三”

案例4

MsgBox“星期四”

情况5

MsgBox“ Fri”

案例6

MsgBox“星期六”

案例7

MsgBox“ Sun”

结束选择

结束子

注意:今天的日期是2015年6月5日,即星期五“ vbMonday”用于将星期一返回为一周的第一天;如果星期日是一周的第一天,则需要使用“ vbSunday”,请按ALT + F8快捷键以打开“宏”窗口。选择您刚刚创建的宏

image 3

  • 点击运行,我们将获得今天的日期名称。

image 4