Weekday Function

     

  • It returns weekday number
  • Private Sub CommandButton1_Click()
    Range("A1").Value = Weekday("15-Sept-2016")
    Range("A2").Value = Weekday(Date)
    Range("A3").Value = Date
    End Sub

     

    Download The Workbook