Функция Weekday

Weekday(Date,[FirstDayOfWeek])

Функция используется для получения номера дня(между 1 и 7) из указанной даты

Возвращаемое значение

Возвращает значение типа Variant(Integer), содержащее целое число(между 1 и 7), представляющее день недели

Параметры
Функция содержит именованные аргументы
Часть Описание
Date Обязательный. Значение типа Variant, числовое выражение, строковое выражение или любая комбинация, позволяющая отобразить дату.Допустимый диапазоно дат-01.01.0000 до 31.12.9999.Если аргумент содержит зарезервированное слово Null, то функцией возвращает Null
Firstdayofweek Необязательный. Константа, указывающая первый день недели. Если этот аргумент опущен, считается, что неделя начинается с воскресенья

Ниже перечислены допустимые значения аргумента FirstDayOfWeek:

Константа Значение Описание
vbUseSystem 0 Используется значение NLS API
vbSunday 1 Воскресенье (по умолчанию)
vbMonday 2 Понедельник
vbTuesday 3 Вторник
vbWednesday 4 Среда
vbThursday 5 Четверг
vbFriday 6 Пятница
vbSaturday 7 Суббота

Возвращаемые значения

Ниже перечислены значения, возвращаемые функцией Weekday:

Константа Значение Описание
vbSunday 1 Воскресенье
vbMonday 2 Понедельник
vbTuesday 3 Вторник
vbWednesday 4 Среда
vbThursday 5 Четверг
vbFriday 6 Пятница
vbSaturday 7 Суббота

Пример
' Используем функцию для
' определения дня недели, соответствующего
' указанной дате
Dim MyDate
MyDate = "Июль 27, 1966"   ' Присваиваем дату
Print Weekday(MyDate,vbMonday)   ' возвращается 3, поскольку
   ' MyDate соответствует среде
Категория
Функции дат и времени