How to get the date of the next coming Monday?

Hot Topic

Error handling problem
Help with comma separated values in report
MSDN Licensing for a Microsoft Gold ISV Partner
Adding a command button to the toolbar or menu bar in Excel?
MergeSort for Double Arrays
hung app help for web developer
Confidence Limits for the Mean
Count and display in cell
Avoid message boxes during macro?
Excel Advanced filter critera Question...

Microsoft ISV

Application Error
CDONTS
Help with a formula
on Microsoft Certification Program for ISV
VBA Word Can't find project or library
Application.FileSearch in Excel 2007
How do I write this!!
Help with interface?
Urgent HELP!!!!! VB in MS Excel
ScreenUpdating

How to get the date of the next coming Monday?

Hello, everyone here!

I need to set up a routine followup schedule in my Access 2003 database. The start date of a subject is the first Monday after being enrolled. So I am wondering if there is a simple way (like a function or something) to request the date of the first coming Monday.

Thanks a lot for any suggestion!

lunaa


Answer this question

How to get the date of the next coming Monday?

  • AndrewVos

    Thank you so much, ADG!

    I will plant your codes in my database~

    lunaa

  • Shaiq Bashir

    Hi Lunaa

    Add the following into a module, then you can access the function as required.

    Public Function NextMonday(MyDate As Date) As Date
    Dim x As Long
    x = Weekday(MyDate)
    If x >= 2 Then
    NextMonday = MyDate + 9 - x
    Else
    NextMonday = MyDate + 1
    End If
    End Function
  • How to get the date of the next coming Monday?
Answer this question