[已解决]判断周五的代码

759857387 · 发表于 2014-6-14 20:24

本帖最后由 759857387 于 2014-6-14 20:52 编辑

判断周五的代码对吗？
If Format(Date, "aaaa") = "星期五" Then

我用了不起作用。

最佳答案

我心飞翔410

2014-6-14 20:45

本帖最后由我心飞翔410 于 2014-6-14 20:47 编辑

Sub x()

If Format(Date, "aaaa") = "星期六" Then

MsgBox "2秒后自动关闭"

End If
End Sub
Format(now, "aaaa")

我心飞翔410 · 发表于 2014-6-14 20:26

今天星期六啊

759857387 · 发表于 2014-6-14 20:28

我心飞翔410 发表于 2014-6-14 20:26
今天星期六啊

哈哈，改成今天也不起作用，什么原因？

wangby · 发表于 2014-6-14 20:29

我心飞翔410 发表于 2014-6-14 20:26
今天星期六啊

您好，能帮手看一下这个问题吗，我刚重新补充说明，谢谢！
http://www.excelpx.com/thread-326824-1-1.html

我心飞翔410 · 发表于 2014-6-14 20:33

759857387 发表于 2014-6-14 20:28
哈哈，改成今天也不起作用，什么原因？

我电脑上起作用啊
最好完整的上传看看或者你f8 逐句运行试试看看是其他问题不

759857387 · 发表于 2014-6-14 20:41

我心飞翔410 发表于 2014-6-14 20:33
我电脑上起作用啊
最好完整的上传看看或者你f8 逐句运行试试看看是其他问题不

Book12.rar (10.21 KB, 下载次数: 6)

我心飞翔410 · 发表于 2014-6-14 20:45

本帖最后由我心飞翔410 于 2014-6-14 20:47 编辑

Sub x()

If Format(Date, "aaaa") = "星期六" Then

MsgBox "2秒后自动关闭"

End If
End Sub
Format(now, "aaaa")

759857387 · 发表于 2014-6-14 20:54

我心飞翔410 发表于 2014-6-14 20:45
Sub x()

If Format(Date, "aaaa") = "星期六" Then

我真是马虎呀，知道那里错了，谢谢

		自动登录	找回密码
密码			注册