gom登陆器皮肤下载:在Excel中怎样用宏直接把当前日期用星期显示?

来源:百度文库 编辑:中科新闻网 时间:2024/05/12 13:39:04
在Excel中,通过单元格格式设置,可以把当前日期用星期显示,如果用宏代码实现这一任务,怎么办?

两种方法:

一、Weekday函数

返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几

例子:

Cells(1, 1) = Weekday(Cells(1, 2))

二、用NumberFormatLocal属性设置单元格格式

例子:

Cells(1, 1).NumberFormatLocal = "[$-804]aaaa;@"

Cells(1,1).NumberFormatLocal = "[$-804]aaa;@"

上面两行命令稍有差别。不过都是返回的周几

当然还有第三种方法,不过就有些脱裤子放屁的感觉了,我想不会有人有这么傻的办法的,但它的确也是另外一种方法。就是利用worksheetfunction对象引用Excel内置的weekday函数:

例子:

Cells(1, 1) = WorksheetFunction.Weekday(Cells(1, 2))