Функция DatePart

Статья
04/07/2023

Предупреждение

Существует проблема с использованием этой функции. Последний понедельник в некоторых календарных годах может быть возвращен как неделя 53, когда это должна быть неделя 1. Дополнительные сведения и обходной путь см. в статье Функции формат или DatePart могут возвращать неправильный номер недели для последнего понедельника в году. Возвращает значение Variant (Integer), содержащее указанную часть данной даты.

Синтаксис

DatePart(interval, date, [ firstdayofweek, [ firstweekofyear ]])

Синтаксис функцииDatePart имеет следующиеименованные аргументы:

Part	Описание
интервал	Обязательный аргумент. Строковое выражение, представляющее интервал времени, который требуется вернуть.
дата	Обязательный аргумент. Значение Variant (Date), которое требуется оценить.
первый_день_недели	Необязательный аргумент. Константа, задающая первый день недели. Если она не указана, им является воскресенье.
первая_неделя_года	Необязательно. Константа, задающая первую неделю года. Если она не указана, первой неделею является неделя, начинающаяся 1 января.

Параметры

Аргументinterval имеет следующие параметры:

Setting	Описание
yyyy	Год
q	Квартал
m	Месяц
y	День года
d	День
w	День недели
ww	Неделя
h	Часы
n	Минуты
s	Секунды

Аргумент первый_день_недели может принимать следующие значения:

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

Аргумент firstweekofyear имеет следующие параметры:

Константа	Значение	Описание
vbUseSystem	0	Используются параметры API NLS.
vbFirstJan1	1	Начать с недели, содержащей 1 января (по умолчанию).
vbFirstFourDays	2	Первой неделей считается та, которая содержит хотя бы четыре дня нового года.
vbFirstFullWeek	3	Первой неделей считается первая полная неделя года.

Примечания

Используйте функцию DatePart для оценки даты и возврата определенного интервала времени. Например, DatePart может использоваться для расчета дня недели или текущего часа.

Аргумент первый_день_недели влияет на вычисления, если заданы значения "w" и "ww".

Если date является литералом даты, указанный год становится постоянной частью этой даты. Однако если аргумент date будет заключен в двойные кавычки (" ") и будет пропущен год, то текущий год будет вставляться в коде каждый раз при выполнении оценки выражения date. Это позволяет писать код, который можно использовать для разных лет.

Примечание.

Если в свойстве Calendar задан григорианский календарь, аргумент дата следует указывать соответствующим образом. Если используется календарь Хиджра, дата должна соответствовать ему.

Возвращенные части даты выражаются в единицах измерения периодов времени текущего арабского календаря. Например, если текущим календарем является Хиджра и возвращаемой частью даты является год, значение года будет соответствовать году хиджры.

Пример

В этом примере берется дата и с помощью функции DatePart отображается квартал года, на который она приходится.

Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

См. также

Функции (Visual Basic для приложений)

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Функции Format или DatePart могут возвращать неправильное число недели для последнего понедельника в году

Поделиться через