獲取過去6個月月參考

需要幫助顯示上個月的6個月在今天的日期。當前月份是六月。下面是代碼，但是給1，我需要得到1月。獲取過去6個月月參考

MsgBox ("Cheques would be checked for issue Month of " & (Month(Date)-5))

無關的，但要注意的'MsgBox'函數調用和開'（'之間的空白parenthese：這就是VBE告訴你的是，括號是多餘的，無論是內他們將是評價爲一個值，並通過'ByVal'。這裏/現在*沒有問題，但在其他情況下肯定會在後端咬你 –

MsgBox ("your date is " & DateAdd("m", -6, Date()))

2017-06-21 15:01:45

感謝道格，小改動......再次感謝MsgBox（「你的約會是「＆FORMAT（DateAdd（」m「，-6，Date（）），」MMMM「）） –

回答