WorksheetFunction.WeekNum(now, vbMonday)
答案 1 :(得分:6)
使用VBA将日期转换为isoWeeknumber,您只需要DatePart函数(其中DT是感兴趣的日期):
isoWeekNumber = DatePart("ww", DT, vbMonday, vbFirstFourDays)
如果您想使用ISO 8601中指定的其他定义,请调查FirstDayOfWeek和FirstWeekOfYear的其他一些选项
答案 2 :(得分:3)
在周数方面要小心,因为周围有不同的定义。 Excel定义与ISO定义不同。获取ISO周数使用(复制自http://www.rondebruin.nl/win/s8/win001.htm)
Public Function IsoWeekNumber(d As Date) As Integer
Dim d2 As Long
d2 = DateSerial(Year(d - Weekday(d - 1) + 4), 1, 3)
IsoWeekNumber = Int((d - d2 + Weekday(d2) + 5) / 7)
End Function
答案 3 :(得分:0)
使用datepart和错误解决方法来计算ISO年:
'Test 2007-12-31 should return W01Y2008
myDate = "2007-12-31"
6 个答案:答案 0 :(得分:12)要将周数作为第一天的星期一,请使用以下内容:WorksheetFunction.WeekNum(now, vbMonday)答案 1 :(得分:6)使用VBA将日期转换为isoWeeknumber,您只需要DatePart函数(其中DT是感兴趣的日期):isoWeekNumber = DatePart("ww", DT, vbMonday, vbFirstFo...
v_date = Date ' 今天,格式为:yyyy-MM-dd
v_time = Now ' 此时,格式为:yyyy-MM-dd HH:mm:ss
v_date2 = #"2021-06-01" '指定时间
v_date3 = CDate("2021-06-01")
日期
格式化
Format(Date, "yyyy-MM-dd")
日期
处理
对
日期
进行处理,得到想要的目标
日期
today = Date
yesterday = today - 1
第一,vba
日期
和时间函数的基本用法
Excel
中vba
日期
函数和时间函数分别是DATE和TIME。
VBA提供了三个无参数函数:Date、Time、Now,分别返回当前电脑系统的
日期
、时间、
日期
+时间。
下面的代码我们以三个消息框来结合
日期
和时间函数,分别提示当前的
日期
、时间。
Sub vba时间和
日期
函数()
MsgBox Date
MsgBox Tim
1、强制转
日期
格式,yyyy-m-d
Sheet2.Cells(2, 1) = Format(Sheet2.Cells(2, 1), "yyyy-m-d")Sheet2.Cells(2, 25) = Format(Sheet2.Cells(2, 25), "yyyy-m-d")
2、取
日期
格式中的年 、月。
Sheet2.Cells(2, 3) = Month(Sheet2.Cells(2,...
Dim dt As Date, t1 As Integer, t2 As Date, i As Date, temp As Integer
dt = Application.InputBox("请输入
日期
:" & Chr(10) & _
"如:2021-09-08", _
"选择
日期
", "2021-09-08", , , , 1)
t1 = Weekday(dt, 2)
详细介绍见 Calculating the ISO week number. Jan Stout.
http://www.proesite.com/timex/wkcalc.htm
Simple week number的定义如下:
1. 第一周开始于该年的一月一号
2. 第n+1周开始于第n周后的7天
SWN( y, m, d ) = 1 + ( DP( y, m ) +
了解VBA与
Excel
内置的函数,能够使我们处理起任务来事半功倍。这些函数不仅使用方便,而且效率一般都比较高(有些是例外的,特别是某些工作表函数),比我们自己写的要高效的多。
1. VBA内置的函数
VBA内置函数是VBA种可以直接使用的函数,很多处理函数也相当有用。
调用方式:直接使用函数,或者使用VBA调用。例如Shell()或者VBA.Shell()。
VBA内置的函数主要涉及...
1. 首先定义了三个整型变量 `days`、`weeks` 和 `remain`,分别表示输入的天数、
转换
后的
周数
和剩余的天数。
2. 使用 `printf` 函数输出提示信息,并使用 `scanf` 函数读取用户输入的天数。
3. 使用除法运算符 `/` 计算
周数
,使用取模运算符 `%` 计算剩余的天数。
4. 使用 `printf` 函数输出
转换
后的结果。