hola, alguien tiene algún código de como saber el día de la semana con el que empieza un mes?, he intentado esto pero nada
Function GetMonthDays(ByVal MonthToCheck As Date) As Integer
GetMonthDays = Day((DateAdd("dd",1,Format(MonthToCheck, "mm/yyyy")))- 1)
End Function
Private Sub Command1_Click()
MsgBox(GetMonthDays(CDate("02/23/2004")))
End Sub