Put the date of any days of the week using a macro in an excel report

This is how I put the date of the first day of the week, in fact, I can use it for any day of the week. For instance, imagine that it is Thursday so with that VBA, I will be able to put into a cell the date of Monday of the same week. It can be used for Tuesday, Wednesday, etc.

macro excel macro excel

 

When I use the macro ?

To put the date of the first day of the week.

 

How to create the macro ?

Read How to create, edit, hide and select a macro in an excel report

 

How to create the button to associate it with the macro ?

Read How to create a button and associated it to a macro in an excel report

 

How is the macro ?

Copy the code below and paste it into your macro. You will see my comments in green if exist so follow the help to adapt to your need.

Sub test()
Dim DayX As Date
' change vbMonday by the day you want the date
DayX = DateAdd("d", 1 - Weekday(Date, vbMonday), Date)
' change C3 by the cell where to paste
Range("C3") = Format(DayX, "DD/MM/YYYY")
Range("C3") = DayX
End Sub

Interesting Management