VBA 表單返回 WEEKNUM

Question

我正在嘗試使用 VBA 用戶表單在數據表上顯示周數。

舉個例子。 提交表單時，它會創建按下按鈕的日期。 我還需要在按下按鈕時顯示該日期的周數。

我在使用日期並更改為周數時嘗試了類似的調用 function 並且我已經在網上檢查過，但我很難找到答案。

Dim emptyRow As Long, ws As Worksheet

Set ws = Sheets("Ethan")
emptyRow = ws.Range("A" & Rows.Count).End(xlUp).Row + 1


ws.Range("A" & emptyRow).Value = Date
ws.Range("A" & emptyRow).Value = WeekNum (this doesn't work)

Answer 1

ws.Range("A" & emptyRow).Value = WorksheetFunction.WeekNum(Date, vbMonday)