Как определить день недели по дате в Excel

Функция ДЕНЬНЕДТ возвращает день недели указанной даты текстом (понедельник, вторник и т.д.)

Описание функции

Функция =ДЕНЬНЕДТ(ДАТА; [Сокращенно]) имеет два аргумента

  • - ДАТА - дата, день недели которой необходимо определить.
  • - [Сокращенно] - По умолчанию день недели прописывается полностью. Если необходимо отображать день недели сокращенно, укажите значение данной переменной равной 1.

Ниже приведены примеры работы данной формулы.

Пример 1

Определение дня недели за последние 7 дней.

Пример 1 функции ДЕНЬНЕДТ

Пример 2

Определение дня недели за последние 7 дней сокращенно.

Пример 2 функции ДЕНЬНЕДТ

Код на VBA

Public Function ДЕНЬНЕДТ(ДАТА As Date, Optional Сокращенно As Integer = 0) As String
 
    Dim DayOfWeek As Variant
 
    If Сокращенно = 0 Then
        DayOfWeek = Array("понедельник", "вторник", "среда", "четверг", "пятница", "суббота", "воскресенье")
    Else
        DayOfWeek = Array("пн.", "вт.", "ср.", "чт.", "пт.", "сб.", "вс.")
    End If
    ДЕНЬНЕДТ = DayOfWeek(Weekday(ДАТА, vbMonday) - 1)
 
End Function
Надстройка
VBA-Excel
Надстройка для Excel содержит большой набор полезных функций, с помощью которых вы значительно сократите время и увеличите скорость работы с программой.