訪問VBA從月份獲得季度號碼

我被困在試圖從月份號碼中找到季度的年份號碼，即我有月份號碼2，應該是季度號碼1，我如何在Access VBA中執行此操作或訪問查詢？在此先感謝。訪問VBA從月份獲得季度號碼

2014-10-17 user2294977

你可以使用選擇（MonthNum，1,1,1,2,2,2,3,3,3,4,4,4） – Dave 2014-10-17 13:58:32

@戴夫你應該把它作爲答案。它唯一缺少的是錯誤/超出邊界處理。 – 2014-10-17 14:30:14

您可以使用此功能：

Public Function Quarter(ByVal MonthNumber As Long) As Long 

     If (MonthNumber < 1) Or (MonthNumber > 12) Then 
       Call Err.Raise(6) ' Value out of Bounds ' 
     End If 

     Let Quarter = (MonthNumber - 1) \ 3 + 1 

End Function

來源

2014-10-17 14:03:33

'Quarter =（Month（date（））+ 2）\ 3'稍短。 :) – tbur 2014-10-17 18:55:56

不錯的一個。我應該回到分數基礎。 :-) – 2014-10-17 19:09:05

有一個MOD版本可以將你扔到它的任何數字滾動到1到12之間。我找不到它，也找不到它。 :( – tbur 2014-10-17 19:47:45

訪問VBA從月份獲得季度號碼

回答

相關問題