Перейти к содержимому

Фотография
- - - - -

Функция Weekday


  • Авторизуйтесь для ответа в теме
В этой теме нет ответов

#1
Thomas

Thomas

    Excel Pro

  • 60 сообщений
  • 10 благодарностей
12
  • Город:Москва
  • Office:2003, 2010, 2013, Online

Данная функция используется для получения дня в числовом формате (1-7) из указанной даты.
[font="verdana, geneva, sans-serif;"]Weekday(Date,[FirstDayOfWeek])[/font]
Возвращаемое значение функции
Возвращает значение типа 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 Суббота

 

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


Господа! Регистрируйтесь и задавайте свои вопросы, связанные с Microsoft Office. Поможем, чем сможем ;)





Количество пользователей, читающих эту тему: 0

0 пользователей, 0 гостей, 0 анонимных