How to add a Saturday date with VBA?

I need a code to place this week's Saturday's date in cell T2.
No matter what day I run the code I need to place this week's Saturday's date.
Thanks,
Jimi
Jimi ShermanAsked:
Who is Participating?
 
FlysterConnect With a Mentor Commented:
This code should give you what you're looking for:
Sub InsertSaturday()
  ActiveSheet.Range("T2") = Date + (7 - Weekday(Date))
End Sub

Open in new window

Flyster
0
 
Jimi ShermanAuthor Commented:
Thanks
0
 
FlysterCommented:
You're Welcome!
0
All Courses

From novice to tech pro — start learning today.