I changed the date on my computer to test the following code so the current date would be a date that falls on a Monday.
If the current day of the week is a Monday, display the current date in Sheet1.Range("B1")
The error message occurs on the following line of code the word "today" is...