GrahamCracker19
New Member
- Joined
- Nov 4, 2015
- Messages
- 13
I have a custom function that has been working with no issues until recently. I made no changes to the code between it working and not working. When I enter the function in a cell excel recognizes it in the formula drop down but when executed it returns the #Name? error.
Any help is greatly appreciated, thank you in advance.
Any help is greatly appreciated, thank you in advance.
VBA Code:
Function a_FMONTH(ByVal D)
Dim FM As Date
If D >= #1/1/2019# Then FM = #1/15/2019#
If D >= #2/2/2019# Then FM = #2/15/2019#
If D >= #3/2/2019# Then FM = #3/15/2019#
If D >= #3/30/2019# Then FM = #4/15/2019#
If D >= #5/4/2019# Then FM = #5/15/2019#
If D >= #6/1/2019# Then FM = #6/15/2019#
If D >= #6/29/2019# Then FM = #7/15/2019#
If D >= #8/3/2019# Then FM = #8/15/2019#
If D >= #8/31/2019# Then FM = #9/15/2019#
If D >= #9/28/2019# Then FM = #10/15/2019#
If D >= #11/2/2019# Then FM = #11/15/2019#
If D >= #11/30/2019# Then FM = #12/15/2019#
If D >= #1/1/2019# Then FM = #1/15/2019#
If D >= #2/2/2019# Then FM = #2/15/2019#
If D >= #3/2/2019# Then FM = #3/15/2019#
If D >= #3/30/2019# Then FM = #4/15/2019#
If D >= #5/4/2019# Then FM = #5/15/2019#
If D >= #6/1/2019# Then FM = #6/15/2019#
If D >= #6/29/2019# Then FM = #7/15/2019#
If D >= #8/3/2019# Then FM = #8/15/2019#
If D >= #8/31/2019# Then FM = #9/15/2019#
If D >= #9/28/2019# Then FM = #10/15/2019#
If D >= #11/2/2019# Then FM = #11/15/2019#
If D >= #11/30/2019# Then FM = #12/15/2019#
If D >= #1/1/2020# Then FM = #1/15/2020#
If D >= #2/1/2020# Then FM = #2/15/2020#
If D >= #2/29/2020# Then FM = #3/15/2020#
If D >= #3/28/2020# Then FM = #4/15/2020#
If D >= #5/2/2020# Then FM = #5/15/2020#
If D >= #5/30/2020# Then FM = #6/15/2020#
If D >= #6/27/2020# Then FM = #7/15/2020#
If D >= #8/1/2020# Then FM = #8/15/2020#
If D >= #8/29/2020# Then FM = #9/15/2020#
If D >= #9/26/2020# Then FM = #10/15/2020#
If D >= #10/31/2020# Then FM = #11/15/2020#
If D >= #11/28/2020# Then FM = #12/15/2020#
If D >= #1/1/2021# Then FM = #1/15/2021#
If D >= #2/6/2021# Then FM = #2/15/2021#
If D >= #3/6/2021# Then FM = #3/15/2021#
If D >= #4/3/2021# Then FM = #4/15/2021#
If D >= #5/8/2021# Then FM = #5/15/2021#
If D >= #6/5/2021# Then FM = #6/15/2021#
If D >= #7/3/2021# Then FM = #7/15/2021#
If D >= #8/7/2021# Then FM = #8/15/2021#
If D >= #9/4/2021# Then FM = #9/15/2021#
If D >= #10/2/2021# Then FM = #10/15/2021#
If D >= #11/6/2021# Then FM = #11/15/2021#
If D >= #12/4/2021# Then FM = #12/15/2021#
If D >= #1/1/2022# Then FM = #1/15/2022#
If D >= #2/7/2022# Then FM = #2/15/2022#
If D >= #3/7/2022# Then FM = #3/15/2022#
If D >= #4/4/2022# Then FM = #4/15/2022#
If D >= #5/9/2022# Then FM = #5/15/2022#
If D >= #6/6/2022# Then FM = #6/15/2022#
If D >= #7/4/2022# Then FM = #7/15/2022#
If D >= #8/8/2022# Then FM = #8/15/2022#
If D >= #9/5/2022# Then FM = #9/15/2022#
If D >= #10/3/2022# Then FM = #10/15/2022#
If D >= #11/7/2022# Then FM = #11/15/2022#
If D >= #12/5/2022# Then FM = #12/15/2022#
If D > #12/31/2022# Then FM = #9/9/1999#
a_FMONTH = FM
End Function